Enhavtabelo
Nature, ni eble bezonos malfermi la dosieron de gepatra Excel-dosiero uzante VBA en malsama dosierujo. Sed samtempe, ni havas diversajn kriteriojn ankaŭ pri kiel ni volas malfermi la laborlibron. Se vi scivolas scii kiel vi povas malfermi laborlibron kun la varia nomo, tiam ĉi tiu artikolo povas esti utila por vi. En ĉi tiu artikolo, ni diskutas kiel vi povas malfermi laborlibron kun varia nomo uzante VBA en Excel kun kompleksaj klarigoj.
Elŝutu Praktikan Laborlibron
Elŝutu ĉi tiun praktikan laborlibron sube.
Malfermu Laborlibron kun Varia Nomo Uzante VBA.xlsm
Sample.xlsx
4 Facila Vojoj por Malfermi Laborlibron kun Varia Nomo Uzante VBA en Excel
Ni uzos la suban datumaron por la pruvo. Ni havas la produktinformojn de pluraj produktoj kun ilia Id. ĉi tio estas ekzempla dosiero, kiun ni malfermos per la VBA-kodo.
1. Uzante Laborlibron.Malfermu Propraĵon
Uzante la Laborlibron. .Open posedaĵo, ni povas malfermi dosierojn menciante la dosierujon, aŭ ne menciante la lokon. Ni ankaŭ povas fari la malfermitan dosieron nurlegebla.
1.1 Malfermu Laborlibron Menciante Dosiervojon
En la sekva metodo, ni uzos la Laborlibron.Malfermu Propraĵon malfermi la dosieron rekte el la menciita dosierloka dosierujo. Ne gravas kie troviĝas la dosiero, ni povas malfermi la dosieronkiu estas Sub Open_File_with_Add_Property()
⮚ Tiam ni deklaras la Dosiero-Paton variablon kiel String tipo.
3258
⮚ Kaj starigu la variablon Dosiero_Vojo al la loko de la dosiero.
7212
⮚ Ni deklaras wb kiel variablon en la Laborlibro tipo.
5179
⮚ La laborlibro estas tiam aldonita el la dosierujo konservita en la loko Dosiero_Vojo uzante la posedaĵon Workbook.Add .
2781
⮚ Fine ni finas la subprocedo de ĉi tiu kodo.
Legu Pli: [Fixed!] Metodo Malfermo de Objektaj Laborlibroj Malsukcesis (4 Solvoj)
Konkludo
Por resumi, la afero kiel ni povas malfermi laborlibrojn kun variaj nomoj uzante VBA estas respondita ĉi tie per 4 malsamaj ekzemploj. La VBA Makro metodo postulas antaŭan VBA-rilatan scion por kompreni de nulo.
Por ĉi tiu problemo, makro-ebligita laborlibro estas disponebla por elŝuti kie vi povas ekzerci ĉi tiuj metodoj.
Bonvolu fari ajnajn demandojn aŭ komentojn per la komenta sekcio. Ajna sugesto por plibonigo de la Exceldemy komunumo estos tre estiminda
facile.Paŝoj
- Ni havas dosieron konservitan en la dosierujo de dokumentoj, kiun ni devas malfermi.
- Ni uzos la dosieron. nomo kiel variablo kaj poste malfermu la dosieron per malgranda VBA-makroo.
- La Ekzakta dosierujo de la dosiero estas montrita sube en la fenestro de proprietoj.
- Unue, iru al la langeto Programisto kaj alklaku Visual Basic . Se vi ne havas tion, vi devas aktivigi la langeton Ellaboranto . Aŭ vi ankaŭ povas premi ' Alt+F11' por malfermi la Vidan Bazan Redaktilon .
- Tiam estos nova dialogujo, en tiu dialogujo, alklaku la Enmeti > Modulo .
- Sekva, en la fenestro de la redaktilo Modulo , tajpu la jenan kodon:
2192
- Tiam fermu la
- 6>Modulo fenestro.
- Post tio, iru al Vidi langeto > Makrooj .
- Tiam alklaku Vidi. Makrooj .
- Post klako sur Vidi Makroojn, elektu la makroojn kiujn vi ĵus kreis. La nomo ĉi tie estas Open_with_File_Path . Poste alklaku Run .
- Post tiam la Ekzempla dosiero malfermos.
🔎 Diskonigo de la Kodo
9426
⮚ Unue, ni provizas nomon por la sub- proceduro kiu estas Malfermu_kun_Dosiero_Pado .
7511
⮚ Tiam, ni metas la lokon de la dosiero en la Dosiero_Pado variablo
8631
⮚Poste, ni deklaras nian variablon wrkbk , kies tipo estas laborlibro.
3543
⮚ Tiam, ni malfermas la dosieron nomitan en la dosierujo File_Path kaj fiksas la dosieron. kiel wrkbk variablo.
2027
⮚ Fine, ni finas la subproceduron de ĉi tiu kodo.
Legu pli: Kiel Malfermu Laborlibron de Pado Uzante Excel VBA (4 Ekzemploj)
1.2 Malfermu Laborlibron Sen Mencianta Dosiera Vojo
En la sekva metodo, ni malfermos la dosieron el la gepatra dosierujo, kie la ĉefa dosiero estas konservita. La dosiero povas esti malfermita sen mencii ajnan lokon en la kodo. Ĉi tiu dosiero nur devas esti en la sama dosierujo kiel la gepatra dosierujo.
Paŝoj
- Ni havas malsaman dosieron konservita en la sama dosierujo kie la gepatra dosierujo. Excel-dosiero nun estas konservita.
- La dosiernomo estas 1.
- Unue, iru al la Ellaboranto langeto kaj alklaku Visual Basic . Se vi ne havas tion, vi devas aktivigi la langeton Ellaboranto . Aŭ Vi ankaŭ povas premi ' Alt+F11 ' por malfermi la Vidan Bazan Redaktilon .
- Tiam estos nova dialogujo, en tiu dialogujo, alklaku la Enmeti > Modulo .
- Sekva, en la fenestro de la redaktilo Modulo , tajpu la jenan kodon:
8134
- Tiam fermu la
- 6>Modulo fenestro.
- Post tio, iru al Vidi langeto > Makrooj .
- Tiam alklaku Vidi.Makrooj .
- Post klako al Vidi Makroojn, elektu la makroojn, kiujn vi ĵus kreis. La nomo ĉi tie estas Malfermu_sen_Dosiero_Vojo . Poste alklaku Run.
- Post premado Run , vi rimarkos, ke la dosiero nomita 1 estas nun malfermita.
- Kaj jen kiel ni malfermas la laborlibron kun ŝanĝiĝema nomo uzante VBA en Excel.
🔎 Rompeco de la Kodo
2954
⮚ Unue, ni provizas nomon por la subprocedo kiu estas Sub Open_without_File_Path()
4514
⮚ Ni deklaras wrkbk kiel variablo en Workbook tipo
4497
⮚ Ni malfermas dosieron el la gepatra dosierujo nomita 1.xlsx .
3749
⮚ Fine, ni finas la subproceduron de ĉi tiu kodo.
1.3 Malfermu Laborlibron kiel Nur Legata
La metodo estas sufiĉe simila al la unua metodo, sed ĉi tie ni malfermos la dosieron en nurlegebla reĝimo, tio signifas, ke ni ne faros kapabla ŝanĝi ajnajn datumojn aŭ valorojn en la Excel-dosiero.
Paŝoj
- La dosiero, kiun ni volas malfermi, estas konservita en la dokumentodosierujo.
- Kaj ĉi tiu estas la dosiero, kiun ni volas malfermi kiel nurlegebla.
- Unue, iru al la Programisto langeto kaj alklaku Visual Basic . Se vi ne havas tion, vi devas aktivigi la langeton Ellaboranto . Aŭ vi ankaŭ povas premi ' Alt+F11 ' por malfermi la Visual Basic Editor.
- Tiam estos nova dialogkesto, en tiu dialogujo, alklaku la Enigu > Modulo .
- Sekva, en la fenestro de la redaktilo Modulo , tajpu jena kodo:
5714
- Do fermu la Modulo fenestron.
- Post tio, iru al Vidi langeto > Makrooj .
- Tiam alklaku Vidi Makroojn .
- Post alklako Vidi Makrooj, elektu la makroojn, kiujn vi ĵus kreis. La nomo ĉi tie estas Open_with_File_Read_Only . Poste alklaku Run .
- Post klako Run , ni vidos, ke la dosiero nun estas malfermita. kiel nurlegebla, kiel montrite en la titolbreto.
🔎 Diskonigo de la Kodo
6871
⮚ Unue, ni provizas nomon por la subprocedo kiu estas Open_with_File_Read_Only()
8542
⮚ Ni deklaras wrkbk kiel variablo en Workbook-tipo
7672
⮚ La dosiero tiam malfermos el la elektita dosierujo, kaj la dosiero estos agordita nurlegebla per la lasta argumento.
4445
⮚ Fine ni finas la subprocedo de ĉi tiu kodo.
Legu Pli: Kiel Malfermi Laborlibron kiel Nurlegeblan kun Excel VBA
2. Uzante Mesaĝskatolon
Preskaŭ simile al la antaŭa metodo, ni povas malfermi dosierojn per la VBA-kodo ĉi tie en Excel, sed en ĉi tiu kazo, ni enkorpigos malgrandan mesaĝkeston ĉi tie.
Paŝoj
- Unue, iru al la langeto Programisto kaj alklaku Visual Basic . Se vi ne havas tion, vi devas aktivigi laLangeto por programistoj . Aŭ Vi ankaŭ povas premi ' Alt+F11' por malfermi la Vidan Bazan Redaktilon .
- Tiam estos nova dialogujo, en tiu dialogujo, alklaku la Enmeti > Modulo .
- Sekva, en la fenestro de la redaktilo Modulo , tajpu la jenan kodon:
8001
- Tiam fermu la
- 6>Modulo fenestro.
- Post tio, iru al Vidi langeto > Makrooj .
- Tiam alklaku Vidi. Makrooj .
- Post klako sur Vidi Makroojn, elektu la makroojn kiujn vi ĵus kreis. La nomo ĉi tie estas Open_File_with_Messege_Box . Tiam alklaku Run .
- Tiam ni ricevis la avertan skatolon, kiu montras, ke La Dosiero Malfermita Sukcese .
- Tiam alklaku OK .
- Kaj tiam ni vidos, ke la dosiero nun estas malfermita.
- Kaj poste ni provas iom ŝanĝi la kodon.
- Ni ŝanĝas la dosiernomon al Sample10 , kaj fakte ne estas dosiero nomita Sample10 en la dokumentoj-dosierujo.
- Do ni Rulu la kodon denove, kaj estas mesaĝkesto dirante Malfermo de la Dosiero Malsukcesa .
- Alklaku OK post tio.
🔎 Diskonigo de la Kodo
2149
⮚ Unue, ni donas nomon por la subprocedo kiu estas Malfermu_kun_Dosiero_NurLegata()
4857
⮚ Nideklari wrkbk kiel variablon en la Workbook type
6306
3127
⮚ Ĉi tiu linio kontrolos ĉu la dosiero nomita Sample estas disponebla en la dosierujo aŭ ne, Se la dosiero estas tie, tiam ĝi estos malfermu la dosieron kaj samtempe montros la mesaĝon.
5880
⮚ Se ne estas dosiero nomita Ekzempla en la dosierujo, tiam ĉi tiu mesaĝo estos liverita.
2500
⮚ Fine, ni finas la subproceduron de ĉi tiu kodo.
9748
⮚ Fine, ni finas la subproceduron de ĉi tiu kodo.
Legu Pli: Kiel Malfermi Laborlibron kaj Ruli Makroon Uzante VBA (4 Ekzemploj)
3. Uzo de Dialog Box por Malfermi Dosieron
Eltiri la dosierlokan dosierujon kaj importi ilin ĉiufoje en la VBA-kodo estas sufiĉe ĝena. Por solvi la problemon, ni montros kiel vi povas uzi dialogujon por elekti dosieron el iu ajn dosierujo.
Paŝoj
- Nun ni malfermos la dosieron. uzante la dialogkeston de dosiero esploristo.
- Unue, iru al la langeto Programisto kaj alklaku Visual Basic . Se vi ne havas tion, vi devas aktivigi la langeton Ellaboranto . Aŭ Vi ankaŭ povas premi ' Alt+F11' por malfermi la Vidan Bazan Redaktilon .
- Tiam estos nova dialogujo, en tiu dialogujo, alklaku la Enmeti > Modulo .
- Sekva, en la fenestro de la redaktilo Modulo , tajpu la jenan kodon:
3170
- Tiam fermu la Modulon fenestro.
- Post tio, iru al Vidi langeto > Makrooj .
- Tiam alklaku Vidi makroojn .
- Post klako sur Vidi Makroojn, elektu la makroojn, kiujn vi ĵus kreis. La nomo ĉi tie estas Malfermu_Dosiero_kun_Dialogo_Kesto . Tiam alklaku Run .
- Kaj poste malfermiĝas nova fenestro. En la dialogujo de la esploristo de dosieroj kaj elektu Provinon kaj alklaku OK .
- Tiam la dosiero nomata Ekzemplaro malfermita.
- Kaj jen kiel ni malfermas la laborlibron kun varia nomo uzante VBA en Excel.
5>🔎 Diskonigo de la Kodo
9212
⮚ Unue, ni provizas nomon por la subprocedo kiu estas Sub Open_File_with_Dialog_Box()
2675
⮚ Ni deklaras Dbox kiel variablo en FileDialog tipo
4935
⮚ Ni deklaras File_Path kiel variablo en la File_Path Kiel String type
2934
⮚ Estos dialogujo de la unua linio. La sekva linio indikas la nomon de dialogujo kaj la dosiertipo.
⮚ Dbox.Title starigos la titolon de la dialogujo. kaj
FileType
agordu la dosiertipon.6744
⮚ La Dbox.Filters.Clear forigos ajnan antaŭan filtrilon aplikitan en la diaogkesto
4111
⮚ La Dbox.Show aperigos la dialogkeston sur la dosiero.
⮚ Ĉi tiu linio determinos ĉu la uzanto elektis pli ol unu dosieron aŭ ne. Se la uzanto elektas pli olunu dosiero, la tuta proceduro ĉesos.
2225
⮚ Fine, ni finas la subproceduron de ĉi tiu kodo.
Legu Pli: Kiel Malfermi Dosierujo kaj Elektu Dosieron Uzante Excel VBA (4 Ekzemploj)
4. Uzante Laborlibron.Aldoni Propraĵon
Kontraŭe al la antaŭaj metodoj, ni kreos novan Excel-dosieron en antaŭdeterminita dosierujo kaj poste ni malfermos ĝin uzante la Laborlibron. Aldonu posedaĵon.
Paŝoj
- Unue, iru al la langeto Programisto kaj alklaku Visual Basic . Se vi ne havas tion, vi devas aktivigi la langeton Ellaboranto . Aŭ Vi ankaŭ povas premi ' Alt+F11' por malfermi la Vidan Bazan Redaktilon .
- Tiam estos nova dialogujo, en tiu dialogujo, alklaku la Enmeti > Modulo .
Poste, en la fenestro de la redaktilo Modulo , tajpu la jenan kodon:
6763
- Tiam fermu la fenestron Modulo .
- Post tio, iru al Vidi langeto > Makrooj .
- Tiam alklaku Vidi Makroojn .
- Post klako sur Vidi Makroojn, elektu la makroojn, kiujn vi ĵus kreis. La nomo ĉi tie estas Open_File_with_Add_Property . Poste alklaku Run .
- Post klako Run, vi rimarkos, ke nova dosiero nun estas. kreita kaj malfermita.
🔎 Diskonigo de la Kodo
⮚ Unue, ni provizas nomo por la subprocedo