Hallo,
ich habe eine Tabelle, die zielmich lang ist. In der Spalte A habe ich immer ein Datum stehen (Format MMM.JJ) also zB "Jul. 15". Also jede Zeile ist ein Monat.
Aufgrund der Länge muss ich nach dem Start immer erst ein paar hundert Zeilen nach unten scrollen, um zum aktuellen Montat zu gelangen.
Ich wollte nun per Button, der sich in Zeile 1 befindet, immer zum aktuellen Monat springen. In einem anderen Sheet habe ich das schon gemacht, allerdings ist da die Skalierung nicht Monate, sondern Tage, also jeder Tag eine Zeile.
Code sieht da so aus:
Dim zelle
Set zelle = Worksheets("Finanzen").Columns("A:A").Find(What:=Date)
zelle.Select
Wie mache ich es, wenn ich zu einem aktuellen MONAT springen will, wie muss ich denn das aktuele Datum aufsplitten, damit ich in die aktuelle Zeile springen kann.
Hoffe, das war verständlich erklärt.
Danke
Jockel