Excel VBA Shrani kot obliko datoteke (12 primernih primerov)

Hugh West

16-10-2023 Makroji in Excel VBA
  • Deliti To
Hugh West

Pomembne informacije hranimo v Excel delovnih zvezkov. V skladu z našimi zahtevami izvajamo tudi različne operacije. Zato je treba datoteko shraniti, ko jo posodobimo. V nasprotnem primeru lahko izgubimo nekaj dragocenih podatkov. Obstaja nekaj učinkovitih načinov za Shrani . Excelov delovni zvezek Poleg tega je shranjevanje Excel datoteko po naših željah Format ali shranjevanje datoteke v želeni Lokacija je še ena pomembna naloga. V tem članku vam bomo predstavili najbolj uporabne primere Excel VBA Shrani kot obliko datoteke .

Prenesi delovni zvezek za prakso

Prenesite si naslednji delovni zvezek in vadite sami.

VBA Shrani kot obliko datoteke.xlsm

12 primerov programa Excel VBA Shrani kot obliko datoteke

Za ponazoritev bomo kot primer uporabili naslednji nabor podatkov. Na primer, nabor podatkov predstavlja Prodajalec , Izdelek in Neto prodaja podjetja. Tu bomo ta delovni zvezek shranili z uporabo Excel VBA Shrani kot obliko datoteke .

1. VBA za shranjevanje kot datoteko Excel

V prvem primeru vam bomo pokazali preprost Koda VBA da shranite Excel Zato za izvedbo naloge sledite spodnjim korakom.

KORAKI:

  • Najprej pojdite v Zavihek Razvijalec.
  • Nato izberite Visual Basic .

  • Zaradi tega je VBA odpre se okno.
  • Nato kliknite Vstavite .
  • Nato izberite Modul .

  • Zato je Modul Prikaže se okno.
  • Nato kopirajte naslednjo kodo in jo prilepite v polje. 
 Sub Primer_1() ActiveWorkbook.SaveAs End Sub

  • Zdaj zaženite kodo tako, da pritisnete F5 .
  • Zato boste morali vnesti ime datoteke, format in druge zahtevane informacije.
  • Na koncu bo datoteko shranil na določeno mesto.

Preberite več: Kako shraniti delovni list kot novo datoteko z uporabo programa Excel VBA

2. Določite razširitev datoteke s programom Excel VBA

V prejšnjem primeru smo morali ročno določiti Format datoteke po pritisku ukaza za zagon. Vendar bomo tukaj prikazali učinkovitejši način uporabe Excel VBA Shrani kot obliko datoteke za shranjevanje delovnih zvezkov v želeni obliki. Za imenom datoteke bomo preprosto navedli končnico datoteke. Tako vstavite spodnjo kodo v Modul okno. 

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

Na ta način lahko zaženete kodo in dobite datoteko v želeni obliki in na želenem mestu. shranite datoteko v obliki xlsx, vrsta xlsx namesto xlsm .

Preberi več: Excelov makro VBA za shranjevanje PDF v določeno mapo (7 idealnih primerov)

3. Excel VBA za uporabo kode formata datoteke

Lahko pa vnesemo Številka kode formata datoteke namesto da bi navedli končnico datoteke. Nekatere uporabne kode so: .xlsx = 51 , . xlsm = 52 , .xlsb = 50 , .xls = 56 . Zato kopirajte naslednjo kodo in jo prilepite v Modul škatla. 

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

Preberite več: [Popravljeno!] Zakaj Excel ne shrani mojega oblikovanja? (7 možnih razlogov)

4. Shranjevanje v isti imenik z VBA

V tem primeru bomo pokazali, kako Shrani v Isti imenik kjer je datoteka že z Excel VBA . Zato vstavite kodo v Modul okno. 

 Sub Example_4() ActiveWorkbook.SaveAs Ime datoteke:="excel vba shrani kot format datoteke" End Sub

Preberite več: Excel VBA: Izberite lokacijo in shranite kot PDF

5. VBA za shranjevanje v nov imenik

Morda pa bomo morali datoteko shraniti tudi v Nov imenik . Tako vnesite naslednjo kodo v Modul in ga zaženite. 

 Sub Example_5() Dim lokacija kot String lokacija = "D:\SOFTEKO\excel vba shrani kot format datoteke" ActiveWorkbook.SaveAs Ime datoteke:=lokacija End Sub

6. Vprašajte geslo za odprtje datoteke Excel

Poleg tega lahko uporabite Excel VBA Shrani kot obliko datoteke zaprositi za Geslo na . Odprite datoteko Excel . Zato vstavite in zaženite spodnjo kodo. 

 Sub Example_6() ActiveWorkbook.SaveAs _ Ime datoteke:="D:\SOFTEKO\excel vba save as file format.xlsm", Geslo:="ena" End Sub

Preberite več: Kako shraniti Excelovo datoteko z geslom

Podobna branja

  • Excel VBA za shranjevanje datoteke s spremenljivim imenom (5 primerov)
  • Kako shraniti Excel kot pokrajino PDF (s hitrimi koraki)
  • Excel VBA za shranjevanje kot datoteko z uporabo poti iz celice (s hitrimi koraki)
  • Koda VBA za gumb Shrani v Excelu (4 različice)
  • [Popravljeno!] Datoteka Excel CSV ne shrani sprememb (6 možnih rešitev)

7. Dodajanje gesla za urejanje v programu Excel

Poleg tega lahko zaprosite za Geslo za Urejanje na spletnem mestu Excel . Brez gesla se bo odprl le v obliki samo za branje. Kopirajte kodo in jo prilepite. Nato zaženite kodo. 

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

8. Odprite v obliki samo za branje

Tudi za odpiranje datoteke v Samo za branje Oblika vnesite spodnjo kodo in pritisnite F5 da ga zaženete. 

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

Preberite več: Kako odpreti Wordov dokument in ga shraniti kot PDF ali Docx z VBA Excel

9. Ustvarjanje pogovornega okna "Shrani kot

Druga uporabna operacija Excel VBA za shranjevanje kot oblika datoteke je ustvariti Dialogno okno Shrani kot . Zato vstavite spodnjo kodo. 

 Sub Example_9() Application.GetSaveAsFilename End Sub

Preberite več: Excelov makro za shranjevanje kot PDF (5 primernih primerov)

10. VBA za ustvarjanje in shranjevanje novega delovnega zvezka

Poleg shranjevanja datoteke lahko Ustvarjanje in shranjevanje novega delovnega zvezka s spletno stranjo . VBA Če želite opraviti nalogo, vnesite spodnjo kodo v Modul in pritisnite F5 . 

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

Preberite več: Excel VBA: shranite list kot nov delovni zvezek brez odpiranja

11. Shranite aktivni delovni zvezek v programu Excel

Podobno lahko shranimo aktivni delovni zvezek, kjer je že shranjen. Za izvedbo operacije vstavite zelo preprosto kodo. 

 Sub Example_11() ActiveWorkbook.Save End Sub

Preberite več: Kako shraniti makro za vse delovne zvezke v Excelu (z enostavnimi koraki)

12. VBA za shranjevanje v formatu PDF v Excelu

Nazadnje lahko uporabimo PDF razširitev datoteke v našem VBA kodo shranite v Format PDF . Torej, uporabite Excel VBA Shrani kot obliko datoteke Nato zaženite kodo tako, da pritisnete F5 . 

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

Preberite več: Kako shraniti Excel kot PDF (6 koristnih načinov)

Zaključek

Odslej boste lahko shranjevali datoteke z Excel VBA Shrani kot obliko datoteke po zgoraj opisanih primerih. Uporabljajte jih še naprej in nam sporočite, če imate več načinov za izvedbo naloge. ExcelWIKI Ne pozabite, da v spodnjem razdelku za komentarje napišete komentarje, predloge ali vprašanja, če jih imate.

Prejšnja objava Kako združiti podatke iz več vrstic v Excelu (4 hitre metode)
Naslednja objava Kako izračunati odstotek popusta s formulo v Excelu

Hugh West je zelo izkušen trener Excela in analitik z več kot 10-letnimi izkušnjami v industriji. Po izobrazbi je diplomirani računovodstvo in finance ter magisterij poslovne administracije. Hugh ima strast do poučevanja in je razvil edinstven pristop k poučevanju, ki ga je enostavno slediti in razumeti. Njegovo strokovno znanje o Excelu je pomagalo na tisoče študentom in strokovnjakom po vsem svetu, da so izboljšali svoje sposobnosti in se izkazali v karieri. Prek svojega bloga Hugh deli svoje znanje s svetom, ponuja brezplačne vadnice za Excel in spletno usposabljanje, ki posameznikom in podjetjem pomaga doseči njihov polni potencial.