Hyperlink zu sich veränderndem Ziel

Question

Hallo Leute, ich hoffe das meine Vorstellung mit den Excelfunktionen machbar ist.
Obwohl Excel mein Hobby ist und ich recht ausgefuchste Tabellen bastel bin ich
hier am Ende meiner Kunst.

Ich habe mir Excel einen variablen Kalender gebaut, der einfach super ist.
Er besteht aus 5 Tabellenblättern.
Blatt 1 = die Schaltzentrale
Blatt 2 - 5 sind jeweils ein Quartal

Jede Spalte bildet einen Tag ab, also 1. Jan; 2.Jan; 3. Jan und so weiter.

Nun möchte ich in einer Zelle der Schaltzentrale (Blatt 1) einem Hyperlink anstoßen
können, der mir das entsprechende Tabellenblatt öffnet und mir zudem die Spalte
des Heutigen() Datums an einer bestimmten Position anzeigt.

Wenn z.B. Heute der 28. August ist, dann sollte die Tabelle 3. Quartal aufgehen und
den 28 August als 3. Spalte auf dem Blatt anzeigen.

Ich muß dazu sagen das ich absolut keine Ahnung von VBA habe (finde ich
hochkompliziert) und mit Makros auch nicht so befreundet bin.

Ich hoffe das das so zu machen ist und würde mich über eine tricky Formel riesig
freuen.

Beste Grüße Jürgen H.

Answer 1

Hallo Jürgen,

würde ausnahmsweise vorschlagen diese Aufgabe mittels Button zu lösen:

Private Sub CommandButton1_Click()
Dim zelle As Range
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
Set zelle = wks.Range("A1:F40").Find(Date)
If Not zelle Is Nothing Then Application.Goto zelle, True
Next wks
End Sub

Es wird in allen Tabellen der Arbeitsmappe im Bereich A1:F40 nach dem heutigen Datum gesucht (sollte deinerseits noch angepasst werden).

Gruß
Paul1

getestet mit Excel 2003