Office: (Office 2019) Ausgewählte Zelle auf einen bestimmten Platz springen lassen.

Hallo mal wieder nach langer Zeit,

vorab: ja ich habe gesucht, aber ich weiß nicht, wie ich mein Problem benennen soll.
Folgendes Szenario:
Eine Anwesenheitstabelle, zehn Namen, das Ganze Jahr (also mind. 365 Spalten).
Nach den Namen und unter dem Datum sind die Zellen fixiert.
Links am Rand sind 12 Monatskürzel (also >jan25< >Feb25< >Mrz25<...usw.)

Gewollt ist: Bei anklicken des Monatskürzels, soll der erste Tag des ausgewählten Monats in der ersten Spalte nach der Fixierung erscheinen.

Was passiert: Die Zellmarkierung springt zwar auf den Monat, aber gerne auch am rechten Bildschirmrand. Sodass man manuell die ca. 30 Tage verschieben muss.

Kann mir da bitte jemand eine Lösung bieten?
Die Datei einstellen kann ich leider nicht, da es nicht meine ist.

Und leider ohne VBA, da unsere Firma keine Makros zulässt. :-(

Gruß
Lincoln

 

Hier habe ich schnell eine kleine Datei erstellt, die das veranschaulichen soll.

 

Hi,

in das Modul "Tabelle1":

Code:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub

 

Hallo Boris,

vielen Dank für den sehr gut funktionierenden Code.

Für mich privat würde ich ihn sofort nutzen. Aber meine Firma sagt "Nein".
Das müsste erst über die Bundeszentrale meiner Firma signiert, autorisiert, weitergegeben, verworfen, neu beantragt, wieder verworfen, zwei Jahre unangetastet liegen, wieder beantragt, der Großmutter zum fraß vorgeworfen und dann evtl. genehmigt werden. :-)

Ohne VBA geht's wohl nicht, oder?

Gruß
Lincoln

 

Hi,

den Scrollbereich kann man per Formel (leider) nicht beeinflussen. Also musst Du entweder damit leben oder den von Dir skizzierten "kleinen" Umweg gehen ;-)

 

'n Amnd zusammen!

Soviel dann zur Digitalisierung Deutschlands. Das Blocken von VBA ist ungefähr so sinnvoll, wie das Blocken der Blank-Wiederholung auf einer Kugelkopfmaschine.

Was Du aber vielleicht noch versuchen kannst: Benenne jeweils den letzten des Monats mit einem Namen und nutze dann die GeheZu-Funktion. Eben getestet - funzt.
Grüße