Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Datum aus Textbox in Zelle schreiben

Datum aus Textbox in Zelle schreiben
20.11.2018 18:16:36
Jonathan
Hallo zusammen, ich habe ein kleines Problem mit dem schreiben eines Datums (01.01.2018 zB) in eine Zelle. Ich schreibe dieses formatiert Cells(1,1).value = Format(TextBox1.Value, "dd.mm.yyyy") - allerding swird dieses in der Zelle als Text und nicht als Datum formatiert eingetragen (obwohl die Zelleselbst als Datum formatiert ist).
Wie kann ich das Datum korrekt schreiben und gibt es eine Standard-Funktion, die die Eingabe in der Textbox auf Gültigkeit prüft?
danke Euch!
LG, J
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Datum aus Textbox in Zelle schreiben
20.11.2018 18:21:51
Daniel
Hi
du hast das Prinzip der Funktion Format noch nicht verstanden.
Format ist dazu da, eine Zahl oder ein Datum (welches auch eine Zahl ist), in einen Text umzuwandeln.
du möchstest aber den Text aus der TextBox in ein Datum wandeln, um dieses dann in die Zelle schreiben zu können, also genau die umgekehrte Aufgabe.
um einen Text in ein Datum zu wandeln, nimmt man die Funktion CDate:
Cells(1, 1).Value = CDate(Textbox1.Text)
Gruß Daniel
Anzeige
AW: Datum aus Textbox in Zelle schreiben
20.11.2018 20:45:29
Jonathan
Hi Daniel,
danke für deine Antwort. Mit CDate wandelt mir Excel das Format um, aus 20.11.2018 wird in der Zelle 11.20.2018... eine Kombination mit CDate und Format klappt auch nicht, da wird mir der Fehler "Typen unverträglich" ausgespuckt...
Habe alles, was mir einfiel probiert, ledier ohne Erfolg...
Danke für die Hilfe!
Anzeige
= Format(cdate(TextBox1.Value,) "dd.mm.yyyy")
20.11.2018 21:36:13
Matthias
Hallo
Probiers mal so: (nicht getestet)
Cells(1, 1).Value = Format(CDate(TextBox1.Value,) "dd/mm/yyyy")
Gruß Matthias
anders rum ...
20.11.2018 21:42:33
Matthias
Hallo
jetzt getestet.
Cells(1, 1) = CDate(Format(TextBox1, "DD/MM/YYYY"))
Gruß Matthias
Anzeige
AW: anders rum ...
21.11.2018 00:29:47
Jonathan
Super, vielen Dank!
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Datum aus Textbox in Zelle schreiben


Schritt-für-Schritt-Anleitung

Um ein Datum aus einer Textbox in eine Excel-Zelle zu schreiben, kannst du die folgende Vorgehensweise verwenden. Dies geschieht mithilfe von VBA (Visual Basic for Applications). Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne dein Excel-Dokument und aktiviere den Entwicklermodus.

  2. Füge ein Textfeld (Textbox) in dein Arbeitsblatt ein.

  3. Gehe in den VBA-Editor (Alt + F11).

  4. Erstelle ein neues Modul oder verwende ein bestehendes.

  5. Füge den folgenden Code in das Modul ein:

    Sub SchreibeDatumInZelle()
       Dim eingegebenesDatum As Date
       On Error GoTo Fehlerbehandlung
       eingegebenesDatum = CDate(TextBox1.Value) ' Datum aus TextBox konvertieren
       Cells(1, 1).Value = eingegebenesDatum ' In Zelle A1 schreiben
       Exit Sub
    Fehlerbehandlung:
       MsgBox "Bitte geben Sie ein gültiges Datum ein.", vbExclamation
    End Sub
  6. Schließe den VBA-Editor und gehe zurück zu Excel.

  7. Weisen Sie das Makro einem Button zu, um das Datum zu übertragen.


Häufige Fehler und Lösungen

  • Fehler: Typen unverträglich

    • Dieser Fehler tritt auf, wenn der eingegebene Text nicht in ein Datum konvertiert werden kann. Stelle sicher, dass das Datum im richtigen Format eingegeben wird (z.B. "dd.mm.yyyy").
  • Problem: Datum wird als Text gespeichert

    • Wenn das Datum nach der Eingabe als Text erscheint, kann dies daran liegen, dass die Zelle nicht richtig formatiert ist. Stelle sicher, dass die Zelle als Datum formatiert ist.

Alternative Methoden

Eine alternative Methode, um ein Datum in eine Zelle zu schreiben, besteht darin, die Format-Funktion zu verwenden, aber sei vorsichtig, dass du sie in die richtige Richtung anwendest. Der folgende Code könnte funktionieren:

Cells(1, 1).Value = CDate(Format(TextBox1.Value, "dd/mm/yyyy"))

Beachte, dass dies nur funktioniert, wenn der Text in der Textbox bereits im Datumformat vorliegt. Ansonsten solltest du zuerst CDate verwenden, um den Text in ein Datum umzuwandeln.


Praktische Beispiele

Hier sind einige praktische Beispiele, die dir helfen können:

  1. Beispiel 1: Einfaches Datum

    • Wenn du "01.01.2018" in die Textbox eingibst und das oben angegebene Makro ausführst, wird in Zelle A1 das Datum korrekt angezeigt.
  2. Beispiel 2: Ungültiges Datum

    • Wenn du "30.02.2018" eingibst, zeigt die Fehlerbehandlung eine Nachricht an, dass das Datum ungültig ist.

Tipps für Profis

  • Überprüfe immer die Eingabe des Benutzers, um sicherzustellen, dass das Datum im richtigen Format vorliegt, bevor du es in die Zelle schreibst.
  • Nutze die Formatierung von Zellen, um sicherzustellen, dass Excel das Datum korrekt anzeigt.
  • Experimentiere mit verschiedenen Datumsformaten, um die Anzeige an die Bedürfnisse deines Projekts anzupassen.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass das Datum korrekt eingegeben wird?
Verwende die Funktion IsDate, um zu überprüfen, ob die Eingabe ein gültiges Datum ist, bevor du es in die Zelle schreibst.

2. Welche Excel-Version wird für dieses Beispiel benötigt?
Die beschriebenen Methoden sind für Excel-Versionen mit VBA-Unterstützung geeignet, wie Excel 2010 und neuer.

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