Definion, was bei Abbrechen oder Escape passiert
17.11.2006 10:16:22
Peter
Mit nachfolgendem Code muss in der Inputbox eingegeben werden, unter welchem Namen die Datei abgespeichert werden soll.
Nun kann ja anstelle einer Eingabe die Escape Taste oder Abbrechen gewählt werden. Wie kriege ich es hin, dass bei diesen beiden Fällen eine Meldung erscheint "Aktion wurde abgebrochen" und nichts weiteres passiert?
Besten Dank für eine Rückmeldung.
Peter
Tool = Application.InputBox("Name der neuen Datei eingeben", "Datei unter neuem Namen abspeichern", Tool, , , , , 1)
With ActiveWorkbook
.SaveAs SavePath & "\" & Tool
End With