Gyors módot szeretne adni magának vagy felhasználóinak a fájlok megkeresésére és megnyitására Excelben? Ez a makró egy egyszerű technikát használ, amely barátságos párbeszédpanelt nyit meg, lehetővé téve az Ön által választott Excel-fájl tallózását és megnyitását.
Hogyan működik a makró
Ez a makró megnyitja az itt látható párbeszédpanelt, lehetővé téve a felhasználó számára, hogy Excel-fájlt keressen és nyissa meg.

A makró által aktivált Megnyitás párbeszédpanel.
Ez a makró a következőképpen működik:
Almakró1()
'1. lépés: Határozzon meg egy String változót
Dim FName Változatként
'2. lépés: A GetOpenFilename Method aktiválja a párbeszédpanelt
FName = Application.GetOpenFilename( _
FileFilter:="Excel-munkafüzetek,*.xl*", _
Title:="Válasszon munkafüzetet a megnyitáshoz", _
MultiSelect:=False)
'3. lépés: Ha kiválasztott egy fájlt, nyissa meg!
Ha FName <> False Akkor
Workbooks.Open Filename:=FName
Vége Ha
Vége Sub
Az 1. lépésben a makró deklarál egy Variant változót, amely tartalmazza a felhasználó által választott fájlnevet. Az FName a változó neve.
A 2. lépésben a GetOpenFilename metódust használja egy párbeszédpanel előhívására, amely lehetővé teszi a kívánt fájl böngészését és kiválasztását.
A GetOpenFilename metódus néhány testreszabható paramétert támogat. A FileFilter paraméter lehetővé teszi a keresett fájl típusának megadását. A Title paraméter lehetővé teszi a párbeszédpanel tetején megjelenő cím módosítását. A MultiSelect paraméter lehetővé teszi, hogy a kijelölést egy fájlra korlátozza.
Ha a felhasználó kiválaszt egy fájlt a párbeszédpanelen, az FName változó a kiválasztott fájlnévvel lesz kitöltve. A 3. lépésben ellenőrizze, hogy nincs-e üres FName változó. Ha a változó nem üres, akkor a Munkafüzetek objektum Megnyitás metódusával nyissa meg a fájlt.
Hogyan kell használni a makrót
A makró megvalósításához másolja és illessze be egy szabványos modulba:
A Visual Basic Editor aktiválásához nyomja meg az Alt+F11 billentyűkombinációt a billentyűzeten.
Kattintson a jobb gombbal a projekt/munkafüzet nevére a projekt ablakban.
Válassza a Beszúrás → Modul menüpontot.
Írja be vagy illessze be a kódot az újonnan létrehozott modulba.
(Opcionális) Rendelje hozzá a makrót egy gombhoz.