Falsche Syntax?

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 2000
nach unten

Betrifft: Falsche Syntax?
von: Dieter
Geschrieben am: 26.04.2002 - 16:14:31

Was mache ich falsch??
Der folgende Ausschnitt ist Teil eines längeren Makros.
Dim Datum1 As Date
Dim Datum2 As Date
Datum1 = InputBox("Geben Sie das Anfangsdatum ein:")
Datum2 = InputBox("Geben Sie das Enddatum ein:")
Das ganze Makro funktioniert tadellos aber wenn ich eine InputBox mit "Abbrechen" beende, kommt immer die Meldung Laufzeitfehler 13 (Typen unverträglich).
Wenn ich den Zusatz einfüge:
If Datum1 = "" Then
Exit Sub
End If
ändert sich nichts.
Ich möchte mit dem betätigen von "Abbrechen" nur das Makro beenden.
Bin für jede Hilfe dankbar.
nach oben   nach unten

Re: Falsche Syntax?
von: Michael Scheffler
Geschrieben am: 26.04.2002 - 16:25:56

Ja VB sagt Dir doch den Fehler. Definiere eine temporäre Variable als String:

nach oben   nach unten

Re: Falsche Syntax?
von: Daniel R.
Geschrieben am: 26.04.2002 - 16:35:06

Das Ganze funktioniert auch, wenn du Datum* als Variant definierst: Sub Datum() Dim Datum1 As Variant Dim Datum2 As Variant Datum1 = InputBox("Geben Sie das Anfangsdatum ein:") ActiveCell.Value = Datum1 Datum2 = InputBox("Geben Sie das Enddatum ein:") End Sub Gruss Daniel

nach oben   nach unten

Re: Falsche Syntax?
von: Dieter
Geschrieben am: 26.04.2002 - 17:02:54

Besten Dank für die schnelle Hilfe.

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Falsche Syntax?"