Moin Rolf
... oder als kleine Funktion mit VBA. Eine Jahreszahl in eine Zelle, die Funktion mit Bezug dazu.
Function IsLeap(Year As Integer) As Boolean IsLeap = Day(DateSerial(Year, 2, 29)) = 29 End Function
Rückgabe ist True/False. Lässt sich universell anwenden.
Grüße
d'r Bastler von den VBAsteleien.de
58.4k Fragen
249k Antworten
7k Nutzer