VBA - dernière ligne (ou colonne)

Résolu
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   -  
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour le forum,

i=0

Do
i=i+1
Sheets("feuil1").cells(i, 1).value = "ok"
loop until <<il n' y a plus de ligne>>

Comment traduire <<il n'y a plus de ligne>> ?? Existe t il une fonction ?
Mon code renseigne les lignes d'une "feuil1", et j'aimerais qu'il le fasse jusqu'à la dernière c'est a dire jusqu'à la 65 000 ème ligne (me rappelle plus du nombre exact de lignes).

Ou faut il (tout simplement) dire jusqu'à la 65 000 ème ligne ??

Merci par avance !!

A voir également:

4 réponses

Réponse 1 / 4
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour,

C'est mieux de repérer d'abord la dernière ligne.
Se baser sur une colonne complètement remplie, par exemple la A.
Le dernière ligne est :
derlig=[A65536].end(xlup).row
ensuite :
for lig= 2 to derlig
...
next lig

[A65536] valable pour excel <= 2003, sinon on peut mettre un code qui s'adapte.

eric
0
Réponse 2 / 4
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   21
 
merci je vais tester
0
Réponse 3 / 4
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 725
 
bonjour Tehani_t, Éric

Si tu veux traiter les lignes utilisées tu peux tout de même avoir une fonction <<il n' y a plus de ligne>> 

i = 0
Do
    i = i + 1
    Sheets("feuil1").Cells(i, 1).Value = "ok"
Loop Until i = UsedRange.Rows.Count '<<il n' y a plus de ligne>>
0
Réponse 4 / 4
Tehani_t Messages postés 240 Date d'inscription   Statut Membre Dernière intervention   21
 
Merci pour m'avoir aidé !!
0

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?
veroaaa -
Pat -

10 réponses