Syntaxe de IF dans une macro

[Aurel]

Bonjour tout le monde!

Je souhaite que dans la macro, lorsque la condition n'est pas respectée, la macro s'arrête.

Ma macro est la suivante :

If Sheets('REQUETE').Range('A1') = '' Then
MsgBox 'veuillez saisir une requête', vbExclamation, 'Attention'
End if

If Sheets('REQUETE').Range('A1') <> '' Then
....

Voilà!

Mercie à vous pour cet précieuse aide

 

[Abel]

Bonjour Aurel,

As tu essayé :

If Sheets('REQUETE').Range('A1') = '' Then
MsgBox 'veuillez saisir une requête', vbExclamation, 'Attention'
else if
exit sub
End if


En espérant que cela te dépanne.

Abel.

 

[Jeannot45]

Bonjour à tous,

Simplement en mettant dans la condition l'instruction Exit Sub

exemple :

IF Range('A1')=10 then
Exit Sub
End If

A plus

Jeannot

 

[aurel]

Super!!!

Merci à vous