kruisje afsluiten applicatie gebruiken in userform

[marcelh]

Beste forummers,

Als er op het kruisje in een userform geklikt wordt sluit alleen de userform. Kan er ook een code in VBA voor zorgen dat als ik op het kruisje klik in het userform dat dan de hele workbook sluit?

Alvast bedankt voor de moeite

 

[HSV]

In userformmodule.
Hiermee wordende veranderingen in het bestand ook opgeslagen (True).

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
 ThisWorkbook.Close True
End Sub

 

[marcelh]

Hallo Harry en bedankt voor de snelle reactie.

Maar ik krijg de code niet aan de praat. nu heb ik ook vaker met het opstarten van de applicatie een geheugen fout. bijgevoegd een screenshot van VBA met de foutmelding waarin het lijkt of de applicatie niet volledig geladen wordt. en een screenshot van alles wat erin hoort te staan

 

[HSV]

Hallo Marcel,

Heb je de code wel in de userform gezet?

 

[marcelh]

Hallo Marcel,

Heb je de code wel in de userform gezet?

Ik heb alles al geprobeerd dacht ik zo; het zou eigenlijk in de userform 'start' moeten staan maar daar funtioneerd het ook niet. zoals te zien is op de .jpg's wordt in de eerste afbeelding helemaal geen VBA getoont.

Ik denk dat er ergens anders iets fout gaat.

De applicatie start op met de userform, vanaf dat moment hapert de applicatie met het opstarten.
Bijgevoegd nog een screenshot met de code van het userform wat ik omcirkeld heb, geeft bij het opstarten een foutmelding

Gr. Marcel

 

[HSV]

Hier een simpel voorbeeldje.
Met code tst() komt de userform tevoorschijn.

 

[marcelh]

Tja, geen idee wat er gebeurt maar als ik de code 1 op 1 overneem naar mij eigen code dan doet ie 't soms wel, dan weer kan vba het pad niet vinden.
Kan het zijn dat de applicatie vlugger wordt opgestart dan dat het volledig geladen wordt?, het is een redelijk groot bestand met veel userforms en veel tabbladen en veel copy paste opdrachten

gr M

 

[HSV]

Geen idee,

Misschien kun je het uploaden, of anders een voorbeeldbestand waar het ook niet goed gaat.

 

[marcelh]

Goedemorgen Harrie,

ik heb de eerste 2 userforms geëxporteerd en in een nieuw besand geplakt. ook hiermee doet hij het niet altijd, ook blijft excel regelmatig hangen.

steeds meer krijg ik het idee dat het fout gaat met excel zelf. Ik ben benieuwd wat het bij jou doet.

Gr Marcel

 

[marcelh]

Goedemorgen Harrie,

ik heb de eerste 2 userforms geëxporteerd en in een nieuw besand geplakt. ook hiermee doet hij het niet altijd, ook blijft excel regelmatig hangen.

steeds meer krijg ik het idee dat het fout gaat met excel zelf. Ik ben benieuwd wat het bij jou doet.

Gr Marcel

Ik ben het nu al een hele tijd aan het proberen maar tot nu toe werkt alles prima....plotseling.....misschien heeft jou duivel er iets mee te maken!