Activé une macro avec une validation de donée
Résolu
merci_de_votre_aide
Messages postés
58
Date d'inscription
Statut
Membre
Dernière intervention
-
merci_de_votre_aide Messages postés 58 Date d'inscription Statut Membre Dernière intervention -
merci_de_votre_aide Messages postés 58 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Y aurait-il quelqu'un qui pourrais m'aider sur mon problème.
Je m'explique, j'aimerais à l'aide d'une validation de donnée exécuter une macro.
Exemple:
dans ma validation de donnée, j'ai deux nom
joseph et isa
si je selectionne joseph, j'aimerais que mon userform 1 s'affiche
et
si je selectionne isa, j'aimerais que mon userform 2 s'affiche
Merci de votre aide et de votre temps pour mon problème
Je me permet de joindre l'exemple de mon problème, en vous remerciant
http://www.cijoint.fr/cjlink.php?file=cj201001/cijhls1Lc6.xlsm
Y aurait-il quelqu'un qui pourrais m'aider sur mon problème.
Je m'explique, j'aimerais à l'aide d'une validation de donnée exécuter une macro.
Exemple:
dans ma validation de donnée, j'ai deux nom
joseph et isa
si je selectionne joseph, j'aimerais que mon userform 1 s'affiche
et
si je selectionne isa, j'aimerais que mon userform 2 s'affiche
Merci de votre aide et de votre temps pour mon problème
Je me permet de joindre l'exemple de mon problème, en vous remerciant
http://www.cijoint.fr/cjlink.php?file=cj201001/cijhls1Lc6.xlsm
A voir également:
- Activé une macro avec une validation de donée
- Ethernet n'a pas de configuration ip valide - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Telecharger windows 8.1 avec clé d'activation gratuit - Guide
- Temps validation annonce le bon coin - Forum Hotmail / Outlook.com
- Jitbit macro recorder - Télécharger - Confidentialité
6 réponses
si ta valeur est en A1 tu fait:
with sheets("feuil1")
select case .range("A1).value
case "joseph"
userform1.show
case "isa"
userform2.show
end select ou end case (je ne me rappel plus de la syntaxe
end with
Bonjour merci de notre aide
Pourquoi as tu mis un espace après Joseph ? :-(
ci joint macro se déclenchant au changement de valeur dans B1
pour installer: copier cette macro
clic droit sur l'onglet
visualiser le code
coller
je n'ai pas 2007: il y a peut-être besoin de" Load userform": si oui, tu enlèves l'apostrophe.
Pourquoi as tu mis un espace après Joseph ? :-(
ci joint macro se déclenchant au changement de valeur dans B1
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$1" Then
Select Case Target
Case Is = "joseph "
'Load UserForm1
UserForm1.Show
Case Is = "isa"
'Load UserForm2
UserForm2.Show
'case is....
End Select
End If
End Sub
pour installer: copier cette macro
clic droit sur l'onglet
visualiser le code
coller
je n'ai pas 2007: il y a peut-être besoin de" Load userform": si oui, tu enlèves l'apostrophe.
je n'ai pas mis d'espace après joseph
je travail sur office 2003 donc c'est userform.show pour ouvrir un formulaire
je travail sur office 2003 donc c'est userform.show pour ouvrir un formulaire
Je répondais au demandeur du post "merci de votre aide" !!!...
et il travaille sur 2007 !!!...
Décourageant...
et il travaille sur 2007 !!!...
Décourageant...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question