Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1556to1560
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Jahreskalender

Jahreskalender
08.05.2017 20:53:35
Gerda
Hallo,
ich habe einen dynamischen Jahreskalender erstellt, in dem die Feiertage, Wochenenden und das aktuelle Tagesdatum farbig markiert werden. Wenn ich in Zelle A1 2016, 2017, 2019 und 2010 eintrage, sind die Daten auch richtig, bei 2018 allerdings nicht.
Kan mir jemand sagen, wo der Fehler ist?
Danke im Voraus!
Gerda
https://www.herber.de/bbs/user/113419.xlsx

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Jahreskalender
08.05.2017 21:02:22
SF
Hola,
warum verwendest du 1904-Datumswerte?
Gruß,
steve1da
AW: Jahreskalender
09.05.2017 07:20:03
firmus
Hallo Gerda,
ich habe die Datumsreferenz auf 1.1.1900 gesetzt (für nicht-MAC passend).
Dann habe ich eine Osterformel (irgendwann im Netz gefunden und mehrfach getestet) angewandt.
Dabei sind mehrere Deiner Ostersonntage falsch. Richtige Werte sind:
2012 08-04-2012
2013 31-03-2016
2014 20-04-2014
2015 05-04-2015
2016 27-03-2016
2017 16-04-2017
Die angewandte Osterformel ist: 
Public Function Ostern(OsternYr As Integer)
'Funktion für die Feiertagsberechnung, aus dem Netz
Dim Osternd As Integer
Osternd = (((255 - 11 * (OsternYr Mod 19)) - 21) Mod 30) + 21
Ostern = DateSerial(OsternYr, 3, 1) + Osternd + (Osternd > 48) + _
6 - ((OsternYr + OsternYr \ 4 + Osternd + (Osternd > 48) + 1) Mod 7)
End Function
Die Berechnung kann ich leider astronomisch nicht exakt nachvollziehen, dazu habe ich zu wenig Kenntnisse bzgl. Umlaufzeiten und Schnittpunkte (1. Vollmond .....) usw.
Gruss,
Firmus
Anzeige
AW: Jahreskalender
09.05.2017 19:59:11
Gerda
Hallo Steve,
in den erweiterten Excel-Optionen ist kein Haken gesetzt bei "1904-Datumswerte verweden". Kann man das auch noch an anderer Stelle einrichten?
Gruß
Gerda
AW: Jahreskalender
09.05.2017 20:02:28
Gerda
Hallo Firmus,
da ich leider kein VBA beherrsche, kann ich deine Formel auch nicht anwenden. Trotzdem danke für deine Mühe!
Gruß
Gerda
AW: Jahreskalender
09.05.2017 20:04:31
Gerda
Hallo Firmus,
da ich leider kein VBA beherrsche, kann ich deine Formel auch nicht anwenden. Trotzdem danke für deine Mühe!
Gruß
Gerda
AW: Jahreskalender
09.05.2017 20:07:28
Gerda
Hallo Steve,
in den erweiterten Excel-Optionen ist kein Haken gesetzt bei "1904-Datumswerte verweden". Kann man das auch noch an anderer Stelle einrichten?
Gruß
Gerda
Anzeige
AW: Jahreskalender
09.05.2017 20:12:09
Gerda
Hallo Steve,
in den erweiterten Excel-Optionen ist kein Haken gesetzt bei "1904-Datumswerte verweden". Kann man das auch noch an anderer Stelle einrichten?
Gruß
Gerda
AW: Option "1904-Datumswerte" ....
11.05.2017 20:13:56
...
Hallo Gerda,
... diese ist Deiner Datei aber ganz offensichtlich mit zugeordnet. Deaktiviere diese.
Dann nimm auch noch die korrekte Kurzform der Ostersonntag-Formel die da wäre:
=RUNDEN((TAG(MINUTE(A1/38)/2+55)&".4."&A1)/7;)*7-6
Diese und andere Formeln (nicht "Deine"!) von hier: http://excelformeln.de/formeln.html?welcher=3
Gruß Werner
.. , - ...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige