Discussion :

[BDA53]

Je souhaite faire une boucle for sur un tableau.
Il faut trouver l’indice de fin de cette boucle.
Attention, le tableau contient des lignes vides.
J’ai essayé les fonctions CurrentRegion et End (xlDown).Row .
Elles ne permettent pas d'obtenir cet indice quand il y a une ligne vide dans un tableau.
Est-ce qu’il existe une fonction similaire pouvant récupérer l’indice de fin ?

Exemple :

	A	B	C	D
1	Prénoms	Janvier	Février	Mars
2	Marcel	3	3	7
3	Louis	4	1	9
4	René	7	4	9
5	Totaux	14	8	25
6
7
8
9	Prénoms	Avril	Mai
10	Marcel	4	8
11	Louis	2	5
12	René	1	3
13	Totaux	7	16

Dans le cas présent, indice = 13

[joe.levrai]

Bonjour,

si tu n'as pas d'autres plages de données sur la feuille, tu peux utiliser UsedRange

CurrentRegion d'un objet Range : plage rectangulaire contenant le range, et délimitée par des intersections vides de lignes/colonnes
UsedRange d'un objet WorkSheet : plage rectangulaire de la feuille qui est utilisée


si tu as d'autres données, tu dois complexifier ce que tu as tenté :

- Définir la dernière ligne de la plage : en faisant un Cells(rows.count,i).end(xlup).row, où i est la colonne où tu es sûr qu'il y aura des données sur la dernière ligne
- définir la dernière colonne de la plage : si tu la connais c'est bien ... sinon tu la cherche via un cells(i,columns.count).end(xltoleft).column, où i est la ligne où tu es sûr qu'il n'y aura pas de colonnes parasites n'appartenant pas à ta plage. Attention car je pars bien du principe que ta plage commence en colonne A, sinon il faudra faire une soustraction

[DeathZarakai]

Code :

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

Range("A100000").End(xlUp).row

DeathZarakai

P.S. : Désoler j'avais pas vu la réponse, qui est bien mieux détaillé (peu le temps de répondre)

[joe.levrai]

@DeathZarakai

c'est dangereux d'écrire une ligne en dur comme ça.

Dans ton exemple : si le classeur est ouvert sur un Excel < 2007, ça va planter (limite de 65XXX lignes)

Et dans l'exemple qu'on voit souvent où les gens utilisent range("A65XXX") ... si on est sur un excel > 2007 et qui contient + de données que ce nombre de lignes, on en loupe


il faut toujours privilégier Rows.Count qui renverra bien le nombre max de ligne du classeur, en relation avec la version Excel utilisée

[DeathZarakai]

Oui j'ai appris cette méthode que je ne connaissais pas aujourd'hui et c'est vrai qu'elle est bien plus stable, je voulais juste répondre rapidement, car sans vouloir être méchant sa demande a déjà très souvent été abordé il je doute qu'il ait fait une recherche au préalable.

DeathZarakai

[BDA53]

Bonjour à tous,

Merci pour vos réponses. Le problème est résolu

[jeanmidudu]

Code :

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

fin = sheets(X).Max(Range("A"&rows.count).End(xlUp).Row,Range("B"&rows.count).End(xlUp).Row,Range("C"&rows.count).End(xlUp).Row,Range("D"&rows.count).End(xlUp).Row)