Discussion :

[drikse]

Bonjour je souhaiterai compter le nombre de colonne non vide j'ai essayer ca mais ca ne marche pas:

nbcolonnes = ActiveSheet.Range(Selection, Selection(xlRight)).count

[ouskel'n'or]

Essaie déjà ça et dis si ça te convient

Code :

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

1
2
3
 
    NbLignes = Range("A1").SpecialCells(xlCellTypeLastCell).Row
    nbcol = Range("A1").SpecialCells(xlCellTypeLastCell).Column

... parce que si tu as des colonne vides dans ta plage de données et que tu ne veux compter QUE les colonnes renseignées, ça ne suffit pas, faut faire aut' chose

PS - Solution gracieusement offerte par AlainTech... y'a longtemps mais on n'oublie pas
NB - Si des modifs sont effectuées dans la feuille (suppression de lignes ou de colonnes essentiellement) enregistrer le fichier avant de lancer la macro sinon, le nombre indique le nombre de lignes ou de colonnes avant suppression

[drikse]

Merci et bravo ca marche!!