j'ai un formulaire qui me tri une liste de nom par ordre alphab.
Ce que je voudrais c'est quand on selection un nom on lance une macro
ex:
AA => macro 1
CC => macro 2
BB => macro 3
GG => macro 4
EE => macro 5
FF => macro 6
CA => macro 7
AB => macro 8
Re : Lancer différentes macro depuis un formulaire
Bonjour,
regarde le code ci-dessous, à compléter :
Code:
Private Sub ListBox1_Click()
If ListBox1.Value = "AA" Then
macro1
ElseIf ListBox1.Value = "BB" Then macro2
ElseIf ListBox1.Value = "CC" Then macro3
'Etc...
End If
End Sub
Re : Lancer différentes macro depuis un formulaire
Bonjour le fil ,
Variante en Select Case
Code:
Private Sub ListBox1_Click()
Select Case ListBox1.Value
Case "AA"
macro1
Case "BB"
macro2
Case "CC"
macro3
Case Else
MsgBox "Pas de correspondance"
End Select
End Sub
j'ai un formulaire qui me tri une liste de nom par ordre alphab.
Ce que je voudrais c'est quand on selection un nom on lance une macro
ex:
AA => macro 1
CC => macro 2
BB => macro 3
GG => macro 4
EE => macro 5
FF => macro 6
CA => macro 7
AB => macro 8
J'ai parlé trop vite
C'est vrai que cela marche, mais il faut introduire manuellement "AA BB CC ..."
Ce qui serait bien c'est que ce soit automatique ! je sais pas si c'est possible?
ou en complément ajouter le nom de la macro dans la colonne "B"
Private Sub ListBox1_Click()
If ListBox1.Value = "AA" Then
macro1
ElseIf ListBox1.Value = "BB" Then macro2
ElseIf ListBox1.Value = "CC" Then macro3
'Etc...
End If
End Sub
J'ai parlé trop vite
C'est vrai que cela marche, mais il faut introduire manuellement "AA BB CC ..."
Ce qui serait bien c'est que ce soit automatique ! je sais pas si c'est possible?
ou en complément ajouter le nom de la macro dans la colonne "B"