Discussion :

[grimgrim]

Bonjour,

J'utilise couramment ce code sans pbre

Code :

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

Cells(1, 1).CurrentRegion.Rows.Count

Or, là il me donne un résultat plus élevé que ce que j'ai à l'écran; J'ai essayé de faire "effacer le contenu" et encore "supprimer les lignes sans résultat

Avez vous une idée ?

Merci d'avance

[parmi]

Bonjour,

Probablement dû à d'anciennes mise en forme qui ont été effacées mais pas supprimées.

Une façon de connaître le nombre de lignes en colonne A:

Code :

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

nbLignes = Cells(Rows.Count, "A").end(xlup).row