Registriert seit: 01.05.2026
Version(en): Microsoft® Excel® für Microsoft 365 MSO (Version 2604 Build 16.0.19929.20086) 64 Bit
Hallo alle zusammen.
Danke für die schnelle Aufnahme im Forum .
Ich habe mal eine Frage.
Ich habe einen Kalender gebastelt der auch sehr gut funktioniert.
Aber ich möchte es so haben das wenn ich den Kalender öffne das heutige Datum und Ereignisse in der ersten Reihe stehen , weil es ja sonst immer weiter nach unten wandert .
Im Moment lösche ich die vergangenen Ereignisse einfach .
Nur da kann ich auch nicht zurückschauen .
Vielleicht hat ja jemand einen Tipp für mich ?
Wünsche Euch noch einen schönen sonnigen 1. Mai
Kalender Test.xlsx (Größe: 20,25 KB / Downloads: 20)
Registriert seit: 11.04.2014
Version(en): Office 365
Hallo Wolfgang,
darf es eine Lösung mit VBA (Makro) sein?
Viele Grüße
Klaus-Dieter
Der Erfolg hat viele Väter,
der Misserfolg ist ein Waisenkind
Richard Cobden
Registriert seit: 12.10.2014
Version(en): 365 Insider (64 Bit)
Moin!
Das Einfachste dürfte sein, nach dem Datum zu suchen.
Strg+f
Suchen nach 25.09.2026
(Das Datum muss im Format TT.MM.JJJJ eingegeben werden!)
Enter scrollt zum Datum.
Automatisch geht es nur mittels VBA.
In DieseArbeitsmappe:
Code:
Private Sub Workbook_Open()
With Tabelle1
.Activate
ActiveWindow.ScrollRow = .Range("C:C").Find(Date, , xlFormulas).Row
End With
End Sub
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 15.04.2018
Version(en): 2013
Hi
Den Sprung zum aktuellen Datum kannst du auch ohne VBA erstellen.
Schreibe diese Formel in eine freie Zelle der ersten Zeile und du bekommst einen Link, den du anklicken kannst.
PHP-Code:
=Hyperlink("#C"&Vergleich(heute();C:C;0);"Gehe zu heute")
Gruß Daniel
Registriert seit: 13.04.2014
Version(en): 365
01.05.2026, 13:25
(Dieser Beitrag wurde zuletzt bearbeitet: 01.05.2026, 13:25 von BoskoBiati.)
Hi,
mit den Möglichkeiten Deiner Excel-Version würde ich das Ganze sowieso etwas anders gestalten:
verbesserte Version!
Kalender_Test.xlsx (Größe: 32,15 KB / Downloads: 17)
Mit Klick auf Tag scrollst Du zum heutigen Datum.
Gruß
Edgar
Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
Registriert seit: 01.05.2026
Version(en): Microsoft® Excel® für Microsoft 365 MSO (Version 2604 Build 16.0.19929.20086) 64 Bit
Hallo Dieter .
Gerne in VBA ich probier das dann mal aus .
Registriert seit: 12.10.2014
Version(en): 365 Insider (64 Bit)
Nun, VBA-Code hast Du ja von mir erhalten.
Besser sind aber die Vorschläge mit =HYPERLINK()
Einziger Nachteil:
Sie scrollen nicht bis direkt unter die fixierte Zeile 1
Dies macht mein ActiveWindow.ScrollRow
Wer ist eigentlich Dieter?
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
Hi Ralf,
(01.05.2026, 16:07)RPP63 schrieb: Wer ist eigentlich Dieter?
Der Klaus.
Gruß, Uwe
Registriert seit: 01.05.2026
Version(en): Microsoft® Excel® für Microsoft 365 MSO (Version 2604 Build 16.0.19929.20086) 64 Bit
Das stimmt . Halt mein Alter geschuldet 😂
Registriert seit: 22.10.2022
Version(en): 2024
Hallo,
habe mal deinen Kalender etwas angepasst.
Aktuelle Kalenderwoche wird immer am Montag angezeigt.
Das Heutige Datum steht immer oben.
Die Feiertage werden aus dem Arbeitsblatt "Feiertage" gezogen.
Mit "Datum manuell suchen" kannst du ein bestimmtes Datum eingeben.
Der Kalender wird dann ab diesem Datum angezeigt.
MfG Günter
Kalender Test_2.xlsx (Größe: 39,69 KB / Downloads: 11)
Win 11, Office LTSC Professional Plus 2024
Wenn Thema gelöst, dann bitte kennzeichnen.
Wer aufgibt, hat schon verloren.