Macro unterbrechen und per OK fortsetzen
30.08.2020 00:58:12
Bepel
Ich habe mal wieder eine Problem, bei welchem ich mich festgefahren habe :-(
Per Macro-recorder habe ich zwei Marco's aufgenommen und danach etwas angepasst.
Im ersten Macro werden Daten aus einer Text-Datei in Excel importiert, gefiltert, sortiert und dann als Excel-Datei abgespeichert (und dann End Sub ).
Soweit OK
Dann muss ich manuell in Spalte A einige Werte eintragen.
Anschliessend muss ich manuell das zweite Macro starten zum weiterverarbeiten.
Das Ziel wäre dass ich ein Macro starte welches am Ende des aktuellen ersten Makros eine Pause einlegt mit dem Hinweis dass ich die "Werte für SN in die Spalt A eintragen" soll.
Dann müsste ich natürlich das ExcelSheet vervollständigen können.
Anschlieesend müsste ich dann z.b. die OK-Taste drücken damit (das akzuellen zweite) Macro weiter ausgeführt wird.
Ich habe jetzt tagelang versucht zu googeln um eine Lösung zu finden.
Allerdings bekomme ich es nicht hin :-(
MSGBox ist nicht gut - weil ich ja in Excel einige Werte eingeben muss.
Anscheinend wäre ein UserForm1 vbModeless die Lösung.
Ich habe folgende Zeilen aus ähnlichen Problemen in mein Macro eingefügt.
Sub ShowModalDemo()
UserForm1.Load
UserForm1.Show vbModeless
End Sub
Allerdings steigt das Macro bei der Zeile: UserForm1.Load aus :-(
Begründung: UserForm1 = empty
Dann habe ich nach der Ursache dieser Meldung gesucht - und habe dann über den Editor: Microsoft Visual Basic for Applications ein eigenes UserForm1 eingefügt.
Nach langem Versuchen erschien dann tatsächlich irgendwann bei der Abarbeitung vom Macro -in meinen ExcelSheet ein Feld mit "meinem Text"
Ich konnte dann sogar einige Werte in dem ExcelSheet editieren.
Allerdings war kein "OK"-button zu sehen.
Hätte jemand eine Idee wie der Code lauten müsste damit:
- der Macro stoppt und das Hinweisfeld samt OK-Button erscheint
- das ExcelSheet editierbar bleibt.
- nach betätigung der OK-Taste -> das Macro weiterläuft ?
Vielen Dank für eventuelle Tips
mfg
Paul