Makro Stoppen wenn Schaltfläche gedrückt wird
20.01.2004 19:22:00
Glen
Ich habe heute dieses Thema schon mal gepostet und auch Hilfe erhalten. Die Hilfe brachte mich als Vba Makrorekorder-Anwender nicht viel weiter.
Meine Frage und Schilderung:
Ich habe ein Makro, dass nach ablaufen von 15 Minuten eine MsgBox erscheinen lässt. Das Makro wird durch eine Schaltfläche (Start) aktiviert. Das Makro läuft soweit einwandfrei.
Wie kann ich jedoch jetzt erreichen, dass wenn innerhalb der 15 Minuten (also während dem das Makro aktiviert ist) die Schaltfläche (Stop) gedrückt wird, dass Makro gestoppt wird?
Mein Makro:
Sub Schaltfläche3_BeiKlick()
Range("G8").Select
ActiveCell.FormulaR1C1 = "b"
Application.OnTime Now + TimeSerial(0, 15, 0), "Meldung_Anlieferung"
Range("I8").Select
Selection.ClearContents
Range("G8").Select
End Sub
Ich bitte euch mir keine komplizierten Erklärungen zu schreiben, da ich bloss VBA mit Makrorekorder anwende und daher eure Mühe und Zeit zum schreiben für grosse Erklährungen eher schade wären.
Vielen Dank im voraus
Glen