Hvernig á að opna vinnubók með breytuheiti með Excel VBA

Hugh West

10-08-2023 Fjölvi & amp; Excel VBA
  • Deildu Þessu
Hugh West

Að sjálfsögðu gætum við þurft að opna skrána úr Excel-foreldri skrá með VBA í annarri möppu. En á sama tíma höfum við ýmsar viðmiðanir líka um hvernig við viljum opna vinnubókina. Ef þú ert forvitinn að vita hvernig þú getur opnað vinnubók með breytuheitinu, þá gæti þessi grein komið þér að góðum notum. Í þessari grein ræðum við hvernig þú getur opnað vinnubók með breytuheiti með því að nota VBA í Excel með ítarlegum útskýringum.

Sækja æfingarvinnubók

Sæktu þessa æfingu vinnubók hér að neðan.

Opna vinnubók með breytuheiti með VBA.xlsm

Sample.xlsx

4 Auðvelt Leiðir til að opna vinnubók með breytuheiti með því að nota VBA í Excel

Við ætlum að nota neðangreind gagnasafn fyrir sýnikennsluna. Við höfum vöruupplýsingar um nokkrar vörur með auðkenni þeirra. þetta er sýnishornsskrá sem við ætlum að opna með því að nota VBA kóðann.

1. Using Workbook.Open Property

Using the Workbook .Open eign, við getum opnað skrár með því að nefna möppuna, eða ekki nefna staðsetninguna. Við getum líka gert opnuðu skrána læsilega.

1.1 Opna vinnubók þar sem skráarslóð er nefnd

Í næstu aðferð ætlum við að nota Workbook.Open Property til að opna skrána beint úr umræddri skráarstaðsetningarskrá. Sama hvar skráin er staðsett getum við opnað hanasem er Undir Open_File_with_Add_Property()

⮚ Síðan segjum við File_Path breytuna sem String gerð.

7727

⮚ Og stilltu File_Path breytuna á staðsetningu skráarinnar.

2733

⮚ Við lýsum yfir wb sem breytu í Workbook gerðinni.

2568

⮚ Vinnubókinni er síðan bætt við úr möppunni sem er geymd á File_Path staðsetningunni með því að nota eiginleikann Workbook.Add .

3316

⮚ Að lokum lýkur við undirferli þessa kóða.

Lesa meira: [Fastað!] Aðferð Open of Object Workbooks Failed (4 Solutions)

Niðurstaða

Til að draga það saman þá er spurningunni um hvernig við getum opnað vinnubækur með breytuheitum með VBA svarað hér með 4 mismunandi dæmum. VBA Macro aðferðin krefst fyrri VBA-tengdrar þekkingar til að skilja frá grunni.

Fyrir þetta vandamál er hægt að hlaða niður makróvirka vinnubók þar sem þú getur æft þig. þessar aðferðir.

Hafið gjarnan spurningar eða athugasemdir í gegnum athugasemdareitinn. Allar tillögur til að bæta Exceldemy samfélagið verða mjög vel þegnar

auðveldlega.

Skref

  • Við erum með skrá sem er geymd í skjalamöppunni sem við þurfum að opna.
  • Við munum nota skrána nafn sem breytu og opnaðu síðan skrána með því að nota lítið VBA makró.
  • Nákvæm skráasafn skráarinnar er sýnd hér að neðan í eiginleikaglugganum.

  • Fyrst skaltu fara á flipann Hönnuði og smella á Visual Basic . Ef þú ert ekki með það þarftu að virkja forritaraflipann . Eða þú getur líka ýtt á ' Alt+F11' til að opna Visual Basic Editor .

  • Þá verður nýr svargluggi, í þeim glugga skaltu smella á Insert > Module .

  • Næst, í Module ritstjóraglugganum, sláðu inn eftirfarandi kóða: 
1260

  • Lokaðu síðan Module gluggi.
  • Eftir það, farðu í flipann View > Macros .
  • Smelltu svo á View Fjölvi .

  • Eftir að hafa smellt á Skoða fjölvi, velurðu fjölva sem þú bjóst til núna. Nafnið hér er Open_with_File_Path . Smelltu síðan á Run .

  • Eftir þá mun Dæmi skráin opnast.

🔎 Sundurliðun kóðans 

5294

⮚ Fyrst gefum við upp nafn fyrir undir- aðferð sem er Open_with_File_Path .

6768

⮚ Síðan setjum við staðsetningu skráarinnar í File_Path breytuna 

7627

⮚Síðan lýsum við yfir breytuna okkar wrkbk , en gerð hennar er vinnubók.

4684

⮚ Síðan opnum við skrána sem heitir í File_Path skráarbreytu og stillum skrána sem wrkbk breytu.

8770

⮚ Að lokum ljúkum við undirferli þessa kóða.

Lesa meira: Hvernig á að Opna vinnubók úr slóð með því að nota Excel VBA (4 dæmi)

1.2 Opna vinnubók án þess að nefna skráarslóð

Í næstu aðferð munum við opna skrána úr móðurmöppunni, þar sem aðalskráin er vistuð. Hægt er að opna skrána án þess að nefna neina staðsetningu í kóðanum. Þessi skrá verður bara að vera í sömu möppu og yfirmöppan.

Skref

  • Við erum með aðra skrá vistuð í sömu möppu þar sem foreldrið Excel skrá er nú vistuð.
  • Skráarnafnið er 1.

  • Fyrst skaltu fara í Þróunaraðila flipann og smelltu á Visual Basic . Ef þú ert ekki með það þarftu að virkja forritaraflipann . Eða þú getur líka ýtt á ' Alt+F11 ' til að opna Visual Basic Editor .

  • Þá verður nýr svargluggi, í þeim glugga skaltu smella á Insert > Module .

  • Næst, í Module ritstjóraglugganum, sláðu inn eftirfarandi kóða: 
7007

  • Lokaðu síðan Module gluggi.
  • Eftir það, farðu í flipann View > Macros .
  • Smelltu svo á ViewFjölvi .

  • Eftir að hafa smellt á Skoða fjölvi skaltu velja fjölva sem þú bjóst til núna. Nafnið hér er Open_without_File_Path . Smelltu svo á Run.

  • Eftir að hafa ýtt á Run muntu taka eftir því að skráin sem heitir 1 er nú opin.
  • Og svona opnum við vinnubókina með breytuheiti með VBA í Excel.

🔎 Sundurliðun á Kóði 

6441

⮚ Fyrst gefum við upp nafn fyrir undirferlið sem er Sub Open_without_File_Path() 

5614

⮚ Við lýsum yfir wrkbk sem breyta í vinnubókargerð

7515

⮚ Við opnum skrá úr móðurskránni sem heitir 1.xlsx .

3161

⮚ Að lokum lýkur við undirferlinu af þessum kóða.

1.3 Opna vinnubók sem skrifvarinn

Aðferðin er nokkuð svipuð fyrstu aðferðinni, en hér munum við opna skrána í skrifvarandi ham, sem þýðir að við munum ekki fær um að breyta hvaða gögnum eða gildi sem er í Excel skránni.

Skref

  • Skráin sem við viljum opna er vistuð í skjalamöppunni.
  • Og þetta er skráin sem við viljum opna sem skrifvarinn.

  • Fyrst skaltu fara í Þróunaraðila flipann og smelltu á Visual Basic . Ef þú ert ekki með það þarftu að virkja forritaraflipann . Eða þú getur líka ýtt á ' Alt+F11 ' til að opna Visual Basic Editor.

  • Þá kemur nýr valmynd, í þeim glugga, smelltu á Settu inn > Eining .

  • Næst, í Module ritstjóraglugganum, sláðu inn eftirfarandi kóða: 
1462
  • Lokaðu síðan Module glugganum.
  • Eftir það, farðu í View flipann > Fjöld .
  • Smelltu síðan á Skoða fjölva .

  • Eftir að hafa smellt á Skoða Fjölvi, veldu fjölva sem þú bjóst til núna. Nafnið hér er Open_with_File_Read_Only . Smelltu síðan á Run .

  • Eftir að hafa smellt á Run munum við sjá að skráin er nú opnuð sem skrifvarinn, eins og sést á titilstikunni.

🔎 Sundurliðun kóðans 

6557

⮚ Í fyrsta lagi gefum við upp nafn fyrir undirferlið sem er Open_with_File_Read_Only() 

9452

⮚ Við lýsum yfir wrkbk sem breytu í Workbook type

4074

⮚ Skráin mun þá opnast úr tilgreindri möppu og skráin verður stillt skrifvarið með síðustu röksemdum.

7656

⮚ Að lokum lýkur við undirferli þessa kóða.

Lesa meira: Hvernig á að opna vinnubók sem skrifvara með Excel VBA

2. Notkun skilaboðakassa

Næstum svipað og fyrri aðferðin, við getum opnað skrár í gegnum VBA kóðann hér í Excel, en í þessu tilfelli munum við setja inn lítinn skilaboðakassa hér.

Skref

  • Fyrst skaltu fara í flipann Hönnuði og smella á Visual Basic . Ef þú ert ekki með það þarftu að virkjaForritaraflipi . Eða þú getur líka ýtt á ' Alt+F11' til að opna Visual Basic Editor .

  • Þá verður nýr svargluggi, í þeim glugga skaltu smella á Insert > Module .

  • Næst, í Module ritstjóraglugganum, sláðu inn eftirfarandi kóða: 
2335

  • Lokaðu síðan Module gluggi.
  • Eftir það, farðu í flipann View > Macros .
  • Smelltu svo á View Fjölvi .

  • Eftir að hafa smellt á Skoða fjölvi, velurðu fjölva sem þú bjóst til núna. Nafnið hér er Open_File_with_Messege_Box . Smelltu svo á Run .

  • Þá fengum við viðvörunarboxið, sem sýnir að Skráin opnaðist með góðum árangri .
  • Smelltu síðan á OK .

  • Og þá munum við sjá að skráin er núna opinn.

  • Og svo reynum við að breyta kóðanum aðeins.
  • Við breytum skráarnafni í Sample10 , og það er í raun engin skrá sem heitir Sample10 í skjalamöppunni.

  • Þá erum við Keyrðu kóðann aftur og það er skilaboðakassi sem segir Opnun skráarinnar mistókst .
  • Smelltu á OK eftir þetta.

🔎 Sundurliðun kóðans 

8302

⮚ Fyrst gefum við upp nafn á undirferlinu sem er Opna_with_File_Read_Only() 

1418

⮚ Viðlýstu wrkbk sem breytu í vinnubókinni type 

8760
9654

⮚ Þessi lína mun athuga hvort skráin sem heitir Sample sé til í möppunni eða ekki, ef skráin er þar, þá mun hún opnaðu skrána og á sama tíma mun birta skilaboðin.

5251

⮚ Ef það er engin skrá sem heitir Sample í möppunni, þá verður þessi skilaboð afhent.

5690

⮚ Að lokum ljúkum við undirferli þessa kóða.

3226

⮚ Að lokum ljúkum við undirferli þessa kóða.

Lesa meira: Hvernig á að opna vinnubók og keyra fjölva með VBA (4 dæmi)

3. Notkun glugga til að opna skrá

Takta út skráarstaðsetningarskrána og flytja þær inn í hvert sinn í VBA kóðanum er frekar fyrirferðarmikill. Til að leysa málið munum við sýna hvernig þú getur notað valmynd til að velja skrá úr hvaða möppu sem er.

Skref

  • Nú munum við opna skrána með því að nota skráarkönnunargluggann.
  • Fyrst skaltu fara á flipann Developer og smella á Visual Basic . Ef þú ert ekki með það þarftu að virkja forritaraflipann . Eða þú getur líka ýtt á ' Alt+F11' til að opna Visual Basic Editor .

  • Þá verður nýr svargluggi, í þeim glugga skaltu smella á Insert > Module .

  • Næst, í Module ritstjóraglugganum, sláðu inn eftirfarandi kóða: 
5793
  • Lokaðu síðan Module gluggi.
  • Eftir það, farðu í flipann Skoða > fjölvi .
  • Smelltu síðan á Skoða fjölva .

  • Eftir að hafa smellt á Skoða fjölvi, velurðu fjölva sem þú bjóst til núna. Nafnið hér er Open_File_with_Dialog_Box . Smelltu svo á Run .

  • Og þá opnast nýr gluggi. Í skráarkönnunarglugganum og veldu Sample og smelltu á OK .

  • Síðan heitir skráin Dæmi opnað.
  • Og svona opnum við vinnubókina með breytuheiti með því að nota VBA í Excel.

🔎 Sundurliðun kóðans 

3423

⮚ Í fyrsta lagi gefum við upp nafn á undirferlinu sem er Sub Open_File_with_Dialog_Box() 

9112

⮚ Við lýsum yfir Dbox sem breytu í FileDialog gerð

5287

⮚ Við lýsum yfir File_Path sem breytu í File_Path As String type 

4979

⮚ Það verður svargluggi frá fyrstu línu. Næsta lína gefur til kynna nafn svargluggans og skráargerðina.

⮚ Dbox.Title mun setja titil svargluggans. og FileType stilltu skráargerðina.

2670

⮚ Dbox.Filters.Clear mun hreinsa allar fyrri síur sem notaðar hafa verið í glugganum

2954

⮚ Dbox.Show mun láta gluggann birtast á skránni.

⮚ Þessi lína mun ákvarða hvort notandinn valdi fleiri en eina skrá eða ekki. Ef notandi velur meira enein skrá myndi allt ferlið stöðvast.

8060

⮚ Að lokum ljúkum við undirferli þessa kóða.

Lesa meira: Hvernig á að opna Mappa og velja skrá með því að nota Excel VBA (4 dæmi)

4. Using Workbook.Add Property

Öfugt við fyrri aðferðir munum við búa til nýja Excel skrá í fyrirfram ákveðna möppu og þá munum við opna hana með vinnubókinni. Bæta við eign.

Skref

  • Fyrst skaltu fara á flipann Hönnuði og smella á Visual Basic . Ef þú ert ekki með það þarftu að virkja forritaraflipann . Eða þú getur líka ýtt á ' Alt+F11' til að opna Visual Basic Editor .

  • Þá verður nýr svargluggi, í þeim glugga skaltu smella á Insert > Module .

Næst, í Module ritstjóraglugganum, sláðu inn eftirfarandi kóða:

3196
  • Lokaðu síðan Module glugganum.
  • Eftir það, farðu í flipann Skoða > fjölvi .
  • Smelltu síðan á Skoða fjölva .

  • Eftir að hafa smellt á Skoða fjölvi, velurðu fjölva sem þú bjóst til núna. Nafnið hér er Open_File_with_Add_Property . Smelltu síðan á Run .

  • Eftir að hafa smellt á Run, muntu taka eftir að ný skrá er núna búið til og opnað.

🔎 Sundurliðun kóðans

⮚ Í fyrsta lagi bjóðum við upp á heiti á undirferlinu

Fyrri færsla Hvernig á að búa til eyðublað með fellilista í Excel
Næsta færsla Slétt skrun með músarhjóli í Excel (nákvæm greining)

Hugh West er mjög reyndur Excel þjálfari og sérfræðingur með yfir 10 ára reynslu í greininni. Hann er með BA gráðu í bókhaldi og fjármálum og meistaragráðu í viðskiptafræði. Hugh hefur ástríðu fyrir kennslu og hefur þróað einstaka kennsluaðferð sem auðvelt er að fylgja eftir og skilja. Sérfræðiþekking hans á Excel hefur hjálpað þúsundum nemenda og fagfólks um allan heim að bæta færni sína og skara fram úr í starfi. Í gegnum bloggið sitt deilir Hugh þekkingu sinni með heiminum og býður upp á ókeypis Excel námskeið og netþjálfun til að hjálpa einstaklingum og fyrirtækjum að ná fullum möguleikum.