comment trouver l'index d'une cellule dans un range?

Bonjour,

Je cherche à récupérer l'index d'une cellule dans son range voyez le code.
En fait je voudrais me passer de la variable i tout simplement. Je sais que c'est faisable mais je ne vois plus comment faire.

i=1
code:
For Each cellule In Notes.Cells
    If cellule <> "" Then
        'additionne les notes des contrôles auxquels le stagiaire a participé
        'somme_note=somme_note+note_active (rapporté en note sur 20) * son coef
        somme_note = somme_note + cellule * (20 / Note_max.Cells(1, i)) * coef_note.Cells(1, i)
      
        'additionne les coefs des contrôles auxquels le stagiaire a participé
        somme_coef = somme_coef + coef_note.Cells(1, i)
    End If
   
    'incrémente l'index de selection
    i = i + 1
Next cellule

Merci d'avance

la ligne ?

Note_max.Cells(1, cellule.Row)

Merci Renfield
Mais apparement je me suis mal exprimé.

Je recherche à obtenir la colonne de cellule dans le range "notes"
exemple: notes=range("D1:G1")

donc par rapport au code
A la première boucle cellule.column=4 (colonne "D" ) alors que je recherche à extraire=1 (première colonne de "Notes")

J'ai trouvé ça:
cellule.Column - Notes.Column + 1
Ca ca marche, mais ca fait bidouille

Je sais qu'il y a une autre propriété approchante à "Notes.cellule.column", mais je ne la trouve pas.

Merci de vos conseils

la soustraction me semble bien dangereuse, en effet....
un range de cellules n'est pas forcément un rectangle.

ca peut même etre plusieurs rectangles distincts.

a voir ton cadre de travail...

la, tu parcoures toutes les cellules... tu  pourrais peut etre integrer une deuxieme boucle

une en y, pour chaque eleve
une en x, pour chaque controle