met kruisje in userform heel excel sluiten

Status
Niet open voor verdere reacties.
H

hellboy01

Gebruiker
Lid geworden
18 jun 2006
Berichten
333
Hi,
Is het mogelijk om via het sluit kruisje van een userform heel excel op te slaan en te sluiten?
alvast bedankt.
 
Yep. Met dit achter de Userform:
Code: 
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    ThisWorkbook.Save
    Application.Quit
End Sub

Eventueel een loopje gebruiken om alle open Workbooks op te slaan.
 
Laatst bewerkt:
Hi Edmoore, het werkt perfect. Heb je dat loopje er misschien ook bij. ik kan wel iets met een for next maar workbooks benaderen kan ik nog niet.
 
Zoiets:
Code: 
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    For Each wb in Workbooks
         wb.Save
    Next wb
    Application.Quit
End Sub
 
Die van Ed gaan mij ook volkomen boven de pet (ben ook maar pas sinds 2008 hier).
 
Grapje van je neem ik aan? :shocked:
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan