Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: erster Tag im Monat

erster Tag im Monat
30.11.2005 09:21:06
Gregor
Hallo
Ich will in einer VBA Prozedur der Variable "Anfangsdatum" aus der Variable "Datum1" immer den ersten Tag des betreffenden Monats aus Datum1 zuweisen.
zB.
Anfangsdatum soll 01.11.05 sein aus Datum1 (23.11.05)
analog der Excel-Formel
=DATUM(JAHR(Datum1);MONAT(Datum1);1)
Wer kann helfen, vielen Dank
Gregor
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: erster Tag im Monat
30.11.2005 09:35:48
u_
Hallo,
=DateSerial(Year(D1),Month(D1),1)
Gruß
Geist ist geil!
AW: erster Tag im Monat
30.11.2005 09:57:01
Gregor
Hallo u_
Vielen Dank
Gregor
AW: erster Tag im Monat
30.11.2005 09:38:21
Hajo_Zi
Hallo Gregor,
Ich
Wie war eigentlich nicht die Frage, aber trotzdem.

Sub Test1()
Dim Datum1 As Date
Datum1 = "12.12.2008"
MsgBox CDate("1." & Month(Datum1) & "." & Year(Datum1))
End Sub



Anzeige
AW: erster Tag im Monat
30.11.2005 09:39:42
Dr.
Saufst Du schon morgens?
AW: erster Tag im Monat
30.11.2005 09:41:34
Hajo_Zi
Hallo Dr.
warum nur morgens, den ganzen Tag.
Lese den Beitrag es war nur die Frage wer ihm helfen kann.
Gruß Hajo
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Den ersten Tag im Monat in Excel und VBA ermitteln


Schritt-für-Schritt-Anleitung

Um den ersten Tag des Monats in Excel zu ermitteln, kannst du folgende Schritte ausführen:

  1. Excel-Formel verwenden:

    • Nutze die Formel =DATUM(JAHR(Datum1);MONAT(Datum1);1) in einer Zelle, um den ersten Tag des Monats aus einer gegebenen Datumszelle (z.B. Datum1) zu erhalten.
  2. VBA-Prozedur erstellen:

    • Öffne den VBA-Editor mit ALT + F11.
    • Füge ein neues Modul hinzu.
    • Schreibe den folgenden Code:
    Sub ErsterTagDesMonats()
       Dim Datum1 As Date
       Dim Anfangsdatum As Date
       Datum1 = "23.11.2005" ' Beispiel-Datum
       Anfangsdatum = DateSerial(Year(Datum1), Month(Datum1), 1)
       MsgBox Anfangsdatum ' Zeigt den ersten Tag des Monats
    End Sub
  3. Die Prozedur ausführen:

    • Schließe den VBA-Editor und führe die Makro-Prozedur aus, um den ersten Tag des Monats anzuzeigen.

Häufige Fehler und Lösungen

  • Fehler: Ungültiges Datum
    Lösung: Stelle sicher, dass das Datum im richtigen Format eingegeben wird, z.B. TT.MM.JJJJ.

  • Fehler: #WERT!
    Lösung: Überprüfe, ob die Datumszelle tatsächlich ein Datum enthält und nicht als Text formatiert ist.


Alternative Methoden

Wenn du die Excel-Formel oder VBA nicht verwenden möchtest, gibt es auch diese Methoden:

  • Power Query: Du kannst ein Abfrage verwenden, um das Datum zu transformieren und den ersten Tag des Monats zu extrahieren.
  • Excel-Datenanalyse-Tool: Nutze das Datenanalyse-Tool, um Datumsfunktionen anzuwenden und den ersten Tag des Monats zu extrahieren.

Praktische Beispiele

  1. Beispiel mit Excel:

    • Angenommen, in Zelle A1 steht das Datum 23.11.2005, dann kannst du in Zelle B1 die Formel =DATUM(JAHR(A1);MONAT(A1);1) eingeben, um den ersten Tag des Monats (01.11.2005) zu erhalten.
  2. Beispiel mit VBA:

    • In der oben genannten VBA-Prozedur kannst du das Datum1-Datum anpassen, um verschiedene Ergebnisse zu erhalten.

Tipps für Profis

  • Datumsformate: Achte darauf, dass deine Datumswerte im richtigen Format vorliegen, um Fehler zu vermeiden.
  • Namen definieren: Nutze definierte Namen für häufig verwendete Daten, um die Formeln leichter verständlich zu machen.
  • Automatisierung: Überlege, wie du die VBA-Prozedur automatisieren kannst, um sie für verschiedene Daten zu verwenden.

FAQ: Häufige Fragen

1. Wie kann ich den ersten Tag des Jahres in Excel ermitteln?
Du kannst die Formel =DATUM(JAHR(Datum1);1;1) verwenden, um den ersten Tag des Jahres aus einem Datum zu erhalten.

2. Wie kann ich den ersten Tag des Monats in einem anderen Jahr ermitteln?
Verwende die Formel =DATUM(JAHR(Datum1)+1;MONAT(Datum1);1), um den ersten Tag des Monats im nächsten Jahr zu erhalten.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige