Cellule déroulante + msgbox

Fermé
Stan - 6 juil. 2015 à 14:27
DevAxia Messages postés 34 Date d'inscription jeudi 25 juin 2015 Statut Membre Dernière intervention 18 novembre 2015 - 6 juil. 2015 à 15:10
Bonjour,
J'ai besoin en fonction du texte entré dans une cellule par le biais d'un menu déroulant d'afficher un message d'information pour l'utilisateur.
Je suis débutant en VBA et là je sèche complètement!
Merci de votre aide



1 réponse

DevAxia Messages postés 34 Date d'inscription jeudi 25 juin 2015 Statut Membre Dernière intervention 18 novembre 2015 2
6 juil. 2015 à 14:45
Bonjour,
Tu dois utiliser un évènement Worksheet_Change et la commande Msgbox.
Regarde le code suivant, tu pourras le modifier selon tes paramètres.

Private Sub Worksheet_Change(ByVal Target As Range)

    MsgBox Target.Value

End Sub

0
Je ne comprends pas, qu'est ce que je dois changer ?
0
DevAxia Messages postés 34 Date d'inscription jeudi 25 juin 2015 Statut Membre Dernière intervention 18 novembre 2015 2
6 juil. 2015 à 15:10
je vais être plus précis dans mon exemple
si la valeur contenant ton menu déroulant est localisée en C2 (ligne 2, colonne 3), et que tu veux afficher un message texte qui contient la valeur de la cellule, tu utilises un code comme celui-ci.

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Row = 2 And Target.Column = 3 Then
    
        MsgBox "La valeur choisie est la suivante: " & Target.Value
        
    End If

End Sub


L'événement sera déclenché lorsque la valeur de C2 changera, et si la ligue (2) et la colonne (3) convienne, le message sera affiché.
0