Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
932to936
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
932to936
932to936
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

ersten Tag des Jahres per VBA

ersten Tag des Jahres per VBA
14.12.2007 15:03:00
otto
Hi,
wie kann ich den ersten Tag des aktuellen Jahres per VBA ermitteln und feststellen wie viele Tage bis heute vergangen sind?
gruß
otto

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
mit Funktion so...
14.12.2007 15:27:00
selli
hallo otto,
mit einer Formel kannst du das doch ganz einfach lösen
=HEUTE()-DATUM(TEXT(HEUTE();"JJJJ");1;1) die zelle als zahl formatieren und fertig.
gruß selli

AW: mit Funktion so...
14.12.2007 15:30:00
Mag
Hi,
Option Explicit

Sub ttt()
MsgBox Format("01.01.2007", "ddd")
MsgBox DateDiff("d", "01.01.2007", Date)
End Sub


Gruss

AW: mit Funktion so...
14.12.2007 15:32:00
Marek
Selli, bei deiner Formel krieg ich den 12.12.1900!?
Wenn eine Formel reicht, dann versuchs es damit Otto:
=DATUM(JAHR(HEUTE());1;1)
MfG
Marek

AW: mit Funktion so...
14.12.2007 15:33:42
Marek
sorry, ist schon spät, bitte löschen!

Anzeige
AW: ersten Tag des Jahres per VBA
14.12.2007 15:38:16
Peter
Hallo Otto,
das könnte z. B. so aussehen:

Public Sub Informationen()
MsgBox "Der erste Tag im Jahr ist/war ein  """ & _
Format(DateSerial(Year(Date), 1, 1), "dddd") & """."
MsgBox "der laufende Tag im Jahr ist " & Date - DateSerial(Year(Date), 1, 0)
End Sub


Gruß Peter

151 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige