Problème de recherche de la dernière ligne

  • Initiateur de la discussion Initiateur de la discussion juju05
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

juju05

Guest
Bonjour,

Lorsque je recherche la dernière ligne d'une feuille à l'aide de ce code
Code:
derlig= Worksheets("TRI").Range("A" & Rows.Count).End(xlUp).Row
, la valeur de derlig est à 1 alors même que ma feuille n'affiche aucune donnée en ligne 1. Je ne comprends pas d'où cela peut provenir.

Merci d'avance.
Julien.
 
Re : Problème de recherche de la dernière ligne

Bonsoir,

A tout zazarrr(sans fichier!!): mets toi en A100 ou A650000 comme tu veux, et fais CTLR+flèche haut et tu verras si tu n'as aucune donnée en A tu te retrouveras en A1 ce qui est normal! .End(xlUp)= CTRL+flèche haute

A+

[Edit]Hello Pierrot🙂, Jean-Marcel(failli te loupper🙂),David🙂
 
Dernière modification par un modérateur:
Re : Problème de recherche de la dernière ligne

Bonsoir à tous

Le réponse était dans la question 😉
la valeur de derlig est à 1 alors même que ma feuille n'affiche aucune donnée en ligne 1.
derlig = dernière ligne
en ligne 1
Row en anglais veut dire ligne
Donc derlig renvoie un numéro de ligne pas la valeur contenue dans une cellule.

Je crois Julien qu'à nous cinq* on a fait le tour de la question 😉

*: Messieurs Jean-Marcel, Pierrot93, Hasco, david84, Staple1600 que je salue au passage.
(oui soyons fous je me salue moi-même)
 
Dernière édition:
Re : Problème de recherche de la dernière ligne

Bonjour juju05;
Lorsque je recherche la dernière ligne d'une feuille à l'aide de ce code
Code:
derlig= Worksheets("TRI").Range("A" & Rows.Count).End(xlUp).Row
, la valeur de derlig est à 1 alors même que ma feuille n'affiche aucune donnée en ligne 1. Je ne comprends pas d'où cela peut provenir.

Si tu veux obtenir 0 quand la colonne est vide :

Code:
Sub tt()

derlig = Worksheets("TRI").Range("A" & Rows.Count).End(xlUp).Row

If derlig = 1 And Worksheets("TRI").Range("A1").Value = "" Then derlig = 0

End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
10
Affichages
665
Réponses
3
Affichages
326
Réponses
8
Affichages
653
D
  • Question Question
Réponses
5
Affichages
250
Didierpasdoué
D
Retour