dernière colone renseignée d'une ligne

[JOjo]

Si
L = Sheets("Sheet1").Range("A65536").End(xlUp).Row permet de connaitre la dernière ligne renseignée de la colonne A,

comment faire de même pour la connaitre la dernière colone renseignée de la ligne 1 ?

C = Sheets("Sheet1").Range("IV1").End(xlLeft).Column

 

[patrice]

Bonjour JOjo,
Ce que j'ai sous 97

' dernier colonne de ligne debut A2
derCol = Cells.Find("*", [A2], , , 2, 2).Column

' Adresse cellule ligne A2
c = Range("A2").End(xlToRight).Address
A+

 

[JOjo]

IMPECABLE Patrice.

derCol = Cells.Find("*", [A2], , , 2, 2).Column est la réponse qu'il me fallait !