Otvorena radna knjiga Excel VBA

Najčešći postupci u svakodnevnom životu su otvaranje izvrsnih radnih knjiga dok radite s Excelom. Ne možete raditi u Excelu bez otvaranja programa Excel Workbooks ili Excel datoteke. U ovom ćemo članku opisati kako možemo otvoriti Excel radne bilježnice uz pomoć VBA.

Metode otvaranja Exel radnih bilježnica u VBA

Postoje dvije metode za otvaranje excel radnih knjiga u VBA i obje ćemo metode obuhvatiti u ovom članku.

Ovdje možete preuzeti VBA radnu knjižicu Otvoreni predložak Excela - VBA radna knjiga Otvorite predložak Excela

1. metoda - Excel VBA Workbooks.open metoda

Prva metoda u VBA je uporaba ugrađene funkcije Workbooks.open . U funkciji "Workbooks.open" nalazi se 15 neobaveznih argumenata, a za pokrivanje svih 15 argumenata trebat će puno vremena. Pa ćemo samo pokušati razumjeti neke osnove Workbooks.open i vidjeti kako ovu funkciju u VBA možemo koristiti za otvaranje Radnih knjiga.

Dakle, prvi korak u ovoj metodi je da biste trebali znati naziv datoteke u Excelovim radnim knjigama. Ispod je izjava za otvaranje radnih knjiga. "Workbooks.otvorite" File_Name "

Ili

Radne bilježnice. Otvorite naziv datoteke: = "Ime datoteke"

"Ime datoteke" naziv je Radnih knjiga koje želite otvoriti. Ali ovdje morate biti oprezni jer morate pružiti puni put gdje se datoteka sprema i naziv datoteke s nastavkom datoteka (.XLS, .XLSX, .xlsm itd.). Možemo uzeti primjer donjeg makronaredbe za razumijevanje ove funkcije.

Primjer

Pretpostavimo da želite otvoriti excel datoteku s nazivom "Test File" koja je spremljena u D Pogonu računala. Kreirajte makronaredbu u radnoj knjizi s makro omogućenim Excelom. Slijedite dolje navedene korake za upotrebu Excelove VBA Workbooks.open metode.

Korak 1: Kliknite na Datoteka.

2. korak: Kliknite na Opcije .

Korak 3: Kliknite na Prilagodi vrpcu .

4. korak: Provjerite je li polje za razvojne programere označeno kao dolje i kliknite OK.

Korak 5: Nakon što imate karticu za razvojne programere, kliknite na Visual basic kao što je prikazano na snimci zaslona u nastavku.

Nakon što kliknete na Visual Basics, trebate započeti kodiranje makronaredbe.

Korak 6: Unesite donji kôd u VBA modul.

Kodirati:

 Sub Open_workbook () Završetak Sub

Ovaj kôd sadrži naziv vaše radne knjige.

Korak 7: Unesite kôd koji može otvoriti radnu knjižicu spremljenu u D pogonu računala.

Kodirati:

 Sub Open_workbook () Workbooks.Otvorite naziv datoteke: = "D: \ Test File.xlsx" End Sub

Korak 8: Pokrenite kôd pritiskom na tipku F5 ili klikom na gumb Play. Nakon pokretanja makronaredbe vidjet ćete da se datoteka Excela automatski otvara. Kao što možete vidjeti u gornjem kôdu, makro će otvoriti Excel datoteku s nazivom "Test File.xlsx" koja se sprema u D pogon računala. Spomenuti put je vrlo jednostavan, jer ne postoje mape i podmape za dobivanje Radnih knjiga.

To postaje izazovno jer se mnogi ljudi ne sjećaju putanje i ako se Put datoteke u kojoj je spremljena malo promijeni, makro neće raditi. Makronaredba neće raditi čak i ako se naziv datoteke promijeni jednim slovom. Ako se promijeni Path / Name datoteke, morate promijeniti VBA kod Makronaredbe. Posao to čini napornim, a također nije pogrešno. Kako bismo bili sigurni da se vaš makronaredba savršeno pokreće, a da vam ne prikaže grešku, upotrijebit ćemo drugu metodu koja je jednostavna za rukovanje i neće vam pogriješiti čak i kada se ne sjećate imena staze ili čak i kad se naziv datoteke promijeni,

2. metoda - Otvorite naziv datoteke

Kao što znate koji su izazovi s kojima se susrećemo u Prvoj metodi promjene puta i naziva datoteke, ova metoda izbjegava oba izazova. Ova metoda daje mogućnost pregledavanja vašeg računala do mjesta na kojem se sprema datoteka i otvara one radne knjižice koje želite otvoriti.

Ova metoda zapravo djeluje u dva dijela.

Prvi dio ove metode je Application.GetOpenFileName. Ovaj dio omogućava vam pregledavanje računala i odabir putanje na koju se datoteka sprema. Prvi dio ne otvara datoteku koju želite otvoriti.

Drugi dio je otvaranje datoteke za koju i dalje morate biti ovisni o Prvoj metodi (metoda VBA Workbooks.open). U Application.GetOpenFileName postoji 5 argumenata, ali samo ćemo gledati osnove kao što smo to učinili u prvoj metodi. Pokušajmo sada razumjeti ovu metodu uz pomoć primjera.

Primjer

Pretpostavimo da želite otvoriti "Test File" spremljenu u D pogonu računala, samo trebate slijediti korake u nastavku.

Korak 1: Slijedite korak 1 spomenut u prvom primjeru za otvaranje Visual Basic Editor-a ili Otvori Visual Basic Editor iz kartice Developer.

Korak 2: Unesite kôd dolje koji daje naziv makronaredbi.

Kodirati:

 Sub Open_workbook_example2 () Kraj Sub

Korak 3: Unesite kôd u nastavku. Ova izjava deklarira Naziv datoteke kao varijabilno jer ovdje ne nalažemo nijedan put ili naziv datoteke jer se s vremena na vrijeme može mijenjati.

Kodirati:

 Sub Open_workbook_example2 () Dim Myfile_Name kao varijanta Kraj Sub

Korak 4: Unesite kôd dolje. Ova izjava otvara donji dijaloški okvir i možete pregledavati mape da biste otišli na put gdje je datoteka spremljena. Također, pokazat će Excel datoteku tijekom pregledavanja jer smo stavili filter za Excel datoteke.

Kodirati:

 Pod Open_workbook_example2 () Dim Myfile_Name kao varijanta Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel datoteke (*. Xl *), *. Xl *)") Kraj Sub

Korak 5: Unesite kôd dolje. Ova izjava je If If izjava koja se koristi kada datoteka .Name nije jednaka false, otvorite odabranu Excel datoteku.

Kodirati:

 Pod Open_workbook_example2 () Dim Myfile_Name kao varijanta Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel datoteke (*. Xl *), *. Xl *)") Ako je Myfile_Name False onda Workbooks.Otvorite naziv datoteke: = Myfile_Name End Sub

Korak 6: Unesite kôd dolje. Ova izjava zatvara uvjet If ako je u Makronaredbi.

Kodirati:

 Pod Open_workbook_example2 () Dim Myfile_Name kao varijanta Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel datoteke (*. Xl *), *. Xl *)") Ako je Myfile_Name False onda Workbooks.Otvorite naziv datoteke: = Myfile_Name End If End Sub

Korak 7: Sada pokrenite kôd pritiskom na tipku F5 ili klikom na gumb Reproduciraj. Vidjet ćete dijaloški okvir za pregled datoteke će se otvoriti. Potražite radnu površinu na kojoj je datoteka spremljena. Sada ćete datoteku moći vidjeti u D pogonu. Odaberite datoteku i kliknite otvori.

Kao što smo upravo vidjeli u svom primjeru, ne trebamo se brinuti oko naziva datoteke i putanje na kojoj je datoteka spremljena. Jednostavno se možemo kretati do mape u koju se sprema naša datoteka i odabrati datoteku koju želimo otvoriti. Stoga lako možemo zaključiti da je ova metoda mnogo učinkovitija u usporedbi s prvom metodom.

Stvari koje treba zapamtiti

  • Provjerite je li naziv puta i naziv datoteke točan dok koristite prvu metodu. Makronaredba neće raditi ako postoji promjena slovo ili razmak u putu ili nazivu datoteke.
  • Provjerite jesu li filtri navedeni u kodu u 2. metodi ispravni. Postoje mnogi formati Excela koji možda nisu vidljivi zbog filtra.
  • Provjerite jesu li deklaracija i kôd koji se koristi u VBA ispravni kako biste izbjegli pogreške.

Preporučeni članci

Ovo je vodič za VBA Workbook Open. Ovdje smo raspravljali o dvije različite metode za otvaranje radne knjižice pomoću Excel VBA koda, zajedno s praktičnim primjerima i download Excelovim predložakom. Možete pogledati i sljedeće članke da biste saznali više -

  1. Kompletan vodič za VBA radnu knjižicu
  2. HYPERLINK Formula u Excelu
  3. Otvorite datoteke s VBA FileDialog
  4. Primjeri proračunskih tablica u Excelu

Kategorija:

VBA