XL 2016 Conditions lancement macro + msgbox

[niiiiiiiiiico]

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]

Bonjour,

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

 

[niiiiiiiiiico]

Merci beaucoup !!