Afficher une msgbox si valeur dans une cellule

Résolu
myke59 Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   -  
myke59 Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je suis débutant en vba
Je suis plutot une personne qui me débrouiller mais je commence à perdre patience sur un sujet qui me semble simplissime
Avant de passer le PC par la fenetre, je viens vous demander de l'aide.

Sub macro1()

Worksheets("Feuil1").Select
If Cells(1, 2).Value = "1" Then
MsgBox ("1 est dans la cellule B1")

End Sub

Je précise que la validation de données ne semble pas pouvoir s'appliquer étant donné que ce qui est dans la case B1 est le résultat d'une formule.

Si l'un d'entre vous s'est en déjà sorti, je serai ravi de savoir comment...

un grand merci d'avance! :)


4 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

pour votre macro manque le end if

Sub macro1()
  If Worksheets("Feuil1").Cells(1, 2).Value = 1 Then
    MsgBox ("1 est dans la cellule B1")
  End If
End Sub


Vous ne dites pas comment cette macro se lance????
1