Numéro de ligne via une variable date

Bonjour,

Je travaille sur une petite macro (une partie d'un long code) sur laquelle je bute:

J'utilise une boucle en "for each ... in" et je veux, si la condition if est vrai, que le numéro de la ligne concernée soit enregistrée dans une variable. C'est là où je bute car je ne sais pas comment faire. J'ai tenté :

decal1 = row(rCell) mais ça me renvoie une erreur... Quelqu'un peut m'aider ?

Merci d'avance.

Voici mon code:

Sub a_MAJ_Mec_Actuelle()

Dim decal1 As Integer, rCell As Range, lastli As Integer

lastli = Workbooks("MEC 2014-03-17").Sheets("Base").Range("A1").End(xlDown).Row

For Each rCell In Workbooks("MEC 2014-03-17").Sheets("Base").Range("A3:A" & lastli)
    If rCell = Workbooks("MEC FR").Sheets("Base").Range("A6").Value Then
        decal1 = ' ligne de rcell ?
        If decal1 = "0" Then Exit Sub
        exit for
    End If
Next rCell
End Sub

Cordialement,
Conrade82