VBA Code umändern

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Worksheets("Tabelle2").Range("a2").Value = ActiveCell.Value
Cancel = True
End Sub

Nun möchte ich dort wo steht "Range("a2")" das man das nicht manuell eingeben muss wo der Wert in Tabelle2 eingetragen wird (in dem Fall also "a2", sondern das dieser Wert aus einer bestimmten Zelle in Tabelle1 ausgelesen wird. Geht das irgendwie mit Target.address oder so ?

mfg der hanno