Thema: wenn ich Blatt 1 auswählen dann zu Zelle D4

Guten Morgen in die Runde :-),
Habe mal ne Frage: Ich habe 12 Blätter in einer AM. Ich möchte, wenn ich im unteren Reiter von Blatt zu Blatt wechsle, das ich dann in Zelle D4 mit der Eingabe beginnen kann?!.
Habe es mit einer Makroaufzeichnung versucht (Start - Blatt1 D4 - Ende) versucht, ohne Erfolg.
Hat jemand eine Idee?
PS.: Habe das Makro in den Code des Blattes als Sub kopiert!
Güße,
SiggiP

Moin
Code in den Code DieseArbeitsmappe

Private Sub Workbook_SheetActivate(ByVal SH As Object)

  SH.Range("D4").Select

End Sub

gruss hary

Hier etwas kürzer:

Private Sub Workbook_SheetActivate(ByVal SH As Object)

  [D4].Select

End Sub

hary, vielen Dank.

Gruß,
SiggiP