nachdem mir gestern so prima geholfen wurde habe ich heute gleich wieder ein Problem.
Ich habe eine Combobox und den folgenden Code hinter der Combobox:
Private Sub cmbBaukosten_Change()
Application.ScreenUpdating = False
Application.Run "SchutzAus"
Application.Run "Baukosten_anzeigen"
Application.Run "SchutzEin"
Application.ScreenUpdating = True
End Sub
Dies funktioniert auch alles prima. Auch wenn die Datei abgespeichert wird gibt es keine Fehlermeldung. Jetzt das merkwürdige. Wenn die Datei geschlossen wird bekommen ich die Fehlermeldung "Die Methode 'ScreenUpdating' für das Objekt '_Application' ist fehlgeschlagen." Wenn ich jetzt auf Debuggen gehe wird die erste Zeile aus obigem Code angezeigt. Wenn ich dann auf Beenden gehe erhalten ich wieder die gleiche Fehlermeldung, nur dass diesmal beim Debuggen die gleiche Zeile aus dem Unterprogramm "Baukosten anzeigen" hinterlegt ist (ich weiß die Zeile ist doppelt und müsste eigentlich nicht sein). Ein zweites Mal Beenden schließt dann endlich die Datei.
Die Zeile selbst kann ja nicht falsch sein. Es gibt auch nirgends einen Aufruf, dass beim Schließen der Datei die entsprechenden Codezeilen durchlaufen werden sollen (beim Schließen wird überhaupt kein Code ausgeführt). Trotzdem werden diese Zeilen beim Schließen anscheinend ausgeführt und ScreenUpdating scheint Excel dann nicht mehr ausführen zu können.
Die Fehlermeldung nervt und ich bin völlig ratlos.
Grüße
Michael