Hur tvingar jag användare att spara som en makroaktiverad arbetsbok?
När du sparar en Excel-arbetsbok sparas den som xlsx-filformat som standard, och detta filformat tar bort makrokoderna från arbetsboken om det finns flera koder. För att behålla koderna bör du spara arbetsboken som Excel Macro-Enable Workbook-format. Hur kunde du tvinga användare att spara som en makroaktiverad arbetsbok?
Tvinga användare att spara som en makroaktiverad arbetsbok med VBA-kod
Tvinga användare att spara som en makroaktiverad arbetsbok med VBA-kod
För att spara arbetsboken som makroaktiverad arbetsbok som standard kan följande VBA-kod hjälpa dig, gör så här:
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.
2. Dubbelklicka sedan Denna arbetsbok under VBAProjekt för att öppna en ny tom modul, och kopiera och klistra sedan in följande kod i modulen:
VBA-kod: Tvinga att spara arbetsboken som makroaktiverad arbetsbok som standard:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updateby Extendoffice
Dim xFileName As String
If SaveAsUI <> False Then
Cancel = True
xFileName = Application.GetSaveAsFilename(, "Excel Macro-Enabled Workbook (*.xlsm), *.xlsm", , "Save As xlsm file")
If xFileName <> "False" Then
Application.EnableEvents = False
ActiveWorkbook.SaveAs Filename:=xFileName, FileFormat:=xlOpenXMLWorkbookMacroEnabled
Application.EnableEvents = True
Else
MsgBox "Action Cancelled"
Cancel = True
Exit Sub
End If
End If
End Sub
3. Spara och stäng sedan detta kodfönster, från och med nu, när användare sparar som denna arbetsbok, kommer den att sparas som Excel Macro-Enabled Workbook format som standard som följande skärmdump visas:
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
