Trouver le numéro de colonne d'une cellule précise

[gonzague]

Salut je cherche le numero de colonne d'une cellule precise

voici mon code qui ne marche pas:

Dim plageindic As Range
Dim col, ligne As Integer
Sheets("gloss").Activate

col = Cells.Find.Column(Cells.Value = "indicateur")<---------CEST ICI
Set plageindic = Range(Cells(1, col), Cells(100, col))

For ligne = 1 To plageindic.Row.count
If Cells(ligne, col).Value = windic Then
getlabelindic_bis = Cells(ligne, col + 1).Value
Next ligne

merci

 

[michel]

bonjour gonzague

je ne suis pas sur d'avoir compris ton message
le code ci dessous renvoie le numero de colonne de la cellule active , dans la cellule A1

Range("a1") = ActiveCell.Columns.Column

bonne soirée
michel