Hur inaktiverar jag arbetsbokspara men tillåter bara spara som i Excel?

För att skydda originaldata i en arbetsbok är det ofta nödvändigt att använda funktionen Spara som istället för Spara, särskilt när du uppdaterar data. Men många användare trycker instinktivt på Ctrl + S för att spara sitt arbete under redigering. Finns det något sätt att inaktivera Spara-funktionen samtidigt som du bara tillåter Spara som i Excel? Denna handledning visar dig hur du uppnår detta med en enkel VBA-lösning.

Inaktivera spara arbetsbok men tillåt bara spara som med VBA-kod

Inaktivera spara arbetsbok men tillåt bara spara som med VBA-kod

Följande VBA-kod kan hjälpa dig att inaktivera Spara-funktionen men bara tillåta Spara som i en arbetsbok.

1. Tryck andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer dubbelklicka Denna arbetsbok i Projekt rutan för att öppna Denna arbetsbok (kod) fönster. Kopiera och klistra sedan in VBA-koden nedan i kodfönstret.

VBA-kod: Tillåt endast Spara som i 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. Tryck andra + Q för att stänga Microsoft Visual Basic för applikationer fönster.

4. Eftersom arbetsboken innehåller VBA-skript, kommer du att få följande dialogruta först när du sparar arbetsboken. Klicka på Ja knapp.

5. Nu dyker en dialogruta upp för att berätta att Spara-funktionen i den här arbetsboken är inaktiverad. Du måste använda funktionen Spara som för att spara de uppdaterade uppgifterna i denna arbetsbok.

Vänligen klicka på OK och fortsätt för att spara arbetsboken med funktionen Spara som.

Relaterade artiklar:

• Hur inaktiverar eller tillåter du inte Spara och spara som-alternativ i Excel?
• Hur infogar eller visar jag senast sparade tidsstämpel i kalkylblad i Excel?
• Hur sparar jag bara ett kalkylblad i en arbetsbok i Excel?