Hallo,
ich habe in meinem Sheet oben einen Button mit folgenden Code:
Dim zelle
Set zelle = Worksheets("2012").Columns("A:A").Find(What:=Date)
zelle.Select
In der Spalte A in der Zelle 1 ist ein datum eingetragen und dieses 365 Zeilen nach unten gezogen.
Jede Zeile ist praktisch ein Tag.
Mit dem Code oben will ich immer zum aktuellen Tag springen. das funktioniert auch so weit.
Wie bekomme ich es hin, dass der Curser nach ausführen des Codes das richtige Datum ansteuert, aber dann nicht in die Spalte A sondern in die Spalte C der entsprechenden Zeile springt ?
Danke mal
Jockel