ich würde gerne beim öffnen des Tabellenblattes bei Schaltjahren die Spalte AJ automatisch einblenden wenn in der Zelle AJ3 der 29.Febr. steht.
Falls nicht dann die Spalte AJ wieder einblenden.
Meine VB Kenntnisse sind leider eher bescheiden.
Mein Ansatz:
If date(Cells(36, 3)) = "Date(29.2.(Jahr ist egal) Then
Columns("AJ").Select
Selection.EntireColumn.Hidden = True
else
Selection.EntireColumn.Hidden = True
end if
Wie setze ich das um: "Date(29.2.(Jahr ist egal) - also wenn in Zelle AJ3 der 29.2. steht?
Schon mal ganz herzlichen Dank