Skoroszyt programu Excel VBA Otwarty

Najczęstszymi operacjami w życiu codziennym jest otwieranie skoroszytów programu Excel podczas pracy z programem Excel. Nie można pracować w programie Excel bez otwierania skoroszytów lub pliku Excel. W tym artykule omówimy, w jaki sposób możemy otworzyć skoroszyty programu Excel za pomocą VBA.

Metody otwierania skoroszytów Exela w VBA

Istnieją dwie metody otwierania skoroszytów programu Excel w VBA i omówimy obie metody w tym artykule.

Możesz pobrać ten skoroszyt VBA Otwórz szablon Excel tutaj - Skoroszyt VBA Otwórz szablon Excel

Metoda nr 1 - Metoda Excel VBA Workbooks.open

Pierwszą metodą w VBA jest użycie wbudowanej funkcji Workbooks.open . W funkcji „Workbooks.open” dostępnych jest 15 opcjonalnych argumentów, a pokrycie wszystkich 15 argumentów zajmie dużo czasu. Dlatego postaramy się zrozumieć niektóre podstawowe skoroszyty. Otwórz i zobacz, jak możemy użyć tej funkcji w VBA do otwierania skoroszytów.

Pierwszym krokiem w tej metodzie jest znajomość nazwy skoroszytów programu Excel. Poniżej znajduje się instrukcja otwierania skoroszytów. ”Workbooks.open„ File_Name ”

Lub

Workbooks.Open Filename: = ”File_Name”

„Nazwa_pliku” to nazwa skoroszytów, które chcesz otworzyć. Musisz jednak zachować ostrożność, ponieważ musisz podać pełną ścieżkę do miejsca, w którym plik jest zapisany, oraz nazwę pliku z rozszerzeniem plików (.XLS, .XLSX, .xlsm itp.). Możemy wziąć przykład poniższego makra, aby zrozumieć tę funkcję.

Przykład

Załóżmy, że chcesz otworzyć plik programu Excel o nazwie „Plik testowy” zapisany na dysku D komputera. Utwórz makro w skoroszycie programu Excel z włączonymi makrami. Wykonaj poniższe kroki, aby użyć metody Excel VBA Workbooks.open.

Krok 1: Kliknij Plik.

Krok 2: Kliknij Opcje .

Krok 3: Kliknij Dostosuj wstążkę .

Krok 4: Upewnij się, że pole Deweloper jest zaznaczone jak poniżej i kliknij OK.

Krok 5: Po otwarciu karty programisty kliknij Visual Basic, jak pokazano na poniższym zrzucie ekranu.

Po kliknięciu Visual Basics, musisz zacząć kodować swoje makro.

Krok 6: Wprowadź poniższy kod w module VBA.

Kod:

 Sub Open_workbook () End Sub

Ten kod zawiera nazwę skoroszytu.

Krok 7: Wprowadź kod, który może otworzyć skoroszyt zapisany na dysku D komputera.

Kod:

 Sub Open_workbook () Workbooks.Open Fileename: = "D: \ Test File.xlsx" End Sub

Krok 8: Uruchom kod, naciskając klawisz F5 lub klikając przycisk Play. Po uruchomieniu makra plik programu Excel zostanie automatycznie otwarty. Jak widać w powyższym kodzie, makro otworzy plik Excel o nazwie „Test File.xlsx”, który jest zapisany na dysku D komputera. Ścieżka wspomniana powyżej jest dość prosta, ponieważ nie ma folderów i podfolderów, aby uzyskać skoroszyty.

Staje się to trudne, ponieważ wiele osób nie pamięta ścieżki i jeśli ścieżka pliku, w którym jest zapisana, zmieni się nieco, makro nie będzie działać. Makro nie będzie działać, nawet jeśli nazwa pliku zmieni się o jedną literę. Jeśli więc ścieżka / nazwa pliku ulegnie zmianie, musisz zmienić kod VBA makra. To sprawia, że ​​Job jest uciążliwy i nie jest również wolny od błędów. Aby upewnić się, że makro działa idealnie bez błędów, użyjemy drugiej metody, która jest łatwa w obsłudze i nie spowoduje błędu nawet wtedy, gdy nie pamiętasz nazwy ścieżki lub nawet gdy nazwa pliku się zmienia .

Metoda nr 2 - Uzyskaj otwartą nazwę pliku

Jak wiesz, jakie wyzwania napotykamy w pierwszej metodzie zmiany ścieżki i nazwy pliku, ta metoda pozwala uniknąć obu tych wyzwań. Ta metoda daje opcję przeglądania na komputerze miejsca, w którym zapisany jest plik, i otwiera określone skoroszyty, które chcesz otworzyć.

Ta metoda faktycznie działa w dwóch częściach.

Pierwszą częścią tej metody jest Application.GetOpenFileName. Ta część umożliwia przeglądanie komputera i wybór ścieżki, w której zapisany jest plik. Pierwsza część nie otwiera pliku, który chcesz otworzyć.

Druga część polega na otwarciu pliku, dla którego nadal musisz być zależny od pierwszej metody (metoda VBA Workbooks.open). Application.GetOpenFileName zawiera 5 argumentów, ale będą patrzeć tylko na podstawy, tak jak zrobiliśmy to w pierwszej metodzie. Spróbujmy teraz zrozumieć tę metodę na przykładzie.

Przykład

Załóżmy, że chcesz otworzyć „Plik testowy” zapisany na dysku D komputera, wystarczy wykonać poniższe kroki.

Krok 1: Wykonaj krok 1 wspomniany w pierwszym przykładzie, aby otworzyć Edytor Visual Basic lub Otwórz Edytor Visual Basic z karty Deweloper.

Krok 2: Wprowadź poniższy kod, który podaje nazwę twojego makra.

Kod:

 Sub Open_workbook_example2 () End Sub

Krok 3: Wprowadź poniższy kod. Ta instrukcja deklaruje nazwę pliku jako zmienną, ponieważ tutaj nie podajemy żadnej ścieżki ani nazwy pliku, ponieważ może ona się zmieniać od czasu do czasu.

Kod:

 Sub Open_workbook_example2 () Dim Myfile_Name Jako wariant End Sub

Krok 4: Wprowadź poniższy kod. To oświadczenie otwiera poniższe okno dialogowe i możesz przeglądać foldery, aby przejść do ścieżki, w której zapisany jest plik. Ponadto wyświetli plik Excel podczas przeglądania, ponieważ umieściliśmy filtr dla plików Excel.

Kod:

 Sub Open_workbook_example2 () Dim Myfile_Name jako wariant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Pliki Excel (*. Xl *), *. Xl *)") End Sub

Krok 5: Wprowadź poniższy kod. Ta instrukcja to If If, która jest używana, gdy plik .Name nie jest równy false, a następnie otwórz wybrany plik Excel.

Kod:

 Sub Open_workbook_example2 () Dim Myfile_Name jako wariant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Pliki Excel (*. Xl *), *. Xl *)") Jeśli Myfile_Name False następnie Workbooks.Open Nazwa pliku: = Myfile_Name End Sub

Krok 6: Wprowadź poniższy kod. Ta instrukcja zamyka warunek If then w Makrze.

Kod:

 Sub Open_workbook_example2 () Dim Myfile_Name jako wariant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Pliki Excel (*. Xl *), *. Xl *)") Jeśli Myfile_Name False to Workbooks.Open Nazwa pliku: = Myfile_Name End If End Sub

Krok 7: Teraz uruchom kod, naciskając klawisz F5 lub klikając przycisk Play. Zostanie wyświetlone okno dialogowe do przeglądania pliku. Przejdź do pulpitu, na którym zapisany jest plik. Teraz będziesz mógł zobaczyć plik na D Drive. Wybierz plik i kliknij Otwórz.

Teraz, jak właśnie widzieliśmy w naszym przykładzie, nie musimy się martwić o nazwę pliku i nazwę ścieżki, w której plik jest zapisywany. Możemy łatwo przejść do folderu, w którym zapisany jest nasz plik i wybrać plik, który chcemy otworzyć. Możemy więc łatwo stwierdzić, że ta metoda jest znacznie bardziej wydajna w porównaniu do pierwszej metody.

Rzeczy do zapamiętania

  • Upewnij się, że nazwa ścieżki i nazwa pliku są poprawne podczas korzystania z pierwszej metody. Makro nie będzie działać, jeśli zmiana następuje literą lub spacją w ścieżce lub nazwie pliku.
  • Upewnij się, że filtry wymienione w kodzie drugiej metody są prawidłowe. Istnieje wiele formatów Excela, które mogą nie być widoczne z powodu filtra.
  • Upewnij się, że deklaracja i kod użyte w VBA są prawidłowe, aby uniknąć błędów.

Polecane artykuły

To jest przewodnik po VBA Workbook Open. Tutaj omawiamy dwie różne metody otwierania skoroszytu za pomocą kodu Excel VBA wraz z praktycznymi przykładami i szablonem Excel do pobrania. Możesz także przejrzeć następujące artykuły, aby dowiedzieć się więcej -

  1. Kompletny przewodnik do skoroszytu VBA
  2. Formuła HYPERLINK w programie Excel
  3. Otwórz pliki za pomocą VBA FileDialog
  4. Przykłady arkuszy kalkulacyjnych Excel

Kategoria:

VBA