tijdelijk afsluiten

Status
Niet open voor verdere reacties.

kattenbe

Gebruiker
Lid geworden
12 jan 2016
Berichten
45
Besturingssysteem
Windows
Office versie
365
Ik in Excel vba een wedstrijdprogramma weten te fabriceren.

Het programma open je door op het bureaublad op de betreffende excel icon te klikken (na het openen kun je niet meer bij andere programma's komen) en wanneer men het programma wil sluiten kan dat alleen via een daarvoor gemaakte vba afsluitknop in het hoofdmenu.
Alles is beveiligd en er kan alleen via userform hoofdmenu worden afgesloten. Dit werkt allemaal prima. En alles wordt met het afsluiten direct naar de juiste bladen weggeschreven.
En na het afsluiten kom je van zelf weer terug op het bureaublad om bijvoorbeeld met andere programma’s te kunnen werken.

Deze manier van afsluiten (en dus het direct wegschrijven naar de juiste bladen) vind ik niet (helemaal) prettig werken want ik kan dan geen totaal plaatje meer maken van de volledige dag.

Ik ben daarom opzoek naar een vba code waarmee de gebruiker door een druk op een (dus eigenlijk een tweede) knop het programma “tijdelijk” af kan sluiten (zonder dat alles eerst weg geschreven wordt naar andere bladen) maar dat men dan zo weer terug is op het bureaublad. En wanneer men het programma dan weer opent dat “alles” dan nog zo “staat” als voor het afsluiten het geval was.

Alle userfoms worden ook met onderstaande code beveiligd:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 1 Then
Else
Cancel = True
End If
End Sub
 
Dan zal je toch eerst alles ergens moeten bewaren.

Wat betreft de code die je plaatste is dit voldoende:
Code:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    Cancel = CloseMode <> 1
End Sub
 
Laatst bewerkt:
Goede avond edmoor,

Ja, inderdaad zal eerst het ingevoerde bewaart moeten worden.
De data wordt via een userform op/in een blad gezet.
De data kan namelijk tijdens de loop van de middag nog aangepast worden.
Zolang er niet echt afgesloten wordt moet men bij de data kunnen komen.

Dank voor de bovengenoemde code.
 
Goedenavond,

Je kan het formulier met 'hide' verbergen en het programma minimaliseren.
Zo kan je bij je desktop en weer terug om het formulier weer op te roepen.
Alle gegevens staan nog op het formulier.
 
Behalve uiteraard als Excel volledig wordt gesloten.
 
Goede avond HSV,
Het programma is volledig VBA gestuurd. Je kunt alleen via knoppen op het hoofdmenu acties ondernemen.
Eén daarvan is afsluiten programma. Indien je op deze knop klikt kom je dus uiteindelijk op het bureaublad.
Dit is de enige manier om weer op het bur.blad te kunnen komen.

Ik ben opzoek naar een code onder een nieuw te maken knop op het hoofdmenu om tussen tijds af te kunnen sluiten maar waarbij ik na het weer opstarten weer in de "oude" situatie kom.
Omdat de al eerder ingevoerde data gewijzigd moet kunnen worden.

Ik hoop wel dat ik het hiermee wat duidelijker kan maken.
 
Je was duidelijk genoeg wat mij betreft.
 
Je verteld er alleen niet bij of de hele handel ook bewaard moet blijven als Excel volledig wordt afgesloten.
Als dat niet zo is kan je gewoon doen wat HSV al zei in #4.
 
Vooruit maar, zet het achter een knop.
Code:
me.hide
application.windowstate = xlminimized
 
@edm

Heb je je vertild aan vertelt ?
 
Dat doe ik altijt zo.
 
Heren hartelijk dank. Dit is wat is zocht.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan