kruisje rechtboven in de hoek uit schakelen

[patrickje]

Is het mogelijk om het kruisje rechtboven in de hoek uit te schakelen in excel.

Dus dat je met een bepaald document perse de exit knop moet gebuiken ????

Het doel hiervan is dat excel dan nooit vraagt of je iets wilt opslaan.
Omdat ik een document hebt wat je invult dan print en niet hoeft op te slaan.

 

[markraats85]

als je kunt programmeren, een macro

in Before_Close

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If closemode <> 1 Then Cancel = 1
End Sub

Dit zou moeten werken

 

[patrickje]

Als ik het verwerk ik this workbook dan doet hij het
maar dan sluit hij helemaal niet af zelfs niet met de exit knop

Als ik hem koppel aan mijn sheet dan werkt het niet.

 

[Thankyou]

Nou is mijn kennis van VBA zo goed als 0, maar 1 ding weet ik wel:
Een voobeeldbestand, ontdaan van gevoelige info, vergroot de kans op een juist antwoord enorm.

Succes,

 

[Roncancio]

Volgens mij doe je veel te ingewikkeld.
Zet onderstaande code in ThisWorkbook en zodra men op het kruis klikt, wordt het bestand zonder een melding afgesloten.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close SaveChanges:=False
End Sub

Met vriendelijke groet,


Roncancio

 

[patrickje]

Dank je dit werkt goed.
Alleen nu sluit je alleen je workbook af.
Kan ik dit veranderen in het programma afsluiten ???

 

[Roncancio]

In ThisWorkbook:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
With Application
    .DisplayAlerts = False
    .Quit
End With
End Sub

Met vriendelijke groet,


Roncancio

 

[patrickje]

Ok bedankt hiervoor.