Kako otvoriti radnu svesku s imenom varijable sa Excel VBA

  • Podijeli Ovo
Hugh West

Naravno, možda ćemo morati otvoriti datoteku iz nadređene Excel datoteke koristeći VBA u drugom direktoriju. Ali istovremeno, imamo različite vrste kriterijuma i o tome kako želimo da otvorimo radnu svesku. Ako ste znatiželjni da znate kako možete otvoriti radnu knjigu s imenom varijable, onda bi vam ovaj članak mogao dobro doći. U ovom članku raspravljamo o tome kako možete otvoriti radnu svesku s imenom varijable koristeći VBA u Excelu sa detaljnim objašnjenjima.

Preuzmite radnu svesku za vježbe

Preuzmite ovu radnu svesku za vježbanje ispod.

Otvorite radnu knjigu s imenom varijable koristeći VBA.xlsm

Sample.xlsx

4 Jednostavno Načini otvaranja radne sveske s imenom varijable pomoću VBA u Excelu

Koristit ćemo donji skup podataka za demonstraciju. Imamo informacije o proizvodima nekoliko proizvoda s njihovim ID-om. ovo je primjer datoteke koju ćemo otvoriti pomoću VBA koda.

1. Korištenje Workbook.Open Property

Upotreba Workbook .Open , možemo otvoriti fajlove spominjanjem direktorija, ili ne spominjanjem lokacije. Otvorenu datoteku također možemo učiniti samo za čitanje.

1.1 Otvorena radna knjiga spominjanje putanje datoteke

U sljedećoj metodi ćemo koristiti Workbook.Open Property da otvorite datoteku direktno iz spomenutog direktorija lokacije datoteke. Bez obzira gdje se datoteka nalazi, možemo je otvoritišto je Sub Open_File_with_Add_Property()

⮚ Zatim deklariramo varijablu File_Path kao String type.

3859

⮚ I postavite varijablu File_Path na lokaciju datoteke.

5612

wb deklariramo kao varijablu u tipu Workbook .

7419

⮚ Radna knjiga se zatim dodaje iz direktorija pohranjenog na lokaciji File_Path pomoću svojstva Workbook.Add .

3425

⮚ Konačno, završavamo podprocedura ovog koda.

Pročitajte više: [Popravljeno!] Metoda Otvaranje radnih knjiga objekata nije uspjelo (4 rješenja)

Zaključak

Da sumiramo, na pitanje kako možemo otvoriti radne knjige s imenima varijabli koristeći VBA ovdje je odgovoreno 4 različita primjera. Metoda VBA Macro zahtijeva prethodno znanje VBA da bi se razumjelo od nule.

Za ovaj problem, dostupna je radna sveska s omogućenim makroima za preuzimanje gdje možete vježbati ove metode.

Slobodno postavljajte pitanja ili povratne informacije putem odjeljka za komentare. Svaki prijedlog za poboljšanje zajednice Exceldemy bit će vrlo vrijedan

jednostavno.

Koraci

  • Imamo fajl pohranjen u folderu dokumenata koji treba da otvorimo.
  • Koristit ćemo datoteku ime kao promenljivu, a zatim otvorite datoteku koristeći mali VBA makro.
  • Tačan direktorijum fajla prikazan je ispod u prozoru sa svojstvima.

  • Prvo, idite na karticu Programer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Developer . Ili također možete pritisnuti ' Alt+F11' da otvorite Visual Basic Editor .

  • Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Insert > Module .

  • Sljedeće, u prozoru Module editor, upišite sljedeći kod:
4825

  • Zatim zatvorite Prozor modula.
  • Nakon toga idite na karticu Prikaz > Makroi .
  • Zatim kliknite na Prikaz Makroi .

  • Nakon što kliknete na Prikaži makroe, odaberite makroe koje ste upravo kreirali. Ovdje se zove Otvori_sa_putanjem_datoteke . Zatim kliknite Run .

  • Nakon toga će se otvoriti datoteka Sample .

🔎 Raščlamba koda

8163

⮚ Prvo, dajemo naziv za pod- procedura koja je Open_with_File_Path .

6850

⮚ Zatim stavljamo lokaciju datoteke u File_Path varijablu

5818

⮚Zatim deklariramo našu varijablu wrkbk , čiji je tip radna knjiga.

3018

⮚ Zatim otvaramo datoteku nazvanu u varijablu direktorija File_Path i postavljamo datoteku kao wrkbk varijabla.

9276

⮚ Konačno, završavamo podproceduru ovog koda.

Pročitajte više: Kako Otvaranje radne sveske iz putanje pomoću Excel VBA (4 primjera)

1.2 Otvorite radnu svesku bez spominjanja putanje datoteke

U sljedećoj metodi ćemo otvoriti datoteku iz nadređene mape, gdje je glavna datoteka je sačuvana. Datoteka se može otvoriti bez navođenja bilo koje lokacije u kodu. Ovaj fajl samo mora biti u istoj fascikli kao i roditeljski folder.

Koraci

  • Imamo drugu datoteku sačuvanu u istom direktorijumu gde je i roditelj Excel datoteka je sada sačuvana.
  • Ime datoteke je 1.

  • Prvo, idite na Programer karticu i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Developer . Ili također možete pritisnuti ' Alt+F11 ' za otvaranje Visual Basic Editor .

  • Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Insert > Module .

  • Sljedeće, u prozoru Module editor, upišite sljedeći kod:
Dim File_Path As String

  • Zatim zatvorite Prozor modula.
  • Nakon toga idite na karticu Prikaz > Makroi .
  • Zatim kliknite na PrikazMakroi .

  • Nakon što kliknete Prikaži makroe, odaberite makronaredbe koje ste upravo kreirali. Ovdje se zove Otvoreno_bez_putanja_datoteke . Zatim kliknite na Run.

  • Nakon što pritisnete Run , primijetit ćete da je datoteka pod nazivom 1 sada otvorena.
  • I ovako otvaramo radnu knjigu sa imenom varijable koristeći VBA u Excelu.

🔎 Raščlamba Kod

3474

⮚ Prvo, dajemo ime za potproceduru koje je Sub Open_without_File_Path()

2673

⮚ Mi deklariramo wrkbk kao varijabla u tipu radne knjige

7020

⮚ Otvaramo datoteku iz roditeljskog direktorija pod nazivom 1.xlsx .

5849

⮚ Konačno, završavamo podproceduru ovog koda.

1.3 Otvori radnu svesku kao samo za čitanje

Metoda je prilično slična prvoj metodi, ali ovdje ćemo otvoriti datoteku u načinu samo za čitanje, što znači da nećemo može promijeniti bilo koji podatak ili vrijednost u Excel datoteci.

Koraci

  • Datoteka koju želimo otvoriti je sačuvana u folderu dokumenata.
  • A ovo je datoteka koju želimo otvoriti samo za čitanje.

  • Prvo, idite na Programer karticu i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Developer . Ili također možete pritisnuti ' Alt+F11 ' da otvorite Visual Basic Editor.

  • Tada će biti novi dijaloškom okviru, u tom dijaloškom okviru kliknite na Insert > Module .

  • Dalje, u prozoru uređivača Module upišite sljedeći kod:
3930
  • Zatim zatvorite prozor Modul .
  • Nakon toga idite na Prikaz karticu > Makroi .
  • Zatim kliknite na Prikaži makroe .

  • Nakon što kliknete Pogled Makroi, odaberite makronaredbe koje ste upravo kreirali. Ovdje je naziv Otvoreno_sa_datotekom_Samo za čitanje . Zatim kliknite Pokreni .

  • Nakon što kliknete na Pokreni , vidjet ćemo da je datoteka sada otvorena samo za čitanje, kao što je prikazano u naslovnoj traci.

🔎 Raščlamba koda

1496

⮚ Prvo, dajemo ime za potproceduru koje je Open_with_File_Read_Only()

2269

⮚ Mi deklariramo wrkbk kao varijablu u tipu radne knjige

8766

⮚ Datoteka će se tada otvoriti iz određenog direktorija, a datoteka će biti postavljena samo za čitanje zadnjim argumentom.

5386

⮚ Konačno, završavamo podprocedura ovog koda.

Pročitajte više: Kako otvoriti radnu knjigu samo za čitanje sa Excel VBA

2. Korišćenje okvira za poruke

Gotovo slično prethodnoj metodi, možemo otvoriti datoteke putem VBA koda ovdje u Excelu, ali u ovom slučaju, ovdje ćemo ugraditi mali okvir za poruke.

Koraci

  • Prvo, idite na karticu Developer i kliknite na Visual Basic . Ako to nemate, morate omogućitiKartica Developer . Ili također možete pritisnuti ' Alt+F11' da otvorite Visual Basic Editor .

  • Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Insert > Module .

  • Sljedeće, u prozoru Module editor, upišite sljedeći kod:
7007

  • Zatim zatvorite Prozor modula.
  • Nakon toga idite na karticu Prikaz > Makroi .
  • Zatim kliknite na Prikaz Makroi .

  • Nakon što kliknete na Prikaži makroe, odaberite makroe koje ste upravo kreirali. Ovdje se zove Open_File_with_Messege_Box . Zatim kliknite Pokreni .

  • Tada smo dobili okvir upozorenja koji pokazuje da Datoteka je uspješno otvorena .
  • Zatim kliknite OK .

  • I tada ćemo vidjeti da je datoteka sada otvori.

  • I onda pokušavamo malo izmijeniti kod.
  • Mijenjamo naziv datoteke u Sample10 , a zapravo ne postoji datoteka pod nazivom Sample10 u folderu dokumenata.

  • Onda mi Ponovo pokrenite kod i pojavit će se okvir s porukom Otvaranje datoteke nije uspjelo .
  • Kliknite OK nakon ovoga.

🔎 Raščlamba koda

1164

⮚ Prvo, dajemo naziv za potproceduru koja je Open_with_File_Read_Only()

7157

⮚ Mideklarisati wrkbk kao varijablu u radnoj knjizi type

9314
7839

⮚ Ova linija će provjeriti da li je datoteka pod nazivom Sample dostupna u direktoriju ili ne. Ako je datoteka tamo, onda će otvorite datoteku i istovremeno će prikazati poruku.

4823

⮚ Ako u direktoriju nema datoteke pod nazivom Sample , tada će ova poruka biti isporučena.

2423

⮚ Konačno završavamo podproceduru ovog koda.

5744

⮚ Konačno završavamo podproceduru ovog koda.

Pročitajte više: Kako otvoriti radnu knjigu i pokrenuti makro koristeći VBA (4 primjera)

3. Upotreba dijaloškog okvira za otvaranje datoteke

Izvlačenje direktorija lokacije datoteke i njihovo uvoz svaki put u VBA kodu je prilično glomazan. Da bismo riješili problem, pokazat ćemo kako možete koristiti dijaloški okvir za odabir datoteke iz bilo kojeg direktorija.

Koraci

  • Sada ćemo otvoriti datoteku koristeći dijaloški okvir File Explorer.
  • Prvo, idite na karticu Developer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Developer . Ili također možete pritisnuti ' Alt+F11' da otvorite Visual Basic Editor .

  • Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Insert > Module .

  • Sljedeće, u prozoru Module editor, upišite sljedeći kod:
4254
  • Zatim zatvorite Module prozor.
  • Nakon toga idite na karticu Prikaz > Makroi .
  • Zatim kliknite na Prikaži makroe .

  • Nakon što kliknete na Prikaži makroe, odaberite makronaredbe koje ste upravo kreirali. Ovdje je naziv Otvori_datoteku_sa_dijalogskim okvirom . Zatim kliknite Pokreni .

  • I tada se otvara novi prozor. U dijaloškom okviru File explorer odaberite Uzorak i kliknite OK .

  • Zatim datoteka pod nazivom Primjer otvoren.
  • I ovako otvaramo radnu knjigu s imenom varijable koristeći VBA u Excelu.

🔎 Raščlamba koda

9537

⮚ Prvo, dajemo naziv za potproceduru koji je Sub Open_File_with_Dialog_Box()

8757

⮚ Deklarišemo Dbox kao promenljivu u FileDialog tip

3741

⮚ Deklarišemo File_Path kao promenljivu u File_Path Kao String type

1544

⮚ Pojaviće se dijaloški okvir iz prvog reda. Sljedeći red označava ime dijaloškog okvira i tip datoteke.

Dbox.Title će postaviti naslov dijaloškog okvira. i FileType postavite tip datoteke.

1628

Dbox.Filters.Clear će obrisati sve prethodne filtere primijenjene u dijaloškom okviru

9034

Dbox.Show će učiniti da se dijaloški okvir pojavi na datoteci.

⮚ Ovaj red će odrediti da li je korisnik izabrao više od jedne datoteke ili ne. Ako korisnik odabere više odjedan fajl, cela procedura bi se zaustavila.

3990

⮚ Konačno, završavamo podproceduru ovog koda.

Pročitajte više: Kako otvoriti Fascikla i odabir datoteke pomoću Excel VBA (4 primjera)

4. Korištenje radne knjige.Dodaj svojstvo

Za razliku od prethodnih metoda, kreirat ćemo novu Excel datoteku u unaprijed određenom direktoriju a zatim ćemo ga otvoriti pomoću Radne sveske. Dodaj svojstvo.

Koraci

  • Prvo, idite na karticu Razvojni programer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Developer . Ili također možete pritisnuti ' Alt+F11' da otvorite Visual Basic Editor .

  • Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Insert > Module .

Sljedeće, u prozoru Module editor, upišite sljedeći kod:

7344
  • Zatim zatvorite prozor Module .
  • Nakon to, idite na karticu Prikaz > Makroi .
  • Zatim kliknite na Prikaži makroe .

  • Nakon što kliknete na Prikaži makroe, odaberite makroe koje ste upravo kreirali. Ovdje se zove Otvorena_datoteka_sa_Dodavanjem_Svojstva . Zatim kliknite Pokreni .

  • Nakon što kliknete na Pokreni, primijetit ćete da je sada nova datoteka kreirano i otvoreno.

🔎 Raščlamba koda

⮚ Prvo, pružamo naziv za potproceduru

Hugh West je vrlo iskusan Excel trener i analitičar s više od 10 godina iskustva u industriji. Diplomirao je računovodstvo i finansije i magistrirao poslovnu administraciju. Hugh ima strast prema podučavanju i razvio je jedinstven pristup podučavanju koji je lako pratiti i razumjeti. Njegovo stručno znanje o Excel-u pomoglo je hiljadama studenata i profesionalaca širom svijeta da poboljšaju svoje vještine i napreduju u karijeri. Kroz svoj blog, Hugh dijeli svoje znanje sa svijetom, nudeći besplatne Excel tutorijale i online obuku kako bi pomogli pojedincima i preduzećima da ostvare svoj puni potencijal.