Cellule déroulante + msgbox

Stan -  
DevAxia Messages postés 37 Statut Membre -
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 37 Statut Membre 2
 
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
Stan
 
Je ne comprends pas, qu'est ce que je dois changer ?
0
DevAxia Messages postés 37 Statut Membre 2
 
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