Lecture d'un tableau EXCEL

[joquetino]

Bonjour à tous,

Je suis en train de finaliser une macro VBA qui autimatise certains traitements sur un tableau EXCEL.
J'ai 2 interrogations auxquelles vous allez certainement pouvoir m'apporter une réponse.

Je lis les lignes de mon tableau ligne à ligne (via une boucle for). Le souci, c'est que je ne sais pas comment m'arrêter quand la ligne est vide.
For (i=1 to 1000 Step 1)

En gros, si j'ai seulement 50 lignes de remplies, j'aimerais m'arrêter à lecture de la 50ième lignes. Comment devrais-je procéder? J'ai le même souci avec les colonnes.

Un grand merci d'avance.

 

[Pierrot93]

Re : Lecture d'un tableau EXCEL

Bonjour joquetino,

essaye le code ci dessous, recherche la dernière ligne ou colonne en commencant par la dernière.

'pour les lignes
For i = 1 To Range("A65536").End(xlUp).Row
Next i
'pour les colonnes
For i = 1 To Range("IV1").End(xlToLeft).Column
Next i

bon après midi
@+

 

[Gorfael]

Re : Lecture d'un tableau EXCEL

Bonjour joquetino,

essaye le code ci dessous, recherche la dernière ligne ou colonne en commencant par la dernière.

'pour les lignes
For i = 1 To Range("A65536").End(xlUp).Row
Next i
'pour les colonnes
For i = 1 To Range("IV1").End(xlToLeft).Column
Next i

bon après midi
@+

Salut à tous
Complêment :
Les formules de Pierrot93 fonctionnent bien, mais seulement si tu connaîs la ligne ou la colonne où tu veux chercher la cellule la plus loin.
Sinon, tu peux utiliser
UsedRange.SpecialCells(xlCellTypeLastCell).Row dernière ligne non-vide
UsedRange.SpecialCells(xlCellTypeLastCell).Column colonne non-vide la plus à droite
A+

 

[joquetino]

Re : Lecture d'un tableau EXCEL

Merci bcp à vous deux.

 

[Pierrot93]

Re : Lecture d'un tableau EXCEL

Re, bonjour Gorfael

oui effectivement Gorfael tu as raison, par contre pour ta solution, il me semble que lorsque l'on utilise la propriété "UsedRange", il faut préciser la feuille, comme ci dessous :

ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row

bonne fin d'après midi
@+