Korrektes Change-Ereignis

kann mir jemand sagen, wie ich per VBA sauber die Auswahl einer Zelle nach Eingabe in einer anderen auslösen kann.
Ich weiß, daß es etwa so möglich ist:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row = 48 And Target.Column = 10 Then
ActiveSheet.Cells(48, 18).Select
End If
End Sub

Das scheint mir aber kein ganz sauberer VBA-Code zu sein. Kann mir jemand sagen, weshalb etwa:

Sub Auswählen()
If Target.Address = Range("J48") Then
ActiveSheet.Cells(48, 18).Select
End If
End Sub

nicht funktioniert??? Irgendeine Möglichkeit muß es doch geben, die Celle direkt anzuprechen anstatt über Row = x and Column = y ! - ?

Danke!

Viele Grüße

Björn