Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Beispiele zu Datum
zurück: COM-AddIn Code Commander weiter: Codeschnipsel dieses Forums in Form von Beispiel DBs Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Tutorial Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
lothi
c#, .Net


Verfasst am:
02. März 2006, 17:52
Rufname:
Wohnort: Birgisch

Beispiele zu Datum - Beispiele zu Datum

Nach oben
       

Hallo zusammen

Hier ein paar Beispiel zu Funktionen und Berechnungen mit dem Datum:

WasAbfrage/FormularVBA/SQL
Erster Tag im Jahr
Code:
DatSeriell(Format(Jetzt();"jjjj");1;1)
Code:
DateSerial(Format(Now(),"yyyy"),1,1)
Letzter Tag im Jahr
Code:
DatSeriell(Format(Jetzt();"jjj");12;31)
Code:
DateSerial(Format(Now(),"yyyy"),12,31)
Erster Tag im Monat
Code:
DatSeriell(Jahr(Jetzt());Monat(Jetzt());1)
Code:
DateSerial(Year(Now()),Month(Now()),1)
Letzter Tag im Monat
Code:
DatSeriell(Jahr(Jetzt());Monat(Jetzt())+1;0)
Code:
DateSerial(Year(Now()),Month(Now())+1,0)
Tage bis Monatsende
Code:
DatDiff("t";Jetzt();DatSeriell(Jahr(Jetzt());Monat(Jetzt())+1;1)-1)
Code:
DateDiff("d",Now(),DateSerial(Year(Now()),Month(Now())+1,1)-1)
Tage bis Jahresende
Code:
DatDiff("t";Jetzt();DatSeriell(Jahr(Jetzt());12;31)-1)
Code:
DateDiff("d",Now(),DateSerial(Year(Now()),21,31)-1)
Erster Tag der Woche
Code:
Format(Jetzt()-Wochentag(Jetzt();0)+1;"tt\.mm\.jjj")
Code:
Format(Now()-Weekday(Now(),0)+1,"dd\.mm\.yyyy")
Letzter Tag der Woche
Code:
Format(Jetzt()-Wochentag(Jetzt();0)+7;"tt\.mm\.jjj")
Code:
Format(Now()-Weekday(Now(),0)+7,"dd\.mm\.yyyy")


Die Formeln werden alle in einer Linie ohne Leerzeichen geschrieben.

Alter ermitteln: (DonKarl)

In Abfragen:
Code:
DatDiff("jjjj";[GebDat];jetzt())+(Format(Jetzt();"mmtt")<(Format(([GebDat];"mmtt")))

In VBA/SQL
Code:
DateDiff("yyyy",[GebDat],Now())+(Format(Jetzt(),"mmdd")<(Format(([GebDat],"mmdd")))



Schaltjahr ermitteln:
Code:
Function fcSchaltjar(iJahr As Integer) As Boolean
    fcSchaltjahr = (iJahr Mod 4 = 0 And (iJahr Mod 100 <> 0 Or _
                                         iJahr Mod 400 = 0))
'Mod = Gibt den Rest einer ganzzahligen Division zweier Zahlen zurück.
End Function



Kriterum in Abfrage +5 und -5 von Heute an

Abfrage Kriterium
Code:
Zwischen DatAdd ("t";Datum();-5 Und DatAdd("t";Datum();5)

In SQL
Code:
WHERE BETWEEN DateAdd('d',Date(),-5 AND DateAdd('d',Date(),5)

_________________
Gruss Lothi, der Bastler
Feedback ist die beste Möglichkeit mir zu sagen ob die Antwort geholfen hat!
AC2002, WinXP, Office XP


Zuletzt bearbeitet von lothi am 03. März 2006, 10:31, insgesamt einmal bearbeitet
Willi Wipp
Moderator


Verfasst am:
03. März 2006, 10:20
Rufname:
Wohnort: Raum Wiesbaden

Re: Beispiele zu Datum - Re: Beispiele zu Datum

Nach oben
       

Hi lothi, und wieder ein schoenes Beispiel Wink
{Dieser Beitrag nimmt das Thema aus den unbeantworteten Themen heraus}
derArb
getting better


Verfasst am:
22. Sep 2006, 22:41
Rufname: derArb
Wohnort: Berlin


Übersicht Datumsformate mit Timer in Textfeldern - Übersicht Datumsformate mit Timer in Textfeldern

Nach oben
       Version: Office 2k (2000)

hallo,

kleine DB mit Timer und folgenden Datums/Uhrzeit Funktionen, welche man z.B. in Textfeldern verwenden kann.
Code:
Now
Left(Now, 10)
Right(Now, 8)
Date
Time
Month(Date)
MonthName(Month(Date), False) 'True
Day(Date)
WeekdayName(Weekday(Date), True) 'False
hour(Time)
Minute(Time)
Second(Time)
AW: immer wieder gefragte Datumsfunktionen für z.B. Textfelder plus Timer (DatumUndZeitMitTimer.zip)

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Datum in Tabelle bzw. Abfrage umsetzen 3 Wolfe 721 14. Feb 2005, 17:52
Pino Datum in Tabelle bzw. Abfrage umsetzen
Keine neuen Beiträge Access Tabellen & Abfragen: SQL-String mit Datum .... !? 2 DoMe 1128 07. Feb 2005, 14:03
DoMe SQL-String mit Datum .... !?
Keine neuen Beiträge Access Tabellen & Abfragen: Berechnung in Abhängigkeit vom Datum 1 Christian22 1004 03. Feb 2005, 14:00
lothi Berechnung in Abhängigkeit vom Datum
Keine neuen Beiträge Access Tabellen & Abfragen: Datum im Formularkopf 6 didide 821 06. Jan 2005, 17:19
lothi Datum im Formularkopf
Keine neuen Beiträge Access Tabellen & Abfragen: in einer Wenn dann Funktion aufs Datum gruppieren 10 Gast 691 06. Jan 2005, 10:22
Skogafoss in einer Wenn dann Funktion aufs Datum gruppieren
Keine neuen Beiträge Access Tabellen & Abfragen: Datum und Uhrzeit automatisch speichern 3 peinberger 1119 30. Dez 2004, 10:33
mapet Datum und Uhrzeit automatisch speichern
Keine neuen Beiträge Access Tabellen & Abfragen: Alter auf Basis akt. Datum ausrechnen 2 jomei 1634 22. Dez 2004, 09:15
jomei Alter auf Basis akt. Datum ausrechnen
Keine neuen Beiträge Access Tabellen & Abfragen: Access Abfrage mit größer als Parameter Datum 2 Terrific 14868 06. Dez 2004, 19:46
Gast Access Abfrage mit  größer als Parameter Datum
Keine neuen Beiträge Access Tabellen & Abfragen: Datum konvertieren 2 pad8626 1236 03. Dez 2004, 16:25
pad8626 Datum konvertieren
Keine neuen Beiträge Access Tabellen & Abfragen: Accessdaten Datum in Englischer Form in Serienbrief von Word 1 Hajo 1127 24. Nov 2004, 11:49
Gast Accessdaten Datum in Englischer Form in Serienbrief von Word
Keine neuen Beiträge Access Tabellen & Abfragen: 3. ältestes Datum 3 shaaree 793 27. Sep 2004, 11:03
Skogafoss 3. ältestes Datum
Keine neuen Beiträge Access Tabellen & Abfragen: Datum in Zahl umwandeln 2 Lorenz 1017 01. Sep 2004, 18:45
Lorenz Datum in Zahl umwandeln
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks