Office: (Office 2013) Wenn Auswahl in Zelle zu Blatt springen

Hallo Zusammen,
in meiner Datei auf Blatt "täglicheEingaben" sind in Zelle H5-Q5-Z5 ( jede Zelle besteht aus 3 verbundenen Zellen) jeweils ein Dropdown Menue ( Datenüberprüfung-Gültigkeitskriterien-Liste).
Hier werden Namen aufgewählt. Sobald ein Name ausgewählt ist soll auf das Blatt Namen gesprungen werden.
Dazu ist zu erwähnen das die Zellen H5-Q5-Z5 für einen Tag 1 stehen.
Die nächsten Zellen wo ein Name aufgewählt wird sind dann H40-Q40-Z40
Der Abstand zum nächsten Tag sind immer 35 Zeilen.
Auf dem Blatt sind 31 Tage für einen Monat.

Kann man das per Makro lösen ?

 

anbei eine Beispieldatei.

 

Hallo,

ins Codemodul des Arbeitsblattes "täglicheEingaben" habe ich dir folgendes Makro gespeichert, das auf Zellwertänderungen in diesem Blatt reagiert, sofern sie von der Tastatur oder Maus erfolgen (Zellwertänderungen durch Formeln werden nicht beachtet):

Code:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim TZl As Long, TSp As Long
  With Target
    TZl = .Row
    TSp = .Column
  End With
  If TSp = 8 Or TSp = 17 Or TSp = 26 Then           'Spalten H,Q,Z
    If (TZl - 5) Mod 35 = 0 And TZl <= 1055 Then    'Zeilen 5,40,75,...,1055 (für Tag 1,..,31)
       With Worksheets("Namen")
         .Activate
         .Range("A20").Select                       'Sprung nach: Namen!A20
       End With
    End If
  End If
End Sub

 

Hallo Anton Exl,

herzlichen Danke für Deine Hilfe. Funktioniert super.
Bin sehr froh das es so wunderbar funktioniert.
Schönes Wochenende .