Sadržaj
Naravno, možda ćemo morati otvoriti datoteku iz nadređene Excel datoteke koristeći VBA u drugom direktoriju. Ali u isto vrijeme, imamo različite vrste kriterija i o tome kako želimo otvoriti radnu knjigu. Ako vas zanima kako možete otvoriti radnu knjigu s nazivom varijable, onda bi vam ovaj članak mogao dobro doći. U ovom članku raspravljamo o tome kako možete otvoriti radnu knjigu s nazivom varijable koristeći VBA u Excelu uz detaljna objašnjenja.
Preuzmite radnu knjigu za vježbanje
Preuzmite ovu radnu knjigu za vježbanje u nastavku.
Otvorite radnu knjigu s nazivom varijable koristeći VBA.xlsm
Sample.xlsx
4 Jednostavno Načini otvaranja radne knjige s nazivom varijable pomoću VBA u Excelu
Za demonstraciju ćemo koristiti donji skup podataka. Imamo informacije o nekoliko proizvoda s njihovim ID-om. ovo je ogledna datoteka koju ćemo otvoriti pomoću VBA koda.
1. Korištenje radne knjige. Svojstvo otvaranja
Korištenje radne knjige .Open svojstvo, možemo otvarati datoteke spominjanjem direktorija ili ne spominjanjem lokacije. Također možemo učiniti otvorenu datoteku samo za čitanje.
1.1 Otvorena radna knjiga koja spominje put datoteke
U sljedećoj metodi koristit ćemo Svojstvo Workbook.Open za otvaranje datoteke izravno 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 tip String .
5189
⮚ I postavite varijablu File_Path na lokaciju datoteke.
1271
⮚ wb deklariramo kao varijablu u tipu Workbook .
7217
⮚ Radna knjiga se zatim dodaje iz direktorija pohranjenog na lokaciji File_Path pomoću svojstva Workbook.Add .
5377
⮚ Konačno, završavamo podprocedura ovog koda.
Pročitajte više: [Riješeno!] Otvaranje metode radnih knjiga objekata nije uspjelo (4 rješenja)
Zaključak
Da sažmemo, na pitanje kako možemo otvoriti radne knjige s nazivima varijabli pomoću VBA ovdje je odgovoreno u 4 različita primjera. Metoda VBA Macro zahtijeva prethodno znanje VBA za razumijevanje od nule.
Za ovaj problem dostupna je radna knjiga s omogućenim makronaredbama za preuzimanje gdje možete vježbati ove metode.
Slobodno postavite pitanja ili povratne informacije putem odjeljka za komentare. Svaki prijedlog za poboljšanje Exceldemy zajednice bit će vrlo zahvalan
lako.Koraci
- Imamo datoteku pohranjenu u mapi dokumenata koju trebamo otvoriti.
- Upotrijebit ćemo datoteku ime kao varijablu, a zatim otvorite datoteku pomoću male VBA makronaredbe.
- Točan direktorij datoteke prikazan je ispod u prozoru svojstava.
- Prvo idite na karticu Developer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Razvojni programer . Ili također možete pritisnuti ' Alt+F11' za otvaranje Visual Basic Editora .
- Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Umetni > Modul .
- Zatim, u prozor uređivača Modula upišite sljedeći kod:
8351
- Zatim zatvorite Prozor modula.
- Nakon toga idite na karticu Prikaz > Makronaredbe .
- Zatim kliknite na Prikaz Makronaredbe .
- Nakon što kliknete Prikaži makronaredbe, odaberite makronaredbe koje ste upravo izradili. Naziv ovdje je Open_with_File_Path . Zatim kliknite Pokreni .
- Nakon toga otvorit će se datoteka Uzorak .
🔎 Raščlamba koda
9346
⮚ Prvo, dajemo naziv za pod- postupak koji je Open_with_File_Path .
9848
⮚ Zatim smo stavili lokaciju datoteke u File_Path varijablu
1172
⮚Zatim, deklariramo našu varijablu wrkbk , čiji je tip radna knjiga.
9439
⮚ Zatim, otvaramo datoteku nazvanu u varijabli direktorija File_Path i postavljamo datoteku kao wrkbk varijabla.
9833
⮚ Konačno, završavamo podproceduru ovog koda.
Pročitajte više: Kako Otvaranje radne knjige iz putanje koristeći Excel VBA (4 primjera)
1.2 Otvaranje radne knjige bez spominjanja putanje datoteke
U sljedećoj metodi otvorit ćemo datoteku iz nadređene mape, gdje je glavna datoteka je spremljena. Datoteka se može otvoriti bez spominjanja bilo koje lokacije u kodu. Ova datoteka samo mora biti u istoj mapi kao nadređena mapa.
Koraci
- Imamo drugu datoteku spremljenu u istom direktoriju gdje je nadređena Excel datoteka je sada spremljena.
- Naziv datoteke je 1.
- Prvo idite na Developer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Razvojni programer . Ili također možete pritisnuti ' Alt+F11 ' za otvaranje Visual Basic Editora .
- Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Umetni > Modul .
- Zatim, u prozor uređivača Modula upišite sljedeći kod:
8240
- Zatim zatvorite Prozor modula.
- Nakon toga idite na karticu Prikaz > Makronaredbe .
- Zatim kliknite na PrikazMakronaredbe .
- Nakon klika na Prikaži makronaredbe odaberite makronaredbe koje ste upravo izradili. Naziv ovdje je Open_without_File_Path . Zatim kliknite Pokreni.
- Nakon što pritisnete Pokreni , primijetit ćete da je datoteka pod nazivom 1 sada otvorena.
- Ovako otvaramo radnu knjigu s nazivom varijable koristeći VBA u Excelu.
🔎 Raščlamba Kod
8874
⮚ Prvo, dajemo naziv za potproceduru koja je Sub Open_without_File_Path()
2562
⮚ Izjavljujemo wrkbk kao varijabla u tipu Radne knjige
7540
⮚ Otvaramo datoteku iz nadređenog direktorija pod nazivom 1.xlsx .
3536
⮚ Na kraju završavamo potproceduru ovog koda.
1.3 Otvori radnu knjigu 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ći mijenjati bilo koji podatak ili vrijednost u Excel datoteci.
Koraci
- Datoteka koju želimo otvoriti sprema se u mapu dokumenta.
- A ovo je datoteka koju želimo otvoriti kao samo za čitanje.
- Prvo idite na Developer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Razvojni programer . Ili također možete pritisnuti ' Alt+F11 ' za otvaranje Visual Basic Editora.
- Tada će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Umetni > Modul .
- Dalje, u prozor uređivača Module upišite sljedeći kod:
Set wrkbk = Workbooks.Open("C:\Users\User\OneDrive\Documents\Sample", ReadOnly:=True)
- Zatim zatvorite prozor Modul .
- Nakon toga idite na karticu Prikaz > Makronaredbe .
- Zatim kliknite na Prikaži makronaredbe .
- Nakon klika na Pogled Makronaredbe, odaberite makronaredbe koje ste upravo izradili. Naziv ovdje je Open_with_File_Read_Only . Zatim kliknite Pokreni .
- Nakon što kliknete Pokreni , vidjet ćemo da je datoteka sada otvorena kao samo za čitanje, kao što je prikazano u naslovnoj traci.
🔎 Raščlamba koda
8999
⮚ Prvo, dajemo naziv za potproceduru koja je Open_with_File_Read_Only()
9491
⮚ Deklariramo wrkbk kao varijablu u Workbook type
3413
⮚ Datoteka će se zatim otvoriti iz naznačenog direktorija, a datoteka će biti postavljena samo za čitanje zadnjim argumentom.
1113
⮚ Na kraju završavamo potprocedura ovog koda.
Pročitajte više: Kako otvoriti radnu knjigu kao samo za čitanje s Excel VBA
2. Korištenje 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 s porukom.
Koraci
- Prvo idite na karticu Developer i kliknite na Visual Basic . Ako to nemate, morate omogućitiKartica za programere . Ili također možete pritisnuti ' Alt+F11' za otvaranje Visual Basic Editora .
- Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Umetni > Modul .
- Zatim, u prozor uređivača Modula upišite sljedeći kod:
8714
- Zatim zatvorite Prozor modula.
- Nakon toga idite na karticu Prikaz > Makronaredbe .
- Zatim kliknite na Prikaz Makronaredbe .
- Nakon što kliknete Prikaži makronaredbe, odaberite makronaredbe koje ste upravo izradili. Naziv ovdje je Open_File_with_Messege_Box . Zatim kliknite Pokreni .
- Tada smo dobili okvir upozorenja koji pokazuje da je Datoteka uspješno otvorena .
- Zatim kliknite OK .
- I tada ćemo vidjeti da je datoteka sada otvoriti.
- I onda pokušavamo malo promijeniti kod.
- Mijenjamo naziv datoteke u Sample10 , a zapravo ne postoji datoteka pod nazivom Sample10 u mapi dokumenata.
- Onda mi Ponovo pokrenite kôd i pojavit će se okvir s porukom Otvaranje datoteke nije uspjelo .
- Kliknite U redu nakon ovoga.
🔎 Raščlamba koda
6206
⮚ Prvo, dajemo naziv za potproceduru koja je Open_with_File_Read_Only()
1866
⮚ Mideklarirajte wrkbk kao varijablu u radnoj knjizi type
9776
4192
⮚ Ovaj redak će provjeriti je li datoteka pod nazivom Sample dostupna u direktoriju ili ne, ako je datoteka tamo, tada će otvori datoteku i istovremeno će prikazati poruku.
3693
⮚ Ako u direktoriju ne postoji datoteka pod nazivom Uzorak , ova poruka će biti isporučena.
5737
⮚ Konačno, završavamo potproceduru ovog koda.
1623
⮚ Konačno završavamo potproceduru ovog koda.
Pročitaj više: Kako otvoriti radnu knjigu i pokrenuti makronaredbu koristeći VBA (4 primjera)
3. Upotreba dijaloškog okvira za otvaranje datoteke
Izdvajanje direktorija lokacije datoteke i njihovo uvoz svaki put u VBA kodu prilično je 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 pomoću dijaloškog okvira preglednika datoteka.
- Prvo idite na karticu Razvojni programer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Razvojni programer . Ili također možete pritisnuti ' Alt+F11' za otvaranje Visual Basic Editora .
- Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Umetni > Modul .
- Zatim, u prozor uređivača Modula upišite sljedeći kod:
6063
- Zatim zatvorite Modul prozor.
- Nakon toga idite na karticu Prikaz > Makronaredbe .
- Zatim kliknite na Prikaz makronaredbi .
- Nakon što kliknete Prikaži makronaredbe, odaberite makronaredbe koje ste upravo izradili. Naziv ovdje je Open_File_with_Dialog_Box . Zatim kliknite Pokreni .
- I tada se otvara novi prozor. U dijaloškom okviru preglednika datoteka odaberite Uzorak i kliknite U redu .
- Zatim datoteka pod nazivom Uzorak otvoren.
- Ovako otvaramo radnu knjigu s nazivom varijable koristeći VBA u Excelu.
🔎 Raščlamba koda
5697
⮚ Prvo, dajemo naziv za potproceduru koja je Sub Open_File_with_Dialog_Box()
9962
⮚ Deklariramo Dbox kao varijablu u FileDialog type
1503
⮚ Deklariramo File_Path kao varijablu u File_Path As String type
9101
⮚ Pojavit će se dijaloški okvir od prvog retka. Sljedeći redak označava naziv dijaloškog okvira i vrstu datoteke.
⮚ Dbox.Title će postaviti naslov dijaloškog okvira. i FileType
postavite vrstu datoteke.
4695
⮚ Dbox.Filters.Clear obrisati će sve prethodne filtre primijenjene u dijaloškom okviru
3799
⮚ Dbox.Show učinit će da se dijaloški okvir pojavi na datoteci.
⮚ Ovaj redak će odrediti je li korisnik odabrao više od jedne datoteke ili ne. Ako korisnik odabere više odjednu datoteku, cijela bi se procedura zaustavila.
8848
⮚ Konačno, završavamo podproceduru ovog koda.
Pročitajte više: Kako otvoriti Mapa i odaberite datoteku koristeći Excel VBA (4 primjera)
4. Korištenje Workbook.Add Property
Suprotno prethodnim metodama, kreirat ćemo novu Excel datoteku u unaprijed određenom direktoriju a zatim ćemo ga otvoriti pomoću Radne knjige. Dodajte svojstvo.
Koraci
- Prvo idite na karticu Razvojni programer i kliknite na Visual Basic . Ako to nemate, morate omogućiti karticu Razvojni programer . Ili također možete pritisnuti ' Alt+F11' za otvaranje Visual Basic Editora .
- Zatim će se pojaviti novi dijaloški okvir, u tom dijaloškom okviru kliknite na Umetni > Modul .
Zatim, u Module prozor uređivača, upišite sljedeći kod:
9599
- Zatim zatvorite Module prozor.
- Nakon to, idite na karticu Prikaz > Makronaredbe .
- Zatim kliknite na Prikaži makronaredbe .
- Nakon što kliknete Prikaži makronaredbe, odaberite makronaredbe koje ste upravo izradili. Naziv ovdje je Open_File_with_Add_Property . Zatim kliknite Pokreni .
- Nakon što kliknete Pokreni, primijetit ćete da je nova datoteka sada kreiran i otvoren.
🔎 Raščlamba koda
⮚ Prvo, pružamo naziv za potproceduru