Discussion :

[BtjpsspgrW]

Bonjour,

Je souhaiterais que si la cellule active est vide, faire exécuter la macro quelques lignes plus bas.
En clair, passer plusieurs lignes afin de ne pas les exécuter.

Pour exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Depart :
GoTo Depart

Permet de remonter quelques lignes plus haut

Comment rédiger cette syntaxe, car le End If ne me convient pas, car il y a des lignes VBA entre les 2 à exécuter ?
If ActiveCell = "" Then

Vous en remerciant par avance.

Cordialement.

[Kimy_Ire]

Bonjour BtjpsspgrW,

Alors, comme je dis souvent, pour moi, le GoTo est quelque chose à proscrire ! Cela entraîne un code "spaghetti" illisible qu'on ne peut débuger facilement.
Il y a TOUJOURS une autre manière de faire.

Avec tes explications, je dois t'avouer ne pas bien tout comprendre.

Quoi qu'il en soit, si tu veux gérer des cas avec des cellules actives, peut-être que tu devrais passer par les événements comme : Private Sub Worksheet_SelectionChange(ByVal Target As Range).

Je te laisse revenir vers moi avec d'avantage de précisions pour que la communauté puisse t'aider d'avantage.

Cordialement,
Kimy

[Theze]

Bonjour,

Pour ce type de manœuvre, il y les boucle Do-Loop !

Hervé.

[SfJ5Rpw8]

Je vois pas pourquoi un if ... endif ne conviendrai pas ..

....

Comment rédiger cette syntaxe, car le End If ne me convient pas, car il y a des lignes VBA entre les 2 à exécuter ?
If ActiveCell = "" Then

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
if ActiveCell <> "" Then
   debug.print "ICI LE CODE A 'SAUTER' si la cellule active est vide 
end if
 
debug.print "ICI le code commun au cellule vide ou pas ..."