XL 2016 Conditions lancement macro + msgbox

niiiiiiiiiico

XLDnaute Occasionnel
Bonjour,

Je cherche à lancer une macro si une condition est réunie sinon apparition de message box

Si la condition n'est pas réunie, ça marche j'ai bien la msgbox. Si la condition est réunie ça marche partiellement, la macro se lance mais tout à la fin j'ai quand même l'apparition de la msgbox

Comment n'avoir la msgbox uniquement quand la condition n'est pas réunie ?

Sub Condition2()

If Sheets("Data").Range("A1").Value <> "" Then
Call RAZ
End If
MsgBox "L'onglet Data est déjà vide"

End Sub

Merci !!!
 

cp4

XLDnaute Impliqué
Bonjour,
VB:
Sub Condition2()
If Sheets("Data").Range("A1").Value <> "" Then ' condition si A est vide alors
Call RAZ 'on execute cette macro
Else 'sinon 
MsgBox "L'onglet Data est déjà vide" 'on affiche msgbox
End If 'fin de condition
End Sub
Bonne journée
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas