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

Forumthread: Immer das letzte Datum des Vormonats anzeigen

Immer das letzte Datum des Vormonats anzeigen
28.08.2006 08:08:37
Thorsten
Hallo und ein schönen guten Morgen,
gibt es die Möglichkeit wenn ich in einer Zelle mit Strg und . das Datum eingebe, dass dann automatisch immer der letzte des Vormonats angezeigt wird.
Beispiel: 15.08.06 wäre dann der 31.07.06
17.12.06 wäre dann der 30.11.06
Viele herzliche Dank und eine schöne Woche
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Immer das letzte Datum des Vormonats anzeigen
28.08.2006 08:44:37
egres
Hi Thorsten
mit diesem VBA brauchst du nur die Zelle A1 anklicken dann kommt dein Ultimo-Vormat!

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Row = 1 And Target.Column = 1 Then
ActiveCell.FormulaR1C1 = "=(DATE(YEAR(TODAY()),MONTH(TODAY()),1))-1"
End If
End Sub

Gruss Egres
Anzeige
AW: Immer das letzte Datum des Vormonats anzeigen
28.08.2006 09:03:12
ingUR
Hallo, Thorsten,
Die Tastenkombination [Strg][.] wird es wohl nicht werden können, doch wenn Du auf eine andere Buchstabentaste ausweichen kannst, dann kann dir auch dieses Modul-Makro die Aufgabe erfüllen:

Option Explicit
Sub EoMonth_Makro()
Dim Datum As Date
Datum = Format(Now - Day(Now), "DD.MM.YYYY ")
ActiveCell = Datum
End Sub

Unter Extras::Makro::Option dann noch die Tastenkombination festlegen, und die Funktion steht Dir in der Arbeitmappe zum Gebrauch zu Diensten, indem sie in der aktiven Zelle auf Tastenlombinationsdruck das gewünschte Datum einträgt.
Gruß,
Uwe
Anzeige
es gibt eine Funktion
28.08.2006 08:48:14
Mike
Hallo Thorsten,
es gibt dafür auch eine Funktion MONATSENDE
Gruß
Mike René
und ohne Analyse Add-In
28.08.2006 09:11:34
c0bRa
wäre das ihr los gewesen:
="1."&MONAT(HEUTE())-1 *g*
AW: es gibt eine Funktion
28.08.2006 09:41:18
ingUR
Hallo, René und @c0bRa,
ohne weitere Bearbeitung, wird dieses Datum beim Aufruf der Mappe in einem anderen Monat auch auf ein anderes Datum aktualisieren! Es kommt auf die Anwendung an ob das gewollt ist.
Gruß,
Uwe
Anzeige
AW: Immer das letzte Datum des Vormonats anzeigen
28.08.2006 09:03:19
EtoPHG
Hallo Thorsten,
Kopiere folgendes Makro in ein Modul und weise ihm eine Kontroll-Taste zu (z.B. Strg-Umsch-L). Befindet sich in der aktiven Zelle ein Datum, so wird dieses automatisch in den letzten Tag des Vormonats umgewandelt (Achtung auch Werte von Formeln !). Andernfalls kommt nur eine Fehlermeldung und er Zellwert bleibt gleich.
Public

Sub LetzerVormonat()
If IsDate(ActiveCell.Value) Then
ActiveCell.Value = ActiveCell.Value - Day(ActiveCell.Value)
Else
MsgBox "Wert der Zelle ist kein Datum!", vbOKOnly + vbExclamation, "Letzter des Vormonats"
End If
End Sub

Gruss Hansueli
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Letztes Datum des Vormonats in Excel anzeigen


Schritt-für-Schritt-Anleitung

Um in Excel das letzte Datum des Vormonats automatisch anzuzeigen, kannst du verschiedene Methoden verwenden. Hier sind die Schritte, um eine Excel-Formel oder ein VBA-Makro zu nutzen:

1. Excel-Formel verwenden:

  • Wähle die Zelle aus, in der das Datum angezeigt werden soll.
  • Verwende die folgende Formel:
     =EOMONTH(HEUTE(), -1)
  • Diese Formel verwendet die Funktion EOMONTH, um den letzten Tag des Vormonats zu ermitteln.

2. VBA-Makro verwenden:

  • Öffne den Visual Basic for Applications (VBA)-Editor (Alt + F11).
  • Füge ein neues Modul hinzu und kopiere den folgenden Code:
     Sub LetzterVormonat()
         If IsDate(ActiveCell.Value) Then
             ActiveCell.Value = ActiveCell.Value - Day(ActiveCell.Value)
         Else
             MsgBox "Wert der Zelle ist kein Datum!", vbOKOnly + vbExclamation, "Letzter des Vormonats"
         End If
     End Sub
  • Weisen dem Makro eine Tastenkombination zu, um es schnell nutzen zu können.

Häufige Fehler und Lösungen

  • Formel zeigt falsches Datum an:

    • Stelle sicher, dass die Zelle mit der Formel nicht formatiert ist, um Datum anzuzeigen. Ändere das Zellenformat auf Datum.
  • VBA-Makro funktioniert nicht:

    • Prüfe, ob das Makro korrekt in ein Modul eingefügt wurde und dass die aktive Zelle tatsächlich ein Datum enthält.
  • Fehlermeldung "Wert der Zelle ist kein Datum":

    • Achte darauf, dass du in einer Zelle arbeitest, die ein gültiges Datum enthält, bevor du das Makro ausführst.

Alternative Methoden

Wenn du keine VBA-Makros verwenden möchtest, gibt es auch einfache Excel-Formeln:

  • Verwendung von MONATSENDE:

    =MONATSENDE(HEUTE(); -2) + 1

    Diese Formel gibt dir den ersten Tag des aktuellen Monats zurück. Um den letzten Tag des Vormonats zu erhalten, kannst du einfach -1 anstelle von -2 verwenden.

  • Manuelle Berechnung: Erstelle eine Zelle mit dem aktuellen Datum und ziehe die Anzahl der Tage des aktuellen Monats ab.


Praktische Beispiele

Hier sind einige Beispiele zur Anwendung:

  • Beispiel 1: Wenn du das Datum des letzten Tages im Vormonat für den 15. August 2023 benötigst, gibt die Formel =EOMONTH(DATUM(2023,8,15), -1) den Wert 31.07.2023 zurück.

  • Beispiel 2: Mit dem VBA-Makro kannst du das Datum in der aktiven Zelle schnell ändern. Wenn du in der Zelle das Datum 17.12.2023 hast und das Makro ausführst, wird die Zelle auf 30.11.2023 aktualisiert.


Tipps für Profis

  • Automatisierung: Lege das VBA-Makro so fest, dass es automatisch beim Öffnen der Datei ausgeführt wird, um sicherzustellen, dass du immer das aktuelle Datum des Vormonats hast.

  • Schnellzugriff: Weisen eine Tastenkombination zu, um schnell zwischen den Funktionen zu wechseln, ohne jedes Mal die Menüs durchblättern zu müssen.

  • Datenvalidierung: Verwende Datenvalidierungsregeln, um sicherzustellen, dass nur gültige Datumswerte eingegeben werden, bevor du das Makro ausführst.


FAQ: Häufige Fragen

1. Wie kann ich das letzte Datum des Vormonats ohne VBA anzeigen? Du kannst die Formel =EOMONTH(HEUTE(), -1) verwenden, um das letzte Datum des Vormonats in Excel anzuzeigen.

2. Funktioniert das auch in Excel Online? Ja, die oben genannten Excel-Formeln funktionieren auch in Excel Online, jedoch sind VBA-Makros nicht verfügbar.

3. Was passiert, wenn ich ein Datum eingebe, das nicht im richtigen Format ist? Das VBA-Makro wird eine Fehlermeldung anzeigen, wenn der Inhalt der aktiven Zelle kein gültiges Datum ist.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige