Problème définition dernière ligne
Résolu
Kuartz
Messages postés
852
Date d'inscription
Statut
Membre
Dernière intervention
-
Kuartz Messages postés 852 Date d'inscription Statut Membre Dernière intervention -
Kuartz Messages postés 852 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Comme d'habitude, j'utilise la ligne suivante pour déterminer ma dernière ligne :
Ma macro ne marchant pas, je me pose la question de cette définition de dernière ligne.
Je fais donc une nouvelle macro :
Ce qui me retourne la valeur 4988.
Je ne comprend pas, cette cellule est vide, alors je fais une nouvelle macro :
Ce qui me retourne rien du tout dans la MsgBox.
Je suis coincé. Une idée?
Le fichier : https://www.transfernow.net/?utm_source=partagefichierscom&utm_medium=download
Edit : Il semble que le problème soit la table "Tableau3". Comment trouver la dernière cellule non vide de cette table?
Comme d'habitude, j'utilise la ligne suivante pour déterminer ma dernière ligne :
DL = Cells(Application.Rows.Count, 1).End(xlUp).Row
Ma macro ne marchant pas, je me pose la question de cette définition de dernière ligne.
Je fais donc une nouvelle macro :
Sub TEST() DL = Cells(Application.Rows.Count, 1).End(xlUp).Row MsgBox(DL) End Sub
Ce qui me retourne la valeur 4988.
Je ne comprend pas, cette cellule est vide, alors je fais une nouvelle macro :
Sub TEST()
MsgBox(Range("A4988").Value)
End Sub
Ce qui me retourne rien du tout dans la MsgBox.
Je suis coincé. Une idée?
Le fichier : https://www.transfernow.net/?utm_source=partagefichierscom&utm_medium=download
Edit : Il semble que le problème soit la table "Tableau3". Comment trouver la dernière cellule non vide de cette table?
1 réponse
-
Bonjour,
Il semble que le problème soit la table "Tableau3".
En effet.
Comment trouver la dernière cellule non vide de cette table?
Comme ceci :
DL = Cells(Application.Rows.Count, 1).End(xlUp).Row DL = Cells(DL, 1).End(xlUp).Row
De cette manière, tu restes toujours dynamique, même si ton tableau grossit...