lancer macro dans un CommandButton

[rudaye]

Resalut tt le monde

Comment peux ton lancer une macro par l'intermédiaire d'un commandButton?


merci

 

[Grantourismo]

Il faut faire call + le nom de ta macro

 

[Gérard DEZAMIS]

Bonjour RudyPerray

Dessiner un Bouton de commande, click droit, visualiser le code,
on trouve donc :

Private Sub CommandButton1_Click()
XXXXXXXXXXXXXXXXX
End Sub

A la place des XXXXXXX tu écris le code de ta macro qui sera éxécutée lors du clic sur le dit bouton ....


Est-ce suffisant ?

@+ GD

 

[guillaume]

Essai un code de ce type

Private Sub CommandButtonX_Click()

Application.Run 'NomMacro'

End Sub


Si tu travail dans un Userform et que tu a des boutons d'option et que tu souhaite appliquer une macro différente en fonction du bouton cliqué, utilise cette macro

Private Sub CommandButton1_Click()

If MiseEnForme.OptionButton1.Value = True Then Application.Run 'NomMacro1'

If MiseEnForme.OptionButton2.Value = True Then Application.Run 'NomMacro2'

End Sub

voilà

 

[guillaume]

Essai un code de ce type

Private Sub CommandButtonX_Click()

Application.Run 'NomMacro'

End Sub


Si tu travail dans un Userform et que tu a des boutons d'option et que tu souhaite appliquer une macro différente en fonction du bouton cliqué, utilise cette macro

Private Sub CommandButton1_Click()

If MiseEnForme.OptionButton1.Value = True Then Application.Run 'NomMacro1'

If MiseEnForme.OptionButton2.Value = True Then Application.Run 'NomMacro2'

End Sub

voilà

 

[rudaye]

Bonjour et merci Gérard DEZAMIS , guillaume et grantourismo !

je vais utiliser cette façon qui me convient :


Private Sub CommandButtonX_Click()

Application.Run 'NomMacro'

End Sub

merci