title image


Smiley Makro beendet nicht
Hallo - ich brauche Eure Hilfe.



Ich kann eine Anwendung nicht über Makro beenden.

Habe schon mehrere Verianten versucht. Es klappt einfach nicht.



In einer Userform drücke ich auf den Button 'Beenden' - dahinter steht folgender Code:



-------------

Private Sub commandbutton4_click()

Application.ScreenUpdating = True

Sheets("Hintergrund").Select

Workbooks("BBRep-start.xls").Close SaveChanges:=True

prgende

End Sub



------------------

Sub prgende()

Application.DisplayFullScreen = False

Workbooks("Buybackreport.xls").Close SaveChanges:=True

End Sub



-----------------------------------



Das Verrückte dabei ist - wenn ich den Code per 'F8' im Einzelschritt laufen lasse, funktioniert er.

Benutze ich 'F5' oder lasse die Anwendung ganz normal laufen, bleibt der Code ohne Fehlermeldung o.ä. einfach bei der letzten Datei stehen.



Ich hoffe es kann mir jemand einen Tipp geben.





Vielen Dank schon mal



Ernst

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: