A GetOpenFilename egy olyan módszer, amely egyben az FSO attribútuma is. Ezt a módszert a VBA-ban használják egy bizonyos fájl megnevezéséhez és kiválasztásához, a módszer fontos tényezője a megnyitásához megadott fájlnév elérési útja, mi vagy átadhatja a fájlnév elérési útját a függvényben, vagy megkérhetjük a felhasználót, hogy mutasson be egy fájlútvonalat annak kiválasztásához.
Excel VBA alkalmazás. GetOpenFilename
Vannak olyan helyzetek, amikor hozzáférnünk kell a konkrét fájlnévhez, és ez a VBA kódolással lehetséges. A fájlhoz való hozzáféréshez meg kell említenünk a mappa elérési útját és a fájl nevét a fájlkiterjesztéssel együtt. A fájlnév megszerzéséhez sok kódoló megadja a VBA beviteli mezőt a fájl elérési útjának és fájlnevének megadásának lehetőségeként. De ez nem jó lehetőség a gyakorláshoz, mert amikor egy beviteli mezőt mutat be a felhasználó előtt, akkor nem mindig emlékszik a fájl elérési útjára, visszavonással elválasztja az egyik mappát egy másik mappától, a fájlneveket és a fájlok kiterjesztését. . Ez a felhasználó által megadott bevitelt rendezettebbé teszi, és a végén mindent elcsesznek akkor is, ha van egy kis szóköz hibája. A legjobb módszer a beviteli mező cseréje a VBA „GetOpenFileName” nevű módszerével.
Ebben a cikkben megmutatjuk, hogyan használhatja a VBA GetOpenFileName fájlt a fájlnév hibamentes megszerzéséhez.
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba_.png.webp)
Mit csinál a GetOpenFilename az Excel VBA-ban?
A VBA „GetOpenFileName” lehetővé teszi a felhasználó számára, hogy a fájl megnyitása nélkül kiválassza a fájlt abból a számítógépről, amelyen dolgozunk.
A „GetOpenFileName” módszer segítségével valóban bemutathatunk egy párbeszédpanelt a felhasználó előtt a fájl kiválasztásához a kívánt mappában. A „GetOpenFileName” átmásolja a fájl helyét a fájlnévvel és a fájlkiterjesztéssel együtt.
A GetOpenFilename szintaxisa az Excel VBA-ban
Vessen egy pillantást a „GetOpenFilename” módszer szintaxisára.
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__2.png.webp)
- Fájlszűrő: Ebben az argumentumban megadhatjuk, hogy milyen fájlokat jelenítsen meg a kiválasztáshoz. Például, ha megemlíti az „Excel Files, *. Xlsx” elemet, akkor csak az Excel „xlsx” kiterjesztéssel mentett Excel fájlok jelennek meg. Más fájlok nem jelennek meg. Ha figyelmen kívül hagyja, mindenféle fájl megjelenik.
- Szűrőindex: Ezzel korlátozzuk a felhasználót a fájltípus kiválasztására. A Fájlszűrő alatt felsorolhatjuk a látható szűrők számát .
- Cím: Megjeleníti a fájl kiválasztása párbeszédpanel címét.
- Gombszöveg: Ez csak Macintosh rendszerhez használható.
- Többszörös kijelölés : IGAZ, ha több fájlt szeretne kijelölni, vagy pedig HAMIS. Az alapértelmezett érték FALSE.
Példa a GetOpenFilename-re az Excel VBA-ban
Az alábbiakban bemutatjuk a VBA Application.GetOpenFilename példáit.
Írjunk egy kódot a fájlnév és az elérési út cím megszerzéséhez.
1. lépés: Indítsa el az alprogramot.
Kód:
Sub GetFile_Example1 () End Sub
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__3.png.webp)
2. lépés: Nyújtson be egy változót karakterláncként.
Kód:
Sub GetFile_Example1 () Dim FileName mint karakterlánc vége Sub
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__4.png.webp)
3. lépés: Ehhez a változóhoz hozzárendeljük a GetOpenFileName nevet.
Kód:
Sub GetFile_Example1 () Dim FileName mint karakterlánc FileName = Application.GetOpenFilename () End Sub
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__5.png.webp)
Mostanáig minden paramétert figyelmen kívül hagytam.
4. lépés: Most mutassa meg a változó eredményét az üzenetmezőben.
Kód:
Sub GetFile_Example1 () Dim FileName mint karakterlánc FileName = Application.GetOpenFilename () MsgBox FileName End Sub
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__6.png.webp)
Most futtassa a kódot az F5 excel gyorsbillentyűvel vagy manuálisan, az alábbi párbeszédpanelen jelenik meg a fájl kiválasztásához.
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__7.png.webp)
Kiválasztok egy fájlt, és rákattintok az OK gombra.
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__8.png.webp)
Amint kiválasztom a fájlt, kaptam egy ilyen mezőt a VBA-ban. Megmutatja a teljes mappa elérési útját és a kiválasztott Excel fájlnevet, valamint a fájlkiterjesztést.
Amint a fenti képen láthatjuk, mindenféle fájlt láthattunk. Most hozzáadom az első paramétert, azaz a Fájlszűrőt „Excel Files, *. Xlsx” néven.
Kód:
Sub GetFile_Example1 () Dim FileName as String FileName = Application.GetOpenFilename (FileFilter: = "Excel Files, *. Xlsx") MsgBox FileName End Sub
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__9.png.webp)
Most, ha ezt a kódot az F5 billentyűvel vagy manuálisan futtatom, csak az „xlsx” kiterjesztésű Excel fájlokat fogom látni.
![](https://cdn.know-base.net/7250165/vba_getopenfilename_how_to_use_getopenfilename_method_in_vba__10.png.webp)
Így használhatjuk a „VBA Application.GetOpenFileName” metódust a mappa elérési útjának megszerzéséhez a fájlnévvel és a fájl kiterjesztésével együtt.