affecter 2 Macro à un seul boutton

P

Paladin

Guest

• 2 Mai 2006

• #2

Bonjour Am Alive,

Je vois pas trop où est ton problème. Tu peux créer un module dans lequel tu mets :

Code:

Sub Macro1()
...
End Sub

Sub Macro2()
...
End Sub

Et dans ton bouton tu marques :

Code:

Private Button_Click()
If Range('A1').Value = Date Then
Macro1
Else
Macro2
End If
End Sub

Tu peux même faire en sorte d'utiliser un Select Case ... ce qui peut faire que ton bouton se voit 'affecter', comme tu dis, plus que deux macros.

 

Vote positif 0 Vote négatif

A

antiphot

XLDnaute Occasionnel

• 3 Mai 2006

• #3

Bonjour Am alive, Paladin et le forum

Dans le fichier ci-joint une autre option avec un bouton va et vient. A voir si cela te convient

tient nous au courant 😉

 

Vote positif 0 Vote négatif

A

antiphot

XLDnaute Occasionnel

• 3 Mai 2006

• #4

Bon voila ce fameux fichier [file name=boutonvaetvient.zip size=9781]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/boutonvaetvient.zip[/file]

 

Pièces jointes

• boutonvaetvient.zip

  9.6 KB · Affichages: 469

Vote positif 0 Vote négatif

A

antiphot

XLDnaute Occasionnel

• 3 Mai 2006

• #5

Bonjour Am alive, Paladin et le forum

Dans le fichier ci-joint une autre option avec un bouton va et vient. A voir si cela te convient

tient nous au courant 😉

 

Vote positif 0 Vote négatif

A

Am alive

Guest

• 3 Mai 2006

• #6

Bonjour à tous
Merci Paladin Merci Antiphot
Voici un exemple dans fichier joint pour le code de paladin,il ya une erreur et je narrive pas à trouver
Merci d'avance [file name=Classeur1_20060503123601.zip size=5689]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060503123601.zip[/file]

 

Pièces jointes

• Classeur1_20060503123601.zip

  5.6 KB · Affichages: 147

Vote positif 0 Vote négatif

A

antiphot

XLDnaute Occasionnel

• 3 Mai 2006

• #7

Désolé de te répondre si tard mais je reviens sur le forum à l'instant.

Bon c'est pas bien grâve. Il n'y a pas d'erreur dans le code de Palladin. Tu as juste fais une erreur concernant l'emplacement de la routine du bouton situé en feuil1.

Ci-joint le fichier corrigé

😉 [file name=AmAlive.zip size=9908]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/AmAlive.zip[/file]

 

Pièces jointes

• AmAlive.zip

  9.7 KB · Affichages: 248

Vote positif 0 Vote négatif

A

Am alive

Guest

• 3 Mai 2006

• #8

Bonsoir à Tous
Bonsoir Antiphot et merci pour votre aide,mais comment placer une commandbutton sur la feuille1
car je suis nul de créer une commandbuton sur une feuille excel
Merci d'avance

 

Vote positif 0 Vote négatif

C

ccpapy

XLDnaute Impliqué

• 4 Mai 2006

• #9

bonjour à tous
clic droit sur la barre d'outils
cocher boite à outils controle
clic sur l'equerre (mode creation)
clic sur bouton de commande
se reporter sur la feuille et etirer bouton gauche enfonçé
enfin clic droit sur le bouton crée et
visualiser le code
tu reportes le code donné par antiphot
reclic sur mode création (quitter )

voilà :assez détaillé ? 🙂
à+

 

Vote positif 0 Vote négatif