Datum heute in Inputbox vorgeben
Schritt-für-Schritt-Anleitung
Um das aktuelle Datum in einer Inputbox vorzugeben, kannst Du den folgenden VBA-Code verwenden. Dieser Code setzt das Datum von heute als Standardwert in die Inputbox:
Sub inp()
Dim strg As String
strg = InputBox("Bitte Datum eingeben", "Datum", Date)
End Sub
Falls Du das Datum von heute + 5 Tage verwenden möchtest, änderst Du einfach die Zeile wie folgt:
strg = InputBox("Bitte Datum eingeben", "Datum", Date + 5)
So wird in der Inputbox das Datum von heute plus fünf Tage angezeigt.
Häufige Fehler und Lösungen
-
Fehler: Inputbox zeigt kein Datum an
- Lösung: Stelle sicher, dass Du die
Date-Funktion korrekt verwendest. Überprüfe, ob der Code in einem Modul eingefügt wurde.
-
Fehler: Falsches Datumsformat
Alternative Methoden
Eine weitere Möglichkeit, das heutige Datum in einer Inputbox anzuzeigen, ist die Verwendung von Application.Today. Der Code könnte dann wie folgt aussehen:
strg = InputBox("Bitte Datum eingeben", "Datum", Application.Today)
Dies hat den gleichen Effekt wie die Verwendung von Date, allerdings kann es je nach Excel-Version Unterschiede geben.
Praktische Beispiele
Hier sind zwei praktische Beispiele, wie Du das Datum in einer Inputbox verwenden kannst:
-
Heutiges Datum:
Sub DatumHeute()
Dim strg As String
strg = InputBox("Das heutige Datum ist:", "Heute", Date)
End Sub
-
Datum in 10 Tagen:
Sub DatumIn10Tagen()
Dim strg As String
strg = InputBox("Das Datum in 10 Tagen ist:", "Datum", Date + 10)
End Sub
Tipps für Profis
-
Verwende die Format-Funktion, um das Datum in einem benutzerdefinierten Format anzuzeigen, z.B.:
strg = InputBox("Bitte Datum im Format TT.MM.JJJJ eingeben", "Datum", Format(Date, "dd.mm.yyyy"))
-
Überlege, wie Du das Datum in einer anderen Zelle verarbeiten möchtest, nachdem der Benutzer es eingegeben hat. Du kannst das Ergebnis der Inputbox in eine Zelle schreiben, um es weiterzuverwenden.
FAQ: Häufige Fragen
1. Was für ein Datum ist heute?
Das heutige Datum kann einfach mit der Date-Funktion abgerufen werden.
2. Welches Datum ist heute?
Das aktuelle Datum wird durch den Befehl Date in VBA zurückgegeben.
3. Wie kann ich das Datum in einer bestimmten Form anzeigen?
Du kannst die Format-Funktion verwenden, um das Datum an das gewünschte Format anzupassen.