Naar aanleiding van een andere thread: Save optie aan/uit? Hoe CTRL+S beveiligen?

[Maurush]

Aangezien ik geen oude threads wil oprakelen die al opgelost zijn door een reply, dan bij deze mijn vraag,
naar aanleiding dus van die thread:

http://www.helpmij.nl/forum/showthread.php/514002-Save-optie-aan-uit-via-VBA?p=3288516

Het werkt allemaal zoals beschreven, echter kan ik het document nog opslaan via de toetscombinatie
CTRL+S --> nu mijn vraag: Hoe valt dit te blokkeren?

Alvast bedankt voor de reacties!!

 

[Niels28]

Door een andere macro aan Ctrl-S te hangen?

Sub nosave()
MsgBox "functie Ctrl-S is uitgeschakeld"
End Sub

Alt - F8
macro aanklikken
opties


Niels

 

[Maurush]

Door een andere macro aan Ctrl-S te hangen?

Sub nosave()
MsgBox "functie Ctrl-S is uitgeschakeld"
End Sub

Alt - F8
macro aanklikken
opties


Niels

Ik heb echter geen modulen aangemaakt, is het ook mogelijk om een bepaalde combinatie
te plaatsen in ThisWorkbook?

Alvast bedankt!

 

[Maurush]

Heb het antwoord al gevonden, simpel eigenlijk:

' Disable Save (Ctrl S)

Application.OnKey "^s", ""

Heb dit dan geplaatst onder ThisWorkbook --> Sub Workbook_open()