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

Datumsformat anzeigen als MM/TT/JJJJ?

Forumthread: Datumsformat anzeigen als MM/TT/JJJJ?

Datumsformat anzeigen als MM/TT/JJJJ?
23.08.2002 14:17:58
Christian
Hallo,

ich habe ein Makro, das nach einem bestimmten Datum in einer Tabelle sucht. Beim Start erscheint eine Aufforderung das Datum einzugeben. Wenn jetzt ein falsches Format gewaehlt wird soll das Makro mit einem Hinweis abbrechen.
Zusaetzlich soll das richtige Fromat angezeigt werden. Ich habe das jetzt wie folgt geloest:

MsgBox "Wrong Date Format!" & vbCr & "Example: " & Date, vbOKOnly, "Error"

Nun meine Frage: Ist es irgendwie moeglich das Format als MM/TT/JJJJ anzuzeigen?
Bei meinem Beispiel wuerde das Datum so erscheinen: 8/23/2002
Ich muesste jetzt also 8/23/2002 in MM/TT/JJJJ umwandeln.

Vielen Dank fuer jede Hilfe.

Gruss
Christian

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Datumsformat anzeigen als MM/TT/JJJJ?
23.08.2002 14:26:25
Charlie
Hallo Christian,

Du musst das "Date" entsprechend formatieren:
MsgBox "Wrong Date Format!" & vbCr & "Example: " & Format(Date, "dd.mm.yyyy"), vbOKOnly, "Error"

Viel Erfolg,
Charlie

Re: Datumsformat anzeigen als MM/TT/JJJJ?
23.08.2002 14:26:37
Gabor
Hi,

Verwende den Format-Befehl. Überprüfe mit Isdate, ob es sich um ein gültiges Datumsformat handelt.

dann Datum = Format(Date, "Long Date")

Gruß

Gabor

Anzeige
Re: Datumsformat anzeigen als MM/TT/JJJJ?
23.08.2002 14:35:51
ChristianG
Sorry, ich habe mich wohl nicht so gut ausgedrueckt.

Ich moechte aber nicht das Datum formatieren, sondern dem Benutzer anzeigen, wie er das Datum eingeben soll.

Jetzt steht in der MsgBox das aktuelle Datum: 8/23/2002
Ich moechte aber nicht das Datum anzeigen lassen sondern nur die Formatierung so wie es auch bei den Formateinstellungen zu sehen ist.

Es soll also so aehnlich aussehen:
MsgBox "Wrong Date Format!" & vbCr & "Example: MM/TT/JJJJ", vbOKOnly, "Error"

Weil die Datei aber nun auf verschiedenen Rechnern benutzt wird ist das Format immer unterschiedlich (TT/MM/JJJJ oder MM-TT-JJJJ usw.) Also soll das Macro das Format erkennen und dem Benutzer einen entsprechenden Hinweis geben.

Ich hoffe, das ist halbwegs verstaendlich. Sonst fragt mich bitte.

mfg
Christian

Anzeige
Re: Datumsformat anzeigen als MM/TT/JJJJ?
23.08.2002 16:11:28
Charlie
Hallo Christian,

folgende API-Routine liest Dir das kurze Datumsformat aus den Ländereinstellungen aus und wandelt es gleich in die deutschen Standards um:

Viel Erfolg,
Charlie

Re: Datumsformat anzeigen als MM/TT/JJJJ?
23.08.2002 17:16:57
ChristianG
Hallo Charlie,

vielen Dank, sieht sehr gut aus.

Ich werde es am Montag ausprobieren.

Schoenes Wochenende.

mfg
Christian

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Datumsformat in Excel anzeigen als MM/TT/JJJJ


Schritt-für-Schritt-Anleitung

Um das Datumsformat in Excel anzuzeigen und sicherzustellen, dass der Benutzer das Datum korrekt eingibt, kannst Du die folgenden Schritte befolgen:

  1. Öffne das Visual Basic for Applications (VBA) Editor:

    • Drücke ALT + F11.
  2. Erstelle ein neues Modul:

    • Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)", wähle "Einfügen" und dann "Modul".
  3. Füge das folgende Makro ein:

    Sub CheckDateFormat()
       Dim userInput As String
       userInput = InputBox("Bitte Datum eingeben:")
    
       If Not IsDate(userInput) Then
           MsgBox "Falsches Datumsformat!" & vbCr & "Beispiel: MM/TT/JJJJ", vbOKOnly, "Fehler"
       Else
           MsgBox "Das eingegebene Datum ist gültig.", vbOKOnly, "Erfolg"
       End If
    End Sub
  4. Schließe den VBA-Editor und kehre zu Excel zurück.

  5. Führe das Makro aus:

    • Drücke ALT + F8, wähle "CheckDateFormat" und klicke auf "Ausführen".

Häufige Fehler und Lösungen

  • Fehler: Falsches Datumsformat wird nicht erkannt:

    • Stelle sicher, dass die Eingabe als Datum formatiert ist. Verwende die IsDate-Funktion, um dies zu überprüfen.
  • Fehler: Das Datum wird in einem anderen Format angezeigt:

    • Überprüfe die Ländereinstellungen deines Computers. Diese können das Datumsformat beeinflussen (z.B. TT/MM/JJJJ vs. MM/TT/JJJJ).

Alternative Methoden

  • API-Routine nutzen: Du kannst eine API-Routine verwenden, um das kurze Datumsformat aus den Ländereinstellungen auszulesen. Dies hilft, das Datumsformat dynamisch anzupassen.

  • Format-Funktion verwenden: Um das Datum im gewünschten Format anzuzeigen, kannst Du die Format-Funktion nutzen:

    MsgBox "Beispiel: " & Format(Date, "MM/TT/JJJJ")

Praktische Beispiele

  1. Datum im Format MM/TT/JJJJ anzeigen:

    MsgBox "Heute ist: " & Format(Date, "MM/TT/JJJJ")
  2. Umwandlung von DD/MM/YYYY in MM/TT/JJJJ:

    Dim originalDate As String
    originalDate = "23/08/2002"
    MsgBox Format(DateValue(originalDate), "MM/TT/JJJJ")

Tipps für Profis

  • Verwende die Application.International()-Methode, um das aktuelle Datumsformat des Systems zu ermitteln.

  • Berücksichtige, dass das Format je nach Region unterschiedlich sein kann. Lege ein einheitliches Format fest, wenn Du mit mehreren Benutzern arbeitest.

  • Du kannst auch ein benutzerdefiniertes Format wie mmttjjjj verwenden, wenn Du das Datum ohne Trennzeichen darstellen möchtest.


FAQ: Häufige Fragen

1. Wie kann ich das Datumsformat in Excel generell ändern?
Du kannst das Datumsformat in Excel ändern, indem Du die Zelle auswählst, mit der rechten Maustaste klickst und "Zellen formatieren" wählst. Wähle dann das gewünschte Datumsformat aus.

2. Was mache ich, wenn Excel das Datum nicht korrekt erkennt?
Stelle sicher, dass das Datum im richtigen Format eingegeben wurde. Du kannst auch die Funktion Text verwenden, um das Datum in ein korrektes Format zu konvertieren.

3. Wie kann ich ein Datum von MM/TT/JJJJ in DD/MM/YYYY umwandeln?
Verwende die DateSerial-Funktion zusammen mit der Split-Funktion, um die Teile des Datums zu trennen und in das gewünschte Format zu bringen.

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