Call d'une macro depuis un UserForm

[kalenjiman]

Bonjour,

Je rencontre un soucis pour éxecuter une macro depuis un UserForm.
J'ai placé un bouton dans un UserForm, lorsque celui-ci est cliqué j'exécute le code suivant :

'Supprime les feuilles non sélectionnées
If CheckBox1.Value = False Then Sheets("Feuil1").Delete
If CheckBox2.Value = False Then Sheets("Feuil2").Delete

Je souhaite rajouter une condition qui exécute une macro si la valeur du CheckBox = True. Exemple:

If CheckBox1.Value = True Then 
     Sheets("Feuil1").Select
     Execute la macro 1
If CheckBox2.Value = True Then
     Sheets("Feuil2").Select
     Execute la macro 2

...(Autre code VBA)
Application.Dialogs(xlDialogPrint).Show
EndSub

Savez vous comment faire? Je tourne en rond.

 

[wilfried_42]

Re : Call d'une macro depuis un UserForm

bonjour

ton code

If CheckBox1.Value = True Then 
     Sheets("Feuil1").Select
[COLOR="Red"]     Macro1
End If
[/COLOR]If CheckBox2.Value = True Then
     Sheets("Feuil2").Select
[COLOR="red"]     macro2
End If
[/COLOR]

 

[kalenjiman]

Re : Call d'une macro depuis un UserForm

Merci.

J'ai finalement changer mon fusil d'épaule. Je traite chaque Checkbox dont la valeur est =True grâce la déclaration _click. Puis une fois que l'utilisateur valide l'Userform, je traite tout les checkbox dont la valeur est =False.

C'est plus simple a gérer.