Inputbox > Abbrechen
17.11.2003 08:25:53
Holger Meinert
habe folgendes Makro:
Sub Bemerkung_Stromverkauf_Sonderbezug()
Dim text As String
text = InputBox("Fügen Sie der PDF-Datei eine Bemerkung hinzu !" & vbCrLf & " " & vbCrLf & " Bestätigen mit OK !!", vber, "Stromverkauf_Sonderbezug")
Sheets("TBD").Select
Range("O1").Value = text
Sheets("TBD").Select
End Sub
Frage: Wenn ich auf "Abbrechen" klicke soll das Makro beendet werden; Wie ?
Vielen Dank !
Holger
Anzeige