Msgbox en cascade

Y

Yvon

Guest
Bonsoir à tous,

Je souhaite mettre des msgbox en cascade je m'explique :

1 : msgbox'Connaissez vous notre etablissement'
if vbYes then range('A1')
If VbNO then msgbox'connaissez vous la marque'

If VbYes then msgbox'détail établissement'
if vbYes then range('A1')

If VBNo then msgbox'détail marque +établissement'
if vbYes then range('A1')

Mon souci est que je n'arrive pas à mettre le code en bon ordre, j'ai essayé avec Exit sub end if, rien ne marche, ou j'ai oui qui marche ou non mais pas les deux

Par avance merci du coup de main

a++
Yvon
 

myDearFriend!

XLDnaute Barbatruc
Bonsoir Yvon,

Si j'ai bien compris le problème, peut-être peux-tu essayer comme ça :
      If MsgBox('Connaissez vous notre etablissement', vbYesNo) = vbNo Then
            If MsgBox('connaissez vous la marque', vbYesNo) = vbNo Then
                  MsgBox 'détail marque +établissement'
            Else
                  MsgBox 'détail établissement'
            End If
      End If
      Range('A1').Select
Cordialement,
 

Charly2

Nous a quittés en 2006
Repose en paix
Bonsoir Yvon et Didier mDF :)

A priori, j'aurais donné le même genre de réponse que Didier, mais à la relecture de ton code, je ne comprends pas trop ce que tu veux faire :S

Il faut savoir que les constantes vbYes et vbNo (sous XL97 en tout cas) valent respectivement 6 et 7 !

Donc tes tests :

If vbYes then et If vbNo Then deviennent If 6 Then et If 7 Then, c'est-à-dire qu'ils sont toujours VRAI !!!

Pour contourner ce problème, il faut soit utiliser le code proposé par Didier mDF, soit utiliser une variable :

Resultat = MsgBox 'Message'

puis effectuer des tests sur cette variable :

If Resultat = vbYes Then ...
ou
If Resultat = vbNo Then ...

Ensuite, il faut vraiment savoir 'quoi' doit enclencher 'quoi'.

J'espère que ces quelques lignes te permettront d'y voir plus clair ;)

Amicalement
Charly
 
Y

Yvon

Guest
Salut Charly, Mydear friend,

Ce que j'ai compris au travers de ton message et de celui de Didier, c'est que je n'y arriverai pas, de cette manière, ce que je vous ai livre en info est en fait un condensé, c'est un peu plus complexe dans la réalité.

Donc je passe en USF.

Merci de votre aide à tous les deux.

Bon Week-end

a++
Yvon
 

Discussions similaires

Statistiques des forums

Discussions
300 793
Messages
1 987 228
Membres
209 742
dernier inscrit
Ben33100