Un bouton deux commandes simultanémant

Bonjour,

Je cale sur cette fonction a savoir un bouton qui commande deux fonctions en meme temps

si vous pouvez m'aider merci d'avance.

Dans mon Userform1 j'ai un bouton qui me lance une macro son a savoir :

Private Sub CommandButton10_Click()
  Call Son3
End Sub

Dans une feuille "Chrono4" j'ai un bouton qui me lance mon compte à rebours a savoir :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If (Range("C1").Value = 0) And (running = False) Then
running = True
compte
End If
If Range("C1").Value = 1 Then running = False
End Sub

Private Sub BTN_GO_Click()
 Range("C1").Value = 0
running = True
compte

Range("C1").Value = 0

End Sub
Private Sub BTN_STOP_Click()
Range("C1").Value = 1
running = False
compte
End Sub
Private Sub BTN_RAZ_Click()
Range("A1").Value = 0
End Sub

Ma question :

Comment faire pour que Private Sub CommandButton10_Click() de mon Userform

me lance également et en meme temps Private Sub BTN_GO_Click()

Merci pour votre aide

Bonjour

En même temps pas sur mais l'un après l'autre

Dans ta macro Private Sub CommandButton10_Click() fais un appel à ta macro Sub BTN_GO_Click

    Private Sub CommandButton10_Click()
      BTN_GO_Click
      Call Son3
    End Sub

Salut Banzai

Merci pour ta réponse

Je ne comprends pas trop ta réponse

Dois je préciser lors de l'appel de BTN_GO_Click le nom de la feuille ou se trouve ce bouton ainssi que sa fonction

?????

Merci de m'expliquer en details

merci

Bonsoir

Sans rien pour tester pas glop

Désolé j'avais cru que les 2 macros étaient dans le même module

Si cela ne passe pas,

il faut que tu enlèves ( pas sur à 100%) le qualificatif "Private" de ta macro BTN_GO_Click et que tu la déplaces dans un module standard

Ensuite comme je l'ai marqué tu modifies ta macro CommandButton10_Click

Normalement c'est tout

Si pas ça il faudra ton fichier afin de tester

Bonjour,

Merci pour ta réponse

ca marche

A+

Rechercher des sujets similaires à "bouton deux commandes simultanemant"