lancement formulaire par rapport liste déroulante [Résolu]

[maximilien59]

Bonjour,

Ce sujet à peu être déjà était demandé mais je tente ma chance quand même du fait que je ne le retrouve pas.

J'ai actuellement un formulaire avec une liste déroulante de choix avec un bouton Valider , et je voudrai trouver le code en VBA qui me permettrai de lancer le formulaire concerné par rapport à la valeur de la liste.

Je m'explique : Dans la liste déroulante, il y a des valeurs comme "ajout","suppression" et je voudrai que si je selectionne "ajout" et que je clique sur valider, le formulaire "Nouvelle enregistrement" s'ouvre.

Quelqu'un peux-t'il m'aider? je vous remercie.

[rob1son76]

Dans l'évènement de ton bouton valider tu met:

Code :

1
2
3
if me.combobox.value="Ajout" then
docmd.openform "Formulaire ajout"
end if

Et tu fais la même chose pour tout les cas.

Tu peux le faire aussi avec des cases.
Regarde dans le forum les sujets boucle en vba, case et ouverture d'un formulaire en vba.

[maximilien59]

Envoyé par rob1son76

Dans l'évènement de ton bouton valider tu met:

Code :

Et tu fais la même chose pour tout les cas.

Tu peux le faire aussi avec des cases.
Regarde dans le forum les sujets boucle en vba, case et ouverture d'un formulaire en vba.

Merci pour ton aide

[mc.schmer]

Salut Maximilien,

Tu as également la possibilité d'utiliser un select case (je crois que rob1son te le suggerait) dont voici la syntaxe:

Code :

1
2
3
4
5
6
7
8
Select Case ComboBox
    Case "Ajout"
    DoCmd.OpenForm "Formulaire ajout"
    Case "x"
    DoCmd.OpenForm "Formulaire x"
    '...
    '...
End Select

Amicalement.