OVH Cloud OVH Cloud

Fin de données dans une colonne

1 réponse
Avatar
Jacques
Bonjour,

J'ai ce type de code ci-dessous :

For Each Cell In Range("d:d")
Un.Add Cell, CStr(Cell)
Next Cell

Mais je voudrais arrêter la recherche lorsqu'il n'y a plus de données dans
la colonne D sans aller jusqu'à 65536.

Comment puis-je faire.

Merci d'avance.

Jacques

1 réponse

Avatar
Jacky
Bonjour Jacques
Par exemple:
'-------
derlg = Range("d65536").End(3).Row
For Each cell In Range("d1:d" & derlg)
'---------
Salutations
JJ

"Jacques" a écrit dans le message de
news:432bdacb$0$1711$
Bonjour,

J'ai ce type de code ci-dessous :

For Each Cell In Range("d:d")
Un.Add Cell, CStr(Cell)
Next Cell

Mais je voudrais arrêter la recherche lorsqu'il n'y a plus de données dans
la colonne D sans aller jusqu'à 65536.

Comment puis-je faire.

Merci d'avance.

Jacques