请问怎样在宏里使用change事件里的参数？

比如：
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 1 And Target.Row < 852 And Target.Column < 126 Then
r = target.row
if cells(r,2)=1 then call 宏1
end sub
怎样在宏1里使用参数r？