Lancement de macros suivant choix

Le
Philippe
Bonjour,

en A1 liste de choix

en B1 des valeurs de 1 à 10 récupérer et afficher par la liste de choix par
RECHERCHEV

Est-il possible que ces différentes puissent declencher des macros
automatiques ?

Merci de votre aide
lephil
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Jacky
Le #4237051
Bonjour,

Un truc du genre le fait...
'----------
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1]) Is Nothing Then
Select Case [b1]
Case 1
Macro1
Case 2
Macro2
Case 3
Macro3
'------Etc-------Case_n
Case Else
MsgBox "Macro inexistante"
End Select
End If
End Sub
'________________
Sub Macro1()
MsgBox "Execution Macro1"
End Sub
'__________________
Sub Macro2()
MsgBox "Execution Macro2"
End Sub
'_____________
Sub Macro3()
MsgBox "Execution Macro3"
End Sub
'---------

--
Salutations
JJ



"Philippe" 45f53ac0$0$31979$
Bonjour,

en A1 liste de choix

en B1 des valeurs de 1 à 10 récupérer et afficher par la liste de choix
par RECHERCHEV

Est-il possible que ces différentes puissent declencher des macros
automatiques ?

Merci de votre aide
lephil



Philippe
Le #4236901
ça fonctionne à merveille
Encore merci et bonne journée
lephil
"Philippe" 45f53ac0$0$31979$
Bonjour,

en A1 liste de choix

en B1 des valeurs de 1 à 10 récupérer et afficher par la liste de choix
par RECHERCHEV

Est-il possible que ces différentes puissent declencher des macros
automatiques ?

Merci de votre aide
lephil



Publicité
Poster une réponse
Anonyme