Dernière colonne

Bonsoir,

Je suis à la recherche de le fonction me donnant le nom de la dernière colonne d'un tableau.

J'ai essayé d'utilisé la fonction me donnant le nombre de colonne de mon tableau Range("A1").SpecialCells(xlCellTypeLastCell).Column mais cela ne me donne pas le nom de la colonne directement...

Si quelqu'un pouvait m'aider...

D'avance merci

Bibi

Bonsoir

Peut-être plus simple

Sub test()
Dim Adr As String
Dim NomCol As String
  Adr = Range("A1").SpecialCells(xlCellTypeLastCell).Address(ColumnAbsolute:=False)
  NomCol = Left(Adr, InStr(1, Adr, "$") - 1)
End Sub

Merci beaucoup Banzai64 ça marche!

Rechercher des sujets similaires à "derniere colonne"