figer la référence d'une cellule

Bonjour le forum, voici le code suivant:

Sub Macro5()
Dim ligne As Range

Workbooks("Classeur2.xls").Activate
Worksheets("Feuil2").Activate
Application.ScreenUpdating = False
For Each ligne In Workbooks("Classeur2.xls").Worksheets("Feuil2").Columns(2).Cells
If Not IsEmpty(ligne) Then
Range("C" & ligne.Row).FormulaR1C1 = "=Feuil1!R1C1*RC[-1]"
End If
Next
Application.ScreenUpdating = True
End Sub

J'aimerais juste figer la référence d'une cellule, celle qui est représentée par Feuil1!R1C1. Mais je ne sais pas comment faire étant donné que les $ ne marchent pas.

Quelqu'un a t-il la soluce?

Merci