Office: Inputbox: "Abbrechen"

Hallo zusammen,

ich kämpfe gerade mal wieder mit Excel, genauer gesagt mit VBA:

Mein Code enthält folgende Zeile:
lngX = InputBox("Jede wie vielte Zeile soll gelöscht werden?", "Löschen jeder x.ten Zeile eines markierten Bereichs")


Danach geht es dann entsprechend weiter. Wird in der Inputbox eine Eingabe gemacht, funktioniert auch alles anschließende wie gewünscht.

Nun möchte ich aber gerne noch abfangen, dass beim Drücken von "Abbrechen" die Inputbox einfach nur geschlossen wird. Nichts weiter. Das ist auch schon alles und kann doch so schwierig eigentlich gar nicht sein, oder?

Hat jemand einen Tipp für mich, wie ich diesen "Abbrechen"-Knopf abfangen kann?


Viele Grüße

Zorro217

:)

 

Hallo Zorro,

irgendwie so könnte es wohl gehen:
Code:

Grüße
EarlFred

 

Hallo Zorro,

die Inputbox gibt beim Klicken auf Abbrechen einen Leerstring zurück, auf den du prüfen kannst:

Code:

Die Variable lngX darf daher übrigens auch nicht als Long deklariert sein. Es bietet sich eine Daklaration als Variant an.

Gruß Ingolf

 

Hi Zorro,

du könntest einfach den Error ignorieren und nach der Inputbox abfragen ob etwas eingegeben wurde.
Code:

 

Super, danke für die Tipps, das hat funktioniert. Und schon läuft es, wie ich es mir vorgestellt habe. *Smilie