Supportnet / Forum / Tabellenkalkulation

Hallo Excelfreunde ! Gibt es hierfür eine Lösung ? Ich möchte in einer Tabelle zum aktuellen Datum springen. Die Tabelle ist folgendermaßen aufgebaut: In Spalte A bis L und Zeile 3 bis 33 steht das jeweilige Monatsdatum. Wichtig ist aber das Format in den Zellen, ich habe die Zellen mit "TT TTT" formatiert. Wenn möglich, sollte beim öffnen der Mappe das aktuelle Datum selektiert werden. Vielleicht kann mir jemand helfen. Hat jemand eine Idee ob das geht und wenn ja - Wie ? Einstweilen herzlichen Dank an alle, die sich für mich bemühen. MfG Odje

hi Odje :-)

wie gewünscht

gruss nighty

einzufuegen

alt+f11/projektexplorer/DeineArbeitsmappe

Private Sub Workbook_Open()
Dim suche As Range
Set suche = Sheets(1).Range("A1:D11").Find(CDate(Date), LookIn:=xlFormulas)
If Not suche Is Nothing Then
Sheets(1).Cells(suche.Row, suche.Column).Select
End If
End Sub

hi Odje :-)

ups dein bereich noch angepasst :-))

gruss nighty

Private Sub Workbook_Open()
Dim suche As Range
Set suche = Sheets(1).Range(Cells(3, 1), Cells(33, 12)).Find(CDate(Date), LookIn:=xlFormulas)
If Not suche Is Nothing Then
Sheets(1).Cells(suche.Row, suche.Column).Select
End If
End Sub

Hallo nighty,

für deine Hilfe besten Dank,
funktioniert tadellos.

Gruß Odje

• EXCEL-Formel?
• Wenn Datum kleiner dann...
• Datum einmalig anzeigen