Macro condition

Résolu/Fermé
Frantoc37 Messages postés 17 Date d'inscription dimanche 7 février 2016 Statut Membre Dernière intervention 21 février 2016 - Modifié par teutates le 21/02/2016 à 16:41
Frantoc37 Messages postés 17 Date d'inscription dimanche 7 février 2016 Statut Membre Dernière intervention 21 février 2016 - 21 févr. 2016 à 20:22
Bonjour,

Je ne sais pas comment faire une macro de condition pour ouvrir une boite de message. J'explique:
La macro vérifie la cellule A1 puis:
- si la cellule A1 est vide, ca ouvre la messagebox et ça arrête la macro.
- si la cellule A1 n'est pas vide, cela arrête la macro.

Quelqu'un saurait-il faire ça ?

Merci :-)
François
A voir également:

1 réponse

m@rina Messages postés 21117 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 2 décembre 2024 11 364
21 févr. 2016 à 17:22
Bonjour

Sans plus d'info, ça ne paraît pas compliqué puisque de toutes façons la macro s'arrête que la cellule soit vide ou non...
Donc, juste pour afficher la Msgbox :

If Range("A1") = "" Then MsgBox "bonjour"


m@rina
0
Frantoc37 Messages postés 17 Date d'inscription dimanche 7 février 2016 Statut Membre Dernière intervention 21 février 2016
21 févr. 2016 à 20:22
Merci beaucoup Marina.
En reprenant votre formule et en tatonnant, j'ai réussi à construite ça, et ça répond au besoin:

Sub test()
If Range("A1") = "" Then MsgBox "Merci d'indiquer le nom du produit"
Else
Call Macroconcatenation
End If
End Sub
0