Excel VBA Gem som filformat (12 egnede eksempler)

Hugh West

16-10-2023 Makroer & Excel VBA
  • Del Dette
Hugh West

Vi gemmer vigtige oplysninger i Excel Vi udfører også forskellige operationer i henhold til vores behov. Så det er nødvendigt at gemme filen, når vi opdaterer den. Ellers kan vi miste nogle værdifulde data. Der er nogle effektive måder at Gem en Excel-arbejdsbog . Desuden er det at spare en Excel fil som ønsket i henhold til vores ønskede Format , eller lagring af filen i den ønskede Placering er en anden vigtig opgave. I denne artikel vil vi vise dig de mest nyttige eksempler på Excel VBA Gem som filformat .

Download arbejdsbog til øvelser

Download følgende arbejdsbog for at øve dig selv.

VBA Gem som filformat.xlsm

12 eksempler på Excel VBA Gem som filformat

For at illustrere dette bruger vi følgende datasæt som et eksempel. Datasættet repræsenterer f.eks. Sælger , Produkt , og Nettoomsætning Her gemmer vi denne arbejdsbog ved at anvende Excel VBA Gem som filformat .

1. VBA til at gemme som Excel-fil

I vores første eksempel viser vi dig en simpel VBA-kode for at gemme en Excel Følg derfor nedenstående trin for at udføre opgaven.

TRIN:

  • Først skal du gå til fanen Udvikler.
  • Vælg derefter Visual Basic .

  • Som følge heraf har VBA vindue vil dukke op.
  • Derefter skal du klikke på Indsæt .
  • Vælg derefter den Modul .

  • Derfor er det Modul vinduet vises.
  • Kopier derefter følgende kode, og indsæt den i feltet. 
 Sub Example_1() ActiveWorkbook.SaveAs End Sub

  • Kør nu koden ved at trykke på F5 .
  • Derfor skal du indtaste filnavnet, formatet og andre oplysninger, som du bliver bedt om.
  • Til sidst gemmer den filen på den angivne placering.

Læs mere: Sådan gemmer du et regneark som en ny fil ved hjælp af Excel VBA

2. Angiv filudvidelse med Excel VBA

I det foregående eksempel skulle vi manuelt angive Filformat efter at have trykket på kommandoen run. Men her vil vi vise en mere effektiv måde at anvende Excel VBA Gem som filformat for at gemme arbejdsbøger i det ønskede format. Vi angiver blot filudvidelsen efter filnavnet. Så indsæt nedenstående kode i Modul vindue. 

 Sub Example_2() Dim location As String location = "D:\SOFTEKO\excel vba save as file format.xlsm" ActiveWorkbook.SaveAs Filename:=location End Sub

På denne måde kan du køre koden for at få filen i det ønskede format og på den ønskede placering. gem filen i xlsx-formatet, type xlsx i stedet for xlsm .

Læs mere: Excel VBA-makro til at gemme PDF-filer i en bestemt mappe (7 ideelle eksempler)

3. Excel VBA til brug af filformatkode

Vi kan dog indtaste den Kode for filformat nummer i stedet for at angive filudvidelsen. Nogle nyttige koder er: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 Kopier derfor følgende kode og indsæt den i Modul boks. 

 Sub Example_3() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location, FileFormat:=52 End Sub

Læs mere: [Rettet!] Hvorfor gemmer Excel ikke min formatering? (7 mulige årsager)

4. Gem i samme mappe med VBA

I dette eksempel viser vi, hvordan man Gem i den Samme bibliotek hvor filen allerede er med Excel VBA Derfor skal du indsætte koden i Modul vindue. 

 Sub Example_4() ActiveWorkbook.SaveAs Filename:="excel vba save as file format" End Sub

Læs mere: Excel VBA: Vælg placering og gem som PDF

5. VBA til lagring i ny mappe

Vi kan dog også have brug for at gemme filen i en Nyt bibliotek Skriv således følgende kode i Modul boksen og køre den. 

 Sub Example_5() Dim location As String location = "D:\SOFTEKO\excel vba save as file format" ActiveWorkbook.SaveAs Filename:=location End Sub

6. Bed om adgangskode for at åbne Excel-fil

Derudover kan du anvende Excel VBA Gem som filformat at anmode om en Adgangskode til Åbn Excel-fil Så indsæt og kør nedenstående kode. 

 Sub Example_6() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", Password:="one" End Sub

Læs mere: Sådan gemmer du Excel-fil med adgangskode

Lignende læsninger

  • Excel VBA til at gemme fil med variabelt navn (5 eksempler)
  • Sådan gemmer du Excel som PDF Landscape (med hurtige trin)
  • Excel VBA til at gemme som fil ved hjælp af sti fra celle (med hurtige trin)
  • VBA-kode til knappen Gem i Excel (4 varianter)
  • [Rettet!] Excel CSV-fil gemmer ikke ændringer (6 mulige løsninger)

7. Tilføj adgangskode til redigering i Excel

Desuden kan du anmode om en Adgangskode til Redigering af på Excel Uden adgangskode åbnes den kun i skrivebeskyttet format. Kopier koden og indsæt den. Kør derefter koden. 

 Sub Example_7() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", WriteRes:="one" End Sub

8. Åbn i skrivebeskyttet format

Igen, for at åbne en fil i skrivebeskyttet Format , indtast nedenstående kode og tryk på F5 til at køre det. 

 Sub Example_8() ActiveWorkbook.SaveAs _ Filename:="D:\SOFTEKO\excel vba save as file format.xlsm", _ ReadOnlyRecommended:=True End Sub

Læs mere: Sådan åbnes Word-dokumentet og gemmes som PDF eller Docx med VBA Excel

9. Generer dialogboksen "Gem som

En anden nyttig operation af Excel VBA til at gemme som filformat er at generere Dialogboksen Gem som Indsæt derfor nedenstående kode. 

 Sub Example_9() Application.GetSaveAsFilename End Sub

Læs mere: Excel-makro til at gemme som PDF (5 egnede eksempler)

10. VBA til at oprette & Gem ny arbejdsbog

Ud over at gemme en fil kan vi også Opret & Gem ny projektmappe med VBA kode. For at udføre opgaven skal du skrive nedenstående kode i Modul vindue, og tryk på F5 . 

 Sub Example_10() Dim book As Workbook Set book = Workbooks.Add Application.DisplayAlerts = False book.SaveAs Filename:="D:\SOFTEKO\excel vba save as file format.xlsm" Application.DisplayAlerts = True End Sub

Læs mere: Excel VBA: Gem ark som ny projektmappe uden at åbne

11. Gem aktiv arbejdsmappe i Excel

På samme måde kan vi gemme den aktive arbejdsbog, hvor den allerede er gemt. For at udføre operationen skal du indsætte den meget enkle kode. 

 Sub Example_11() ActiveWorkbook.Save End Sub

Læs mere: Sådan gemmer du en makro til alle arbejdsbøger i Excel (med nemme trin)

12. VBA til at gemme som PDF-format i Excel

Til sidst kan vi bruge PDF filudvidelse i vores VBA kode til at gemme i PDF-format . Så, anvende Excel VBA Gem som filformat nedenfor. Kør derefter koden ved at trykke på F5 . 

 Sub Example_12() ActiveSheet.SaveAs Filename:="excel vba save as file format.pdf" End Sub

Læs mere: Sådan gemmer du Excel som PDF (6 nyttige måder)

Konklusion

Fremover vil du kunne gemme filer med Excel VBA Gem som filformat efter de ovenfor beskrevne eksempler. Fortsæt med at bruge dem, og lad os vide, hvis du har flere måder at udføre opgaven på. Følg ExcelWIKI hjemmeside for flere artikler som denne. Glem ikke at skrive kommentarer, forslag eller spørgsmål, hvis du har nogen, i kommentarfeltet nedenfor.

Forrige indlæg Sådan konsoliderer du data fra flere rækker i Excel (4 hurtige metoder)
Næste indlæg Sådan beregnes rabatprocenten med formel i Excel

Hugh West er en meget erfaren Excel-træner og analytiker med over 10 års erfaring i branchen. Han har en bachelorgrad i regnskab og finans og en kandidatgrad i Business Administration. Hugh har en passion for undervisning og har udviklet en unik undervisningstilgang, der er nem at følge og forstå. Hans ekspertviden om Excel har hjulpet tusindvis af studerende og fagfolk verden over med at forbedre deres færdigheder og udmærke sig i deres karriere. Gennem sin blog deler Hugh sin viden med verden og tilbyder gratis Excel-tutorials og onlinetræning for at hjælpe enkeltpersoner og virksomheder med at nå deres fulde potentiale.