Compter le nombre de ligne

Bonjour,

J'ai une macro qui en appelle plusieurs (Call BASE ; Call Awaiting_for ; ...)

Le code ci-dessous récupère le nombre de ligne dans mon fichier et je souhaiterais rajouter si possible, un code pour dire si vide passer à la suivante

'Récupération du nombre de ligne du fichier
Dim NbLignes As Integer
Sheets("BASE").Select
NbLignes = Range("A1").End(xlDown).Row

Merci d'avance pour votre aide

Bonjour,

si tu veux la dernière ligne remplie c'est plutôt :
NbLignes = Cells(rows.count,1).End(xlUp).Row
+1 si tu veux la suivante vide
eric