Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 11:26:57
Probleme mit tbl.Listrows.add
23.04.2024 10:55:14
Zeilen sortieren
23.04.2024 10:23:52
Tabelle 90° drehen + Filteroptionen
23.04.2024 10:11:03
Dateiname plus Wenn vorhanden dann "(1)" anhängen.
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
580to584
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
580to584
580to584
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datum von Ostern berechnen

Datum von Ostern berechnen
07.03.2005 18:42:27
Ostern
Hallo
Ich habe eine Kalendervorlage erstellt. Man gibt das Jahr ein und der Kalender wird aufgebaut. Neben den farblich hervorgehobenen Wochenenden und festen Feiertagen soll er auch Ostern anzeigen.
Wer weiß, wie man das Datum der Osterfeiertage berechnet?
Ostern ist immer das Wochenende nach dem 1. Vollmond nach Frühlingsanfang!
Sonnige Grüße
Stevie

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum von Ostern berechnen
07.03.2005 18:58:31
Ostern
Danke für die prompte Antwort, werd es gleich einpflegen!!!
Einen schönen Abend noch!
Stevie
AW: Datum von Ostern berechnen
07.03.2005 20:21:46
Ostern
Hallo
oder als Alternative
 
  
 ABC
1200411.04.2004 
2   
Formeln der Tabelle
B1 : =easterdate(A1)


 
 Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  

Und den Code in ein Modul deiner Arbeitsmappe:

Option Explicit

Function EasterDate(Yr As Integer) As Date
Dim d As Integer
d = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21
EasterDate = DateSerial(Yr, 3, 1) + d + (d > 48) + 6 - ((Yr + Yr \ 4 + d + (d > 48) + 1) Mod 7)
End Function


Gruss Rainer

                    


                    


    
Anzeige

    

        
                    
            
                
    



            


    
    


            
    
    
    
                    


    
    
    
    
    
    
            


    

        
        Beliebteste Forumthreads (12 Monate)
    

    
    

 

    
    
    


    
Anzeige

    

        
                    
                
    




    
    

    

        

            

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

            

                

                
            

        

    




    
    

    
    
            
 

            
            

                
                
                                    

                        


    

        
        Beliebteste Forumthreads (12 Monate)
    

    
    

 

                    

                                


    
Anzeige

    

        
                    
            
                
    



                


    
Anzeige

    

        
                    
            
                
    



                


    
Anzeige