Odprt je delovni zvezek Excela VBA

Najpogostejše dejavnosti v vsakodnevnem življenju je, da odprete Excelove delovne zvezke, ko delate z Excelom. V Excelu ne morete delati, če ne odprete Excelovih delovnih zvezkov ali datoteke Excela. V tem članku bomo opisali, kako lahko s pomočjo VBA odpremo Excelove delovne zvezke.

Metode za odpiranje Exelovih delovnih zvezkov v VBA

Obstajata dva načina za odpiranje excel Workbooks v VBA in obe metodi bomo obravnavali v tem članku.

Tukaj lahko prenesete predlogo VBA Workbook Open Excel - VBA Workbook Open Excel Template

1. metoda - Delovni zvezki Excela VBA.odprta metoda

Prva metoda v VBA je uporaba vgrajene funkcije Workbooks.open . V funkciji „Workbooks.open“ je 15 neobveznih argumentov in za pokrivanje vseh 15 argumentov bo trajalo veliko časa. Tako bomo samo poskušali razumeti nekaj osnov Workbooks.open in videli, kako lahko to funkcijo v VBA uporabimo za odpiranje Workbooks.

Prvi korak pri tej metodi je, da morate vedeti ime datoteke v Excelovih delovnih zvezkih. Spodaj je izjava o odpiranju delovnih zvezkov. "Delovni zvezki.odprite" Ime datoteke "

Or

Delovni zvezki. Odprite ime datoteke: = ”Ime datoteke”

"Ime datoteke" je ime delovnih zvezkov, ki jih želite odpreti. Vendar morate biti tu previdni, ker morate navesti celotno pot, kjer se datoteka shrani, in ime datoteke s pripono datotek (.XLS, .XLSX, .xlsm itd.). Za razumevanje te funkcije lahko vzamemo primer spodnjega makra.

Primer

Recimo, da želite odpreti Excelovo datoteko z imenom "Test File", ki je shranjena v pogonu D računalnika. Ustvarite makro v delovnem zvezku z makro v Excelu. Za uporabo metode Excel VBA Workbooks.open uporabite naslednja navodila.

1. korak: Kliknite na Datoteka.

2. korak: Kliknite na Možnosti .

3. korak: kliknite Prilagodi trak .

4. korak: Prepričajte se, da je polje za razvijalce označeno kot spodaj in kliknite OK.

5. korak: Ko imate zavihek razvijalca, kliknite na Visual basic, kot je prikazano na spodnjem posnetku zaslona.

Ko kliknete na vizualne osnove, morate začeti s kodiranjem makra.

6. korak: V modul VBA vnesite spodnjo kodo.

Koda:

 Pod Open_workbook () Konec pod

Ta koda določa ime vašega delovnega zvezka.

7. korak: Vnesite kodo, ki lahko odpre delovni zvezek, shranjen v pogonu D računalnika.

Koda:

 Pod Open_workbook () Workbooks.Odpri Ime datoteke: = "D: \ Test File.xlsx" End Sub

8. korak: Zaženite kodo s pritiskom na tipko F5 ali s klikom na gumb Play. Po zagonu makra boste ugotovili, da se datoteka excel samodejno odpre. Kot lahko vidite v zgornji kodi, bo makro odpiral Excelovo datoteko z imenom "Test File.xlsx", ki je shranjena v pogonu D računalnika. Zgoraj omenjena pot je precej preprosta, ker ni map in podmap, ki bi jih dobili Delovni zvezki.

To postane izziv, ker se veliko ljudi ne spomni poti in če se pot datoteke, kjer je shranjena, nekoliko spremeni, makro ne bo deloval. Makro ne bo deloval, tudi če se ime datoteke spremeni z eno samo črko. Če se torej spremeni pot / ime datoteke, morate spremeniti kodo VBA makra. Zaradi tega je Job dolgočasno in tudi brez napak. Torej, da se prepričamo, da vaš makro deluje brez uporabe napake, bomo uporabili drugo metodo, ki je enostavna za uporabo in ne bo napake, tudi če se ne spomnite imena poti ali celo, ko se ime datoteke spremeni .

2. način - Odprite ime datoteke

Ker poznate izzive, s katerimi se soočamo v Prvi metodi spremembe poti in imena datoteke, se ta metoda izogiba oba izziva. Ta metoda omogoča brskanje po računalniku do mesta, kjer je shranjena datoteka, in odpre tiste delovne zvezke, ki jih želite odpreti.

Ta metoda dejansko deluje v dveh delih.

Prvi del te metode je Application.GetOpenFileName. Ta del vam omogoča brskanje po računalniku in izbiranje poti, kjer je shranjena datoteka. Prvi del ne odpre datoteke, ki jo želite odpreti.

Drugi del je, da odprete datoteko, za katero morate biti še vedno odvisni od prve metode (metoda VBA Workbooks.open). V Application.GetOpenFileName je 5 argumentov, vendar bomo gledali le na osnove, kot smo to storili v prvi metodi. Zdaj pa poskusimo razumeti to metodo s pomočjo primera.

Primer

Recimo, da želite odpreti "Test File", shranjeno v pogonu D računalnika, potem morate samo slediti spodnjim korakom.

1. korak: Sledite 1. koraku, ki je omenjen v prvem primeru za odpiranje urejevalnika Visual Basic ali odpiranje urejevalnika Visual Basic z zavihka Developer.

2. korak: Vnesite spodnjo kodo, ki določa ime vašega makra.

Koda:

 Pod Open_workbook_example2 () Konec pod

3. korak: Vnesite spodnjo kodo. Ta izjava razvrsti ime datoteke kot spremenljivo, ker tukaj ne določimo nobene poti ali imena datoteke, ker se lahko občasno spreminja.

Koda:

 Pod Open_workbook_example2 () Dim Myfile_Name kot različica konec Sub

4. korak: Vnesite spodnjo kodo. Ta izjava odpre spodnje pogovorno okno in lahko brskate po mapah, da greste na pot, kjer je datoteka shranjena. Prav tako bo med brskanjem prikazala datoteko Excel, ker smo postavili filter za datoteke Excel.

Koda:

 Pod Open_workbook_example2 () Dim Myfile_Name kot varianta Myfile_Name = Application.GetOpenFilename (FileFilter: = "Datoteke Excel (*. Xl *), *. Xl *)") Konec pod

5. korak: Vnesite spodnjo kodo. Ta stavek je izjava If If, ki se uporablja, kadar datoteka .Name ni enaka lažnivi, nato odprite izbrano datoteko Excel.

Koda:

 Pod Open_workbook_example2 () Dim Myfile_Name kot varianta Myfile_Name = Application.GetOpenFilename (FileFilter: = "Datoteke Excel (*. Xl *), *. Xl *)") Če je Myfile_Name False, potem Workbooks. Odprite ime datoteke: = Myfile_Name End Sub

6. korak: Vnesite spodnjo kodo. Ta izjava zapre pogoj If v makrou.

Koda:

 Pod Open_workbook_example2 () Dim Myfile_Name kot varianta Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel datoteke (*. Xl *), *. Xl *)") Če je Myfile_Name False, potem Workbooks.Odprite ime datoteke: = Myfile_Name End, če konec Sub

7. korak: Zdaj zaženite kodo s pritiskom na tipko F5 ali s klikom na gumb Play. Videlo se bo pogovorno okno za brskanje po datoteki. Poiščite namizje, na katerem je datoteka shranjena. Zdaj si boste lahko datoteko ogledali v pogonu D. Izberite datoteko in kliknite Odpri.

Kot smo pravkar videli v našem primeru, nam ni treba skrbeti za ime datoteke in ime poti, kamor je datoteka shranjena. Lahko se pomaknemo do mape, v kateri je shranjena naša datoteka, in izberemo datoteko, ki jo želimo odpreti. Tako lahko zlahka sklepamo, da je ta metoda v primerjavi s prvo metodo veliko bolj učinkovita.

Stvari, ki jih je treba zapomniti

  • Prepričajte se, da sta ime poti in ime datoteke med uporabo prve metode pravilna. Makro ne bo deloval, če bo v poti ali imenu datoteke prišlo do spremembe črke ali presledka.
  • Prepričajte se, da so filtri, omenjeni v kodi v 2. metodi, pravilni. Obstaja veliko formatov Excela, ki zaradi filtra morda niso vidni.
  • Prepričajte se, da sta deklaracija in koda, uporabljena v VBA pravilno, da se izognete napakam.

Priporočeni članki

To je vodnik po VBA Workbook Open. Tukaj razpravljamo o dveh različnih metodah za odpiranje delovnega zvezka z uporabo Excelove kode VBA skupaj s praktičnimi primeri in prenosno predlogo Excela. Če želite izvedeti več, si oglejte tudi naslednje članke -

  1. Celoten vodnik po delovnem zvezku VBA
  2. HYPERLINK Formula v Excelu
  3. Odprite datoteke z datoteko VBA FileDialog
  4. Primeri preglednice Excela

Kategorija:

VBA