Thema Datum  Von Nutzer Rating
Antwort
10.04.2014 16:09:27 alex
NotSolved
Blau Jahrestag Ausgabe
 10.04.2014 18:03:14 Gast32343
NotSolved
10.04.2014 19:45:32 Gast32343
NotSolved
10.04.2014 19:54:20 Gast32343
NotSolved
10.04.2014 20:55:09 Gast68682
NotSolved
10.04.2014 22:23:33 Gast42501
NotSolved
10.04.2014 18:56:11 gabi
NotSolved
13.04.2014 09:29:47 Holger
NotSolved

Ansicht des Beitrags:
Von:
Gast32343		 Datum:
10.04.2014 18:03:14		 Views:
933		 Rating:
     
Antwort:
  Ja
Thema:
Jahrestag Ausgabe

Also ganz einfach ginge es so:

  Dim dtm1 As Date
  Dim dtm2 As Date
  
  dtm1 = DateSerial(Year(Date), 1, 1)
  dtm2 = DateSerial(Year(Date), 2, 29) '> Achtung: 2014 ist kein Schaltjahr
                                       '  daher gibt es den 29.02.2014 nicht...
                                       '> Die Funktion macht daraus autom.
                                       '  den 01.03.2014
  
  Debug.Print "Der " & dtm2 & " ist der " & (DateDiff("d", dtm1, dtm2) + 1) & ". Tag im Jahr"

Frage ist hier nur, ob die Funktion DateDiff erlaubt ist.

 

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
10.04.2014 16:09:27 alex
NotSolved
Blau Jahrestag Ausgabe
 10.04.2014 18:03:14 Gast32343
NotSolved
10.04.2014 19:45:32 Gast32343
NotSolved
10.04.2014 19:54:20 Gast32343
NotSolved
10.04.2014 20:55:09 Gast68682
NotSolved
10.04.2014 22:23:33 Gast42501
NotSolved
10.04.2014 18:56:11 gabi
NotSolved
13.04.2014 09:29:47 Holger
NotSolved