I den här handledningen kommer jag att dela med mig av följande 5 lämpliga sätt att spara en kopia av en excel-fil i XLSX format med hjälp av VBA Du kan använda dessa metoder i alla typer av arbetsböcker, oavsett om de innehåller stora eller små data. Dessutom, eftersom vi kommer att använda VBA Det tar praktiskt taget ingen tid att utföra uppgiften.

Ladda ner övningsboken

Du kan ladda ner övningsboken här.

Vad är en XLSX-fil?

XLSX är en fil som är en MS Excel Open XML-format Kalkylblad som lagrar data i celler som finns i arbetsblad. Cellerna är ordnade i en rad- och kolumnstruktur. I MS Excel 2007 och tidigare var denna kalkylbladfil av typen XLS .

5 lämpliga sätt att spara en kopia av en Excel-fil som XLSX med VBA

I den här handledningen är vårt huvudsyfte att visa hur du sparar en aktuell arbetsbok i en XLSX format. Vi har alltså tagit ett enkelt och kortfattat dataset som har 3 kolumner och 6 Du har dock möjlighet att använda dina egna datamängder.

1. Användning av SaveCopyAs-metoden

Metoden SaveCopyAs på Excel VBA tar ett arbetsboksobjekt och kan spara en ny kopia av denna arbetsbok i en XLSX format utan att ändra data. Låt oss se hur vi kan använda denna metod i vår kod.

Steg:

• Gå först till Utvecklare och välj Visual Basic .

• Därefter, i Visual Basic fönstret, klicka på Infoga och välj Modul .

• I det nya modulfönstret till höger skriver du in följande formel:

 Sub SaveCopyAs_Method() Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs "C:\Users\USER\Desktop\5700\SaveCopyAs method.xlsx" End Sub 

• Stäng sedan VBA och navigera till Utvecklare fliken igen.
• Välj här Makroer .

• Nu, i den Makro fönstret bör du se den makrokod som vi har infogat.
• Klicka sedan på Kör .

• Slutligen öppnar du mappen där du sparade filen och den bör finnas tillgänglig i XLSX format som vi ville.

Läs mer: Hur du sparar Excel-makrofiler som filnamn från cellvärde

2. Ange filnamn

Vi kan spara en kopia av en Excel-fil i XLSX format genom att ange filnamnet i VBA koden. När vi anger filnamnet kommer vi också att lägga till filtillägget, vilket kommer att konvertera filen till det format vi vill ha. För att fortsätta med denna metod, infoga följande kod i VBA modulfönstret.

 Sub Specify_file_name() Dim location As String location = "C:\Users\USER\Desktop\5700\Specify file name.xlsx" ActiveWorkbook.SaveAs Filename:=location End Sub 

När du har skrivit koden kör du den helt enkelt från Makroer som vi visade tidigare. Gå nu till mappen spara och filen med XLSX formatet borde vara där nu.

Läs mer: Excel VBA för att spara arbetsbok i en specifik mapp med datum

3. Ange nummer för filformat

Filformatnumren är unika nummer som anger en specifik filtyp när du sparar. I den här handledningen är vårt mål att spara en Excel-kopia som en XLSX fil med hjälp av VBA Vi använder alltså formatet nummer 51 , som betecknar den XLSX filtyp. Skriv därför följande kod i filen VBA modul:

 Sub file_format_number() Dim location As String Application.DisplayAlerts = False location = "C:\Users\USER\Desktop\5700\File format number" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=51 End Sub 

Om du kör den här koden kommer Excel omedelbart att spara arbetsboken i en XLSX Du kan bekräfta detta genom att kontrollera i målmappen.

Läs mer: Excel VBA Spara som filformat (12 lämpliga exempel)

4. Spara med lösenord

I många fall är det mycket viktigt att spara en kopia av en Excel-arbetsbok i en XLSX formatet med ett extra lösenord. Detta gäller särskilt för arbetsböcker som har höga säkerhetskrav. Du kan uppnå denna uppgift mycket enkelt med hjälp av VBA och ange ett anpassat lösenord samtidigt som du sparar dokumentet. Ange följande för detta VBA kod i den Modul fönster:

 Sub Save_With_Password() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filnamn:="C:\Users\USER\Desktop\5700\Save with password.xlsx", Lösenord:="one" End Sub 

Slutligen, som vi såg tidigare, behöver du bara köra denna kod från Makroer Om du nu går till din sparade mapp bör du hitta filen med det namn som du gav den och den XLSX förlängning i slutet.

Läs mer: Excel VBA: Spara ark som ny arbetsbok utan att öppna den

5. Spara genom att rekommendera Läs endast

Ett mindre strikt sätt att skydda ett dokument är att göra det till en skrivskyddad fil. Om du sparar en kopia av en Excel-fil i XLSX format, kan du ställa in villkoret för skrivskydd med hjälp av VBA För att göra detta infogar du följande kod i VBA modul:

 Sub recommend_read_only() Application.DisplayAlerts = False ActiveWorkbook.SaveAs _ Filename:="C:\Users\USER\Desktop\5700\Recommend read only.xlsx", _ ReadOnlyRecommended:=True End Sub 

Kör sedan den här koden från Makroer alternativet i enlighet med Utvecklare Detta bör spara en XLSX kopia av den aktuella arbetsboken som visas nedan.

Läs mer: Excel VBA för att spara en fil med variabelt namn (5 exempel)

Saker att komma ihåg

• Se till att du ändrar sparvägen för XLSX filen i den VBA Den ska stämma överens med en mappsökväg i din dator.
• Dubbelkontrollera att du stavar alla inbyggda VBA fungerar precis som jag har gjort.
• Kom ihåg att i vissa fall kan VBA koden kanske inte längre är tillgänglig i VBA efter att ha kört koden.

Slutsats

Jag hoppas att de metoder som jag visade för att spara en kopia av en excel-fil i XLSX format med hjälp av VBA Om du fastnar i något av stegen eller om en kod inte fungerar, föreslår jag att du kontrollerar de koder som jag har tillhandahållit några gånger. Försök också att ändra koden i viss utsträckning för att förstå vad koden gör. Slutligen, för att lära dig mer om excel tekniker, följ vår ExcelWIKI Om du har några frågor, hör av dig till mig i kommentarerna.