[VBA] - Exit Sub dans If

Résolu/Fermé

Palteza Messages postés 79 Date d'inscription mercredi 2 décembre 2009 Statut Membre Dernière intervention 6 septembre 2014 - Modifié par Palteza le 1/06/2010 à 11:36
Palteza Messages postés 79 Date d'inscription mercredi 2 décembre 2009 Statut Membre Dernière intervention 6 septembre 2014 - 4 juin 2010 à 11:42

Bonjour à tous,

Je n'arrive pas à enchainer un test, et s'il est positif, un select ainsi que la sortie de ma macro ... il me dit "Attendu expression" sur le Sub

If ((Range("G3") = Empty) Or (Range("G4") = Empty)) 
Then MsgBox("Vous avez oublié de saisir soit la date de passation du questionnaire, soit l'heure"), Range("G4").Select, Exit Sub

S'pas bien sorcier ce que je lui demande pourtant!

Merci d'avance

A voir également:

Exit if vba
L'indice n'appartient pas à la sélection vba - Forum VB / VBA
Incompatibilité de type vba ✓ - Forum Programmation
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
If exist ✓ - Forum Autoit / batch
Find vba - Astuces et Solutions

3 réponses

Réponse 1 / 3

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
4 juin 2010 à 11:19

Bonjour,

C'est pas sorcier mais faut-il le lui demander correctement !!!

If IsEmpty(Range("G3")) Or IsEmpty(Range("G4")) Then
   MsgBox "Vous avez oublié de saisir soit la date de passation du questionnaire, soit l'heure",VbExclamation,"Message Système"
   Range("G4").Select
   Exit Sub
End If

;o)

Discussions similaires

exit() en C

Excel VBA Sortir de boucle for

site fabriquant des contrefaçons ou pas ?

la touche ESC

Probléme au démarrage windows 8

Ordinateur Planté