ich habe ein kleines VBA - Problem.
Über einen Button lasse ich verschiedene Programm nacheinander ablaufen.
Private Sub Aktualisieren_Click()
Call Copytest
Call TextAendern
Call DatenKopierenIgnorNeu
Call TextAendernIgnorMeld
Call DatenKopierenSperrNeu
Call DiagrammeAktualisieren
Worksheets("Fehleranalysen").Activate
End Sub
Die einzelnen Programme greifen auf verschiedene Daten innerhalb meines Excel-Sheets zu. Es kann dabei passieren, dass innerhalb der Programme Fehler auftreten, vor allem wenn die Datengrundlage zu gering ist (Alles ist mit einem Datenbankabruf verknüpft).In den einzelnen Programmen kann ich die Fehler bereits mit "On Error goto ..." abfangen. Mit "Exit Sub" kann ich die Unterprogramme dann auch vorzeitig beenden und eine Fehlermeldung ausgeben, aber dann wird ja das Programm Sub Aktualisieren_Click wieder fortgesetzt und das nächste Unterprogramm wird aufgerufen. Auch hier kann es dann wieder zu Fehlern kommen und das heißt, dass es sein kann, dass man nach einer Fehlermeldung noch mehrere weitere Fehlermeldungen wegklicken muss, bevor das Programm beendet wird.
Ich würde es gerne so haben, dass sobald der erste Fehler auftritt sowohl das betreffende Unterprogramm als auch das "Hauptprogramm" beendet werden und am besten dabei noch ausgegeben wird, bei welchem Unterprogramm der Fehler aufgetreten ist.
Wenn ich versuche mit "On Error goto..." im Hauptprogramm Sub Aktualisieren_Click zu arbeiten, hilft das leider nicht. Aber das macht ja auch Sinn, weil die Fehler in den Unterprogrammen auftreten...
Habt ihr vielleicht eine Idee oder einen Lösungsansatz/ - vorschlag?
Mit freundlichen Grüßen
Max