[VB] Connaître la dernière colonne / ligne remplie d'une feuille Excel

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [VB] Connaître la dernière colonne / ligne remplie d'une feuille Excel

Beegee

Salut à tous,

je débute en VB (ça fait en gros 2h ), et je voudrais savoir la méthode la plus simple pour récupérer le numéro de colonne et de ligne tels, qu'après eux, plus rien n'est rempli dans la feuille Excel.

Je cherche donc les valeurs LigneDataFin et ColonneDataFin telles que si i > LigneDataFin et j > ColonneDataFin, la valeur de la cellule Cells(i,j) est nulle.

Voilà ce que j'ai écrit pour le moment :

Code :

'Constantes
ColonneDataDebut = 2
LigneDataDebut = 1
'Récupération de la dernière colonne de données
ColonneDataFin = ColonneDataDebut
FinTrouvee = 0
j = ColonneDataDebut
While FinTrouvee = 0
ValeurCourante = Worksheets("Data" ).Cells(LigneDataDebut,j).Value
If IsNull(ValeurCourante) Then
FinTrouvee = 1
End If
j = j + 1
Wend
ColonneDataFin = j

Quand je l'exécute dans un module, il me sort une erreur sur la ligne en bleu, disant :
'Erreur d'exécution '1004': Erreur définie par l'application ou par l'objet.'

Donc je pense qu'il y a une exception lancée, inconnue ...
Pourtant j'ai des données sur 2 lignes et 3 colonnes.

Une idée ???

Message édité par Beegee le 16-03-2004 à 23:22:24

Publicité

pierg

sur excel 2000
colonnes de A à IV ya plus qu'à compter
lignes 1 à 65536

Pierg

Beegee

J'ai peut-être mal expliqué ...

je veux pas le nombre max de lignes / colonnes, mais la dernière colonne remplie (une valeur dans la 1ère ligne), et la dernière ligne remplie (même principe).

lhonolulu

permet d'avoir la dernière ligne remplie de ma colonne A
ligne = Sheets("feuil1" ).Range("a65536" ).End(xlUp).Row

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[VB] Connaître la dernière colonne / ligne remplie d'une feuille Excel

Sujets relatifs
[MySQL] tester si une valeur est déja présente dans une colonne	Connaitre l'URL
comment faire pour lire une ligne dans un fichier avec une commande D	comment lire une ligne dans un fichier text pour l'utiliser dans
Maj d'une base SQL a aprtir d'un fichier excel	[PHP/SQL] Principe du "qui est en ligne"
La dernière version de la MSDN	[DOS] ligne de commande
[VB Excel] probleme dans textBox [RESOLU]	Signification précise d'une ligne (onChange= .... )
Plus de sujets relatifs à : [VB] Connaître la dernière colonne / ligne remplie d'une feuille Excel

Page générée en 0.040 secondes