Discussion :

[mimic50]

Je possede un fichier XLS est généré par une application "externe". (fichier csv avec séparateurs
L'objectif de ma macro est de le mettre en forme pour avoir un affichage agréable.

Ce fichier a une largeur fixe (en colonnes) mais une hauteur (en lignes) variable.
J'aimerais pouvoir récupérer la hauteur en lignes de ce fichier afin de pouvoir effectuer des traitements.

J'espère avoir été clair. Merci

[ouskel'n'or]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    DernièreLigne = Range("A1").End(xlDown).Row
    DernièreLigne = Range("A65535").End(xlUp).Row
    nbcol = Range("A1").SpecialCells(xlCellTypeLastCell).Row
'si tu es dans la colonne ayant le plus grand nombre de lignes
    DernièreLigne = ActiveCell.End(xlDown).Row
'Si tu n'as aucune ligne ni colonne entièrement vides dans ta plage de données
    DernièreLigne = Selection.CurrentRegion.End(xlDown).Row
 
    DernièreColonne = Selection.CurrentRegion.End(xlToRight).Column
    DernièreColonne = ActiveCell.End(xlToRight).Column
    Set tbl = ActiveCell.CurrentRegion  'Plage de tes données
        DernièreColonne = tbl.Columns.Count 
    DernièreColonne = Range("A1").End(xlLeft).Column
    DernièreColonne = Range("A1").End(xlToRight).Column
    nbcol = Range("A1").SpecialCells(xlCellTypeLastCell).Column

Et je ne suis pas certain d'être exhaustif