Hoe kunt u het opslaan van een werkboek uitschakelen en alleen Opslaan als toestaan in Excel?

Om de originele gegevens in een werkboek te beschermen, is het vaak noodzakelijk om de functie Opslaan als te gebruiken in plaats van Opslaan, vooral bij het bijwerken van de gegevens. Veel gebruikers drukken echter instinctief op Ctrl + S om hun werk op te slaan tijdens het bewerken. Is er een manier om de functie Opslaan uit te schakelen terwijl u alleen Opslaan als in Excel toestaat? Deze handleiding laat zien hoe u dit kunt bereiken met een eenvoudige VBA-oplossing.

Schakel het opslaan van een werkboek uit en sta alleen Opslaan als toe met VBA-code

Schakel het opslaan van een werkboek uit en sta alleen Opslaan als toe met VBA-code

De volgende VBA-code kan u helpen om de functie Opslaan uit te schakelen en alleen Opslaan als voor een werkboek toe te staan.

1. Druk gelijktijdig op de toetsen Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.

2. Dubbelklik in het venster Microsoft Visual Basic for Applications op ThisWorkbook in het Projectpaneel om het venster ThisWorkbook (Code) te openen. Kopieer en plak vervolgens de onderstaande VBA-code in het Codevenster.

VBA-code: Sta alleen Opslaan als toe in Excel

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    If Not SaveAsUI Then
        Cancel = True
        MsgBox "You cannot save this workbook. Use Save As", vbInformation, "Kutools for Excel"
    End If
End Sub

3. Druk op de toetsen Alt + Q om het venster Microsoft Visual Basic for Applications te sluiten.

4. Omdat het werkboek een VBA-script bevat, krijgt u bij het opslaan van het werkboek eerst het volgende dialoogvenster. Klik op de knop Ja.

5. Er verschijnt nu een dialoogvenster dat u vertelt dat de functie Opslaan in dit werkboek is uitgeschakeld en dat u de functie Opslaan als moet gebruiken om de bijgewerkte gegevens van dit werkboek op te slaan.

Klik op de knop OK en ga verder met het opslaan van het werkboek met de functie Opslaan als.

Gerelateerde artikelen:

• Hoe schakelt u de opties Opslaan en Opslaan als uit of staat deze niet toe in Excel?
• Hoe voegt u een tijdstempel van de laatste keer opslaan in of weergeeft u deze op een werkblad in Excel?
• Hoe slaat u slechts één werkblad op in een werkboek in Excel?