Afficher une msgbox si valeur dans une cellule
Résolu/Fermé
myke59
myke59
- Messages postés
- 3
- Date d'inscription
- lundi 12 novembre 2012
- Statut
- Membre
- Dernière intervention
- 12 novembre 2012
myke59
- Messages postés
- 3
- Date d'inscription
- lundi 12 novembre 2012
- Statut
- Membre
- Dernière intervention
- 12 novembre 2012
A voir également:
- Si la valeur d'une cellule est égale vba
- Excel afficher message si valeur - Meilleures réponses
- Macro en fonction de la valeur d'une cellule ✓ - Forum - Bureautique
- La valeur d'une cellule dans une variable VBA ✓ - Forum - Bureautique
- Afficher une msgbox si valeur dans une cellule ✓ - Forum - VB / VBA
- VBA cellule egale a une autre ✓ - Forum - Excel
- Lancer une macro lorsque une cellule contient une valeur précise ✓ - Forum - Excel
4 réponses
f894009
12 nov. 2012 à 10:23
- Messages postés
- 16626
- Date d'inscription
- dimanche 25 novembre 2007
- Statut
- Membre
- Dernière intervention
- 4 août 2022
12 nov. 2012 à 10:23
Bonjour,
pour votre macro manque le end if
Vous ne dites pas comment cette macro se lance????
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????
myke59
12 nov. 2012 à 10:32
- Messages postés
- 3
- Date d'inscription
- lundi 12 novembre 2012
- Statut
- Membre
- Dernière intervention
- 12 novembre 2012
12 nov. 2012 à 10:32
Merci pour ce bon début de réponse,
Cette macro doit s'appliquer de manière permanente (genre en arrière plan).
des que le resultat de la formule en cellule B1.
Or la elle ne s'applique que lorsqu'on l'execute. avez vous la solution?
Cette macro doit s'appliquer de manière permanente (genre en arrière plan).
des que le resultat de la formule en cellule B1.
Or la elle ne s'applique que lorsqu'on l'execute. avez vous la solution?
Bonjour,
Essayes comme ça
Sub macro1()
Worksheets("Feuil1").Select
If Cells(1, 2).Value = "1" Then MsgBox ("1 est dans la cellule B1")
Else
MsgBox "1 n'est pas dans la cellule B1"
End If
End Sub
Essayes comme ça
Sub macro1()
Worksheets("Feuil1").Select
If Cells(1, 2).Value = "1" Then MsgBox ("1 est dans la cellule B1")
Else
MsgBox "1 n'est pas dans la cellule B1"
End If
End Sub
myke59
12 nov. 2012 à 14:12
- Messages postés
- 3
- Date d'inscription
- lundi 12 novembre 2012
- Statut
- Membre
- Dernière intervention
- 12 novembre 2012
12 nov. 2012 à 14:12
Super ça marche sur cet exemple simple !!
Un grand Merci à vous 3 qui m'avez permis de résoudre ce problème!
:)
je clos le sujet
Un grand Merci à vous 3 qui m'avez permis de résoudre ce problème!
:)
je clos le sujet