• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Knop afsluiten met VBA

Status
Niet open voor verdere reacties.
Hoi HVS en edoor,

Ik heb het gevonden, als ik Application.Quit uit Thisworkbook verwijder werkt het prima!

Dus de juiste code om via de knop af te sluiten is:
Sub Diagram29_Klikken()
Dim w As Workbook, y As Long
For Each w In Workbooks
y = y + 1
Next
If y = 1 Then
ThisWorkbook.Save
Application.Quit
Else
ThisWorkbook.Close True
End If
End Sub

Bedank voor al jullie moeite

Prettige jaarwisseling,
Kees
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan