Affecter 2 macros à un bouton

[crud001a]

Bonjour,
J'ai un projet informatique à réaliser, et comme l'indique le titre, j'aimerais affecter 2 macros à un même bouton.

En gros le client doit remplir un formulaire, et si à une question il répond "non", à la fin du questionnaire lorsqu'il
clique sur la flèche "accédez à la suite du questionnaire", je veux que ça l'emmène sur la page que j'ai déjà créée: "Nous sommes désolés, mais vous ne pouvez bénéficier des prestations familiales".
En revanche, s'il répond "oui", je veux que ça l'emmène lorsqu'il clique sur la même flèche sur une page où il pourra alors poursuivre le questionnaire.

Je vous joins le fichier pour plus de clarté. Merci d'avance pour vos réponses.

 

[crud001a]

Re : Affecter 2 macros à un bouton

En gros, si il met que des "oui" et des "_", il accède à la page "enfant à charge", et s'il met ne serait-ce qu'un seul "non", il accède à la page "Pas de prestations"

 

[JCGL]

Re : Affecter 2 macros à un bouton

Bonjour à tous,
Salut Si,

Si j'en crois les formules en L21 à L 24 de la feuille Pas de prestations, il y a quatre possibilités de Non.

A + à tous

 

[Si...]

Re : Affecter 2 macros à un bouton

re

effectivement, j'ai lu trop vite

Bonjour,

En gros le client doit remplir un formulaire, et si à une question il répond "non", à la fin du questionnaire ...

Maintenant pour tester aussi le nombre de réponses obligatoires (4) :

Sub Allerpage3()
  If [I19] = "Non" Or [G20] = "Non" Or [I34] = "Non" Or [L35] = "Non" Then
    Sheets("Pas de prestations").Select
  Else
    If [I19] = "" Or [G20] = "" Or [I34] = "" Or [L35] = "" Then
      MsgBox "il y a des réponses obligatoires !", vbCritical, "Attention"
    Else
      Sheets("Enfants à charge").Select
    End If
  End If
End Sub

 

[crud001a]

Re : Affecter 2 macros à un bouton

CA MARCHE!!! Merci beaucoup