Nyissa meg az Excel VBA munkafüzetet

A napi élet leggyakoribb műveletei az Excel munkafüzetek megnyitása, amikor Excel-szel dolgozik. Az Excel programban nem működhet az Excel munkafüzetek vagy Excel fájl megnyitása nélkül. Tehát ebben a cikkben azt fogjuk bemutatni, hogyan lehet megnyitni az Excel munkafüzeteket a VBA segítségével.

Az Exel munkafüzetek megnyitásának módszerei a VBA-ban

Kétféle módszer nyílik az Excel munkafüzetek megnyitására a VBA-ban, és e cikkben mindkét módszerrel foglalkozunk.

A VBA munkafüzet megnyitott Excel sablonját itt töltheti le - A VBA munkafüzet megnyithatja az Excel sablont

1. módszer - Excel VBA Workbooks.open módszer

Az első módszer a VBA-ban a beépített Workbooks.open funkció használata. A „Workbooks.open” funkcióban 15 választható argumentum található, és mind a 15 argumentum lefedése sok időt vesz igénybe. Tehát megpróbáljuk megérteni a Workbooks.open néhány alapját, és megnézzük, hogyan használhatjuk ezt a funkciót a VBA-ban a Workbooks megnyitásához.

Tehát ennek a módszernek az első lépése az, ha ismeri az Excel munkafüzetek fájlnevét. Az alábbiakban olvasható a munkafüzetek megnyitására vonatkozó nyilatkozat. ”Workbooks.open“ File_Name ”

Vagy

Workbooks.Open Filename: = ”File_Name”

A „File_Name” a megnyitni kívánt munkafüzetek neve. De itt óvatosnak kell lennie, mert megadnia kell a fájl mentésének teljes elérési útját és a fájl nevét a fájlok kiterjesztésével (.XLS, .XLSX, .xlsm stb.). Például az alábbiakban látható makrót értjük meg ennek a funkciónak.

Példa

Tegyük fel, hogy szeretne megnyitni egy „Test File” nevű excel fájlt, amelyet a számítógép D meghajtójába mentettünk. Hozzon létre egy makrót egy Excel makrót engedélyező munkafüzetben. Az Excel VBA Workbooks.open módszer használatához kövesse az alábbi lépéseket.

1. lépés: Kattintson a Fájl elemre .

2. lépés: Kattintson az Opciók elemre.

3. lépés: Kattintson a Szalag testreszabása elemre.

4. lépés: Ellenőrizze, hogy a Fejlesztő mező meg van-e jelölve az alábbiak szerint, és kattintson az OK gombra.

5. lépés: Miután megkapta a fejlesztői fület, kattintson az Visual basic elemre, ahogy az alábbi képernyőképen látható.

Miután rákattint a Vizuális alapokra, el kell kezdenie a makró kódolását.

6. lépés: Írja be az alábbi kódot a VBA modulba.

Kód:

 Sub Open_workbook () Sub vége

Ez a kód megadja a munkafüzet nevét.

7. lépés: Írja be azt a kódot, amely megnyitja a számítógép D meghajtójában mentett munkafüzetet.

Kód:

 Sub Open_workbook () Workbooks.Open Fájlnév: = "D: \ Test File.xlsx"

8. lépés: Futtassa a kódot az F5 billentyű megnyomásával vagy a Play gombra kattintással. A makró futtatása után az Excel fájl automatikusan megnyílik. Amint az a fenti kódból látható, a makró megnyitja az „Excel File” fájlt, „Test File.xlsx” néven, amelyet a számítógép D meghajtójában ment. A fent említett út meglehetősen egyszerű, mivel nincsenek mappák és almappák a munkafüzetek beszerzéséhez.

Ez kihívást jelent, mivel sok ember nem emlékszik az elérési útjára, és ha a fájl elérési útja egy kissé megváltozik, akkor a makró nem fog működni. A makró akkor sem működik, ha a fájl neve egyetlen betűvel megváltozik. Tehát ha a fájl elérési útja / neve megváltozik, meg kell változtatnia a makró VBA kódját. Ez a munkát unalmassá teszi, és nem is hibamentes. Tehát annak biztosítása érdekében, hogy a makró tökéletesen fut, anélkül, hogy hiba lenne, a második, könnyen kezelhető módszert fogjuk használni, amely akkor sem okoz hibát, ha nem emlékszik az elérési útra, vagy ha a fájl neve megváltozik .

2. módszer - Nyissa meg a fájlnevet

Mint tudja a kihívásokat, amelyekkel szembesülünk az elérési út és a fájlnév megváltoztatásának első módszerével, ez a módszer elkerüli mindkét kihívást. Ez a módszer lehetőséget nyújt arra, hogy a számítógépen a fájl mentésének helyére böngészjen, és megnyissa azt a konkrét munkafüzetet, amelyet meg szeretne nyitni.

Ez a módszer valójában két részből áll.

Ennek a módszernek az első része az Application.GetOpenFileName. Ez a rész lehetővé teszi a számítógép böngészését és a fájl mentési útvonalának kiválasztását. Az első rész nem nyitja meg a megnyitni kívánt fájlt.

A második rész az a fájl megnyitása, amelynek továbbra is függnie kell az Első módszertől (VBA Workbooks.open Method). Az Application.GetOpenFileName öt érvvel rendelkezik, de csak az alapokat fogja megvizsgálni, mint az első módszernél. Most próbáljuk megérteni ezt a módszert egy példa segítségével.

Példa

Tegyük fel, hogy a számítógép D meghajtójában mentett „Teszt fájlt” szeretné megnyitni, akkor csak meg kell tennie az alábbi lépéseket.

1. lépés: Kövesse az első példában említett 1. lépést a Visual Basic Editor vagy a Visual Basic Editor megnyitásához a Fejlesztő lapon.

2. lépés: Írja be az alábbi kódot, amely megadja a makró nevét.

Kód:

 Sub Open_workbook_example2 () Sub Sub

3. lépés: Írja be az alábbi kódot. Ez az állítás a fájlnevet változónak ismeri el, mert itt nem adunk meg semmilyen elérési utat vagy fájlnevet, mert időről időre megváltozhat.

Kód:

 Sub Open_workbook_example2 () A Myfile_Name elsötétítése mint variáns vége Sub

4. lépés: Írja be az alábbi kódot. Ez az állítás megnyitja az alábbi párbeszédpanelt, és böngészhet a mappák között, hogy elérje azt az utat, ahova a fájlt menti. Ezenkívül böngészés közben megjeleníti az Excel fájlt, mert szűrőt helyezett az Excel fájlokhoz.

Kód:

 Sub Open_workbook_example2 () Dim Myfile_Name Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") End Sub

5. lépés: Írja be az alábbi kódot. Ez a kijelentés If then utasítás, amelyet akkor használunk, amikor a .Name fájl nem egyenlő a hamis értékkel, nyissa meg a kiválasztott Excel fájlt.

Kód:

 Sub Open_workbook_example2 () Halvány Myfile_Name mint variáció Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *, *. Xl *)") Ha Myfile_Name Hamis, akkor Workbooks.Open Filename: = Myfile_Name End Sub

6. lépés: Írja be az alábbi kódot. Ez az állítás lezárja a makró If-feltételét.

Kód:

 Sub Open_workbook_example2 () Eltávolítja a Myfile_Name mint variációt Myfile_Name = Application.GetOpenFilename (FileFilter: = "Excel Files (*. Xl *), *. Xl *)") Ha a Myfile_Name hamis, akkor a Workbooks.Open Filename: = Myfile_Name vége, ha az End befejezése

7. lépés: Most futtassa a kódot az F5 billentyű megnyomásával vagy a Play gombra kattintással. Megjelenik a fájl böngészéséhez használt párbeszédpanel. Keresse meg azt az asztalot, ahova a fájlt menti. Most már láthatja a fájlt a D meghajtóban. Válassza ki a fájlt, és kattintson az megnyitás gombra.

Most, ahogy a példánkban láttuk, nem kell aggódnunk a fájlnév és az elérési út neve miatt, ahova a fájlt mentettük. Könnyen navigálhatunk abban a mappában, ahová a fájlt mentettük, és kiválaszthatjuk a megnyitni kívánt fájlt. Így könnyen megállapíthatjuk, hogy ez a módszer sokkal hatékonyabb, mint az első módszer.

Dolgok, amikre emlékezni kell

  • Az első módszer használatakor ellenőrizze, hogy az elérési út és a fájlnév helyes-e. A makró nem fog működni, ha betű vagy szóköz módosul az elérési útban vagy a fájlnévben.
  • Ellenőrizze, hogy a 2. módszerben a kódban említett szűrők helyesek-e. Számos Excel formátum létezik, amelyek szűrő miatt nem láthatók.
  • A hibák elkerülése érdekében ellenőrizze, hogy a VBA-ban használt nyilatkozat és kód helyes-e.

Ajánlott cikkek

Ez egy útmutató a VBA Workbook Open-hez. Itt két különféle módszert tárgyalunk a munkafüzet Excel VBA kóddal történő megnyitásához, valamint a gyakorlati példákat és letölthető Excel sablont. A következő cikkeket is megnézheti további információkért -

  1. Teljes útmutató a VBA munkafüzethez
  2. HYPERLINK képlet Excelben
  3. Nyissa meg a fájlokat a VBA FileDialog segítségével
  4. Excel táblázatkezelő példák

Kategória:

VBA