Wie prüft man in Excel, ob ein Jahr ein Schaltjahr ist?
Wissen Sie, wie man prüft, ob ein Jahr ein Schaltjahr ist? Excel bietet zwar keine direkte Funktion dafür, doch mit einer benutzerdefinierten Formel oder Funktion lässt sich das Problem elegant lösen.
Überprüfen Sie, ob ein Jahr ein Schaltjahr mit einer Formel ist
Überprüfen Sie, ob ein Jahr ein Schaltjahr mit einer benutzerdefinierten Funktion ist
Überprüfen Sie, ob ein Jahr ein Schaltjahr mit einer Formel ist
Angenommen, Sie haben eine Liste von Jahren in Ihrem Arbeitsblatt. Mit der folgenden Formel können Sie einfach prüfen, ob ein bestimmtes Jahr ein Schaltjahr ist – so geht’s:
1. Geben Sie neben den Jahreszellen in eine leere Zelle folgende Formel ein:
=IF(OR(MOD(A2,400)=0,AND(MOD(A2,4)=0,MOD(A2,100)<>0)),"[[PH_8]]", „NOT a [[PH_9]]"), ()A2enthält das Jahr, auf das Sie diese Formel anwenden möchten; Sie können es nach Bedarf ändern) siehe Screenshot:
2. Ziehen Sie anschließend das Ausfüllkästchen über den Bereich, in dem diese Formel enthalten sein soll. Anschließend wurden alle Jahre daraufhin überprüft, ob sie Schaltjahre sind oder nicht.
Hinweis: Wenn die zugehörige Zelle leer ist, zeigt die Formel ebenfalls „Schaltjahr“ an.
Überprüfen Sie, ob ein Jahr ein Schaltjahr mit einer benutzerdefinierten Funktion ist
Sie können auch eine benutzerdefinierte Funktion erstellen, um zu prüfen, ob ein Jahr ein Schaltjahr ist. Gehen Sie dazu wie folgt vor:
1. Halten Sie die Tasten ALT + F11 gedrückt – es öffnet sich das Fenster Microsoft Visual Basic for Applications.
2. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein.
VBA-Code: Überprüfen, ob ein Jahr ein Schaltjahr ist
Function IsLeapYear(pYear As Integer) As Boolean
'Update 20140623
If (pYear Mod 4) = 0 And (pYear Mod 100) <> 0 Or ((pYear Mod 400) = 0) Then
IsLeapYear = True
Else
IsLeapYear = False
End If
End Function
3. Führen Sie anschließend diesen Code aus, kehren Sie zu Ihrem Arbeitsblatt zurück und geben Sie die folgende Formel ein: =isleapyear(A2). Siehe Screenshot:
4. Ziehen Sie dann das Ausfüllkästchen auf die Zellen, in denen diese Formel enthalten sein soll. Alle Jahre wurden nun überprüft: FALSCH bedeutet, dass es kein Schaltjahr ist, und WAHR kennzeichnet ein Schaltjahr. Siehe Screenshot:
Verwandter Artikel:
Den kleinsten gemeinsamen Nenner oder größten gemeinsamen Teiler in Excel ermitteln
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins