Excel VBA Workbook Open

Наиболее распространенные операции в повседневной жизни - это открытие книг Excel при работе с Excel. Вы не можете работать в Excel, не открывая книги Excel или файл Excel. Итак, в этой статье мы рассмотрим, как мы можем открыть рабочие книги Excel с помощью VBA.

Методы открытия Exel Workbooks в VBA

Есть два способа открыть Excel книги в VBA, и мы собираемся рассмотреть оба метода в этой статье.

Вы можете скачать эту книгу VBA Open Excel Template здесь - VBA Workbook Open Excel Template

Метод № 1 - Excel VBA Workbooks.open Метод

Первый метод в VBA - это использование встроенной функции Workbooks.open . В функции «Workbooks.open» есть 15 необязательных аргументов, и для охвата всех 15 аргументов потребуется много времени. Поэтому мы просто попытаемся понять некоторые основы Workbooks.open и посмотрим, как мы можем использовать эту функцию в VBA для открытия рабочих книг.

Итак, первый шаг в этом методе - вы должны знать имя файла книг Excel. Ниже приведено заявление об открытии рабочих книг ». Workbooks.open« File_Name »

Или

Workbooks.Open Filename: = ”File_Name”

«File_Name» - это имя книги, которую вы хотите открыть. Но вы должны быть осторожны, потому что вам нужно указать полный путь к файлу и имя файла с расширением файлов (.XLS, .XLSX, .xlsm и т. Д.). Мы можем взять пример макроса ниже, чтобы понять эту функцию.

пример

Предположим, вы хотите открыть файл Excel с именем «Тестовый файл», который сохраняется на диске D компьютера. Создайте макрос в книге с поддержкой макросов Excel. Выполните следующие действия, чтобы использовать метод Excel VBA Workbooks.open.

Шаг 1: Нажмите на файл.

Шаг 2: Нажмите на Опции .

Шаг 3: Нажмите на Настроить ленту .

Шаг 4: Убедитесь, что поле «Разработчик» помечено, как показано ниже, и нажмите «ОК».

Шаг 5. После того, как вы перейдете на вкладку разработчика, нажмите Visual Basic, как показано на скриншоте ниже.

После того, как вы нажмете Visual Basic, вам нужно начать кодирование для вашего макроса.

Шаг 6: Введите приведенный ниже код в модуль VBA.

Код:

 Sub Open_workbook () End Sub

Этот код предоставляет имя для вашей рабочей книги.

Шаг 7: Введите код, который может открыть книгу, сохраненную на диске D компьютера.

Код:

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

Шаг 8: Запустите код, нажав клавишу F5 или нажав кнопку воспроизведения. После запуска макроса вы обнаружите, что файл Excel автоматически открывается. Как видно из приведенного выше кода, макрос откроет файл Excel с именем «Test File.xlsx», который сохраняется на диске D компьютера. Упомянутый выше путь довольно прост, потому что нет папок и подпапок для получения рабочих книг.

Это становится сложной задачей, потому что многие люди не помнят путь, и если путь файла, в котором он сохранен, немного изменяется, макрос не будет работать. Макрос не будет работать, даже если имя файла изменяется на одну букву. Поэтому, если путь / имя файла изменяется, вам нужно изменить код VBA макроса. Это делает работу утомительной, и это также не без ошибок. Таким образом, чтобы убедиться, что ваш макрос работает без ошибок, мы будем использовать второй метод, который прост в обращении и не выдаст ошибку, даже если вы не помните путь или даже когда имя файла изменяется,

Способ № 2 - получить открытое имя файла

Как вы знаете, проблемы, с которыми мы сталкиваемся в первом методе изменения пути и имени файла, этот метод позволяет избежать обеих проблем. Этот метод дает возможность просматривать на вашем компьютере место, где сохранен ваш файл, и открывает именно те рабочие книги, которые вы хотите открыть.

Этот метод на самом деле работает в двух частях.

Первая часть этого метода - Application.GetOpenFileName. Эта часть позволяет вам просматривать ваш компьютер и выбирать путь для сохранения вашего файла. Первая часть не открывает файл, который вы хотите открыть.

Вторая часть состоит в том, чтобы открыть файл, для которого вам все еще нужно зависеть от первого метода (метод VBA Workbooks.open). В Application.GetOpenFileName есть 5 аргументов, но мы будем смотреть только на основы, как мы это делали в первом методе. Теперь давайте попробуем разобраться в этом методе с помощью примера.

пример

Предположим, вы хотите открыть «Тестовый файл», сохраненный на диске D компьютера, тогда вам просто нужно выполнить следующие шаги.

Шаг 1. Выполните шаг 1, упомянутый в первом примере, для открытия редактора Visual Basic или редактора Visual Basic на вкладке разработчика.

Шаг 2: Введите приведенный ниже код, который предоставляет имя для вашего макроса.

Код:

 Sub Open_workbook_example2 () End Sub

Шаг 3: Введите приведенный ниже код. Этот оператор объявляет имя файла как переменную, потому что здесь мы не указываем никакого пути или имени файла, потому что оно может время от времени меняться.

Код:

 Sub_workbook_example2 () Dim Myfile_Name как вариант конца Sub

Шаг 4: Введите приведенный ниже код. Этот оператор открывает диалоговое окно ниже, и вы можете просматривать папки, чтобы перейти к пути, в котором сохранен файл. Кроме того, он покажет файл Excel во время просмотра, потому что мы установили фильтр для файлов Excel.

Код:

 Sub Open_workbook_example2 () Dim Myfile_Name As Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Файлы Excel (*. Xl *), *. Xl *)") End Sub

Шаг 5: Введите приведенный ниже код. Этот оператор является оператором If Then, который используется, когда файл .Name не равен false, а затем откройте выбранный файл Excel.

Код:

 Sub Open_workbook_example2 () Dim Myfile_Name As Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Файлы Excel (*. Xl *), *. Xl *)") Если Myfile_Name False, то Workbooks.Open Filename: = Myfile_Name End Sub

Шаг 6: Введите приведенный ниже код. Это утверждение закрывает условие If then в макросе.

Код:

 Sub Open_workbook_example2 () Dim Myfile_Name As Variant Myfile_Name = Application.GetOpenFilename (FileFilter: = "Файлы Excel (*. Xl *), *. Xl *)") Если Myfile_Name False, то Workbooks.Open Filename: = Myfile_Name End If End End Sub

Шаг 7: Теперь запустите код, нажав клавишу F5 или нажав кнопку воспроизведения. Вы увидите диалоговое окно для просмотра файла откроется. Перейдите на рабочий стол, на котором сохранен ваш файл. Теперь вы сможете увидеть файл на диске D. Выберите файл и нажмите «Открыть».

Теперь, как мы только что видели в нашем примере, нам не нужно беспокоиться об имени файла и пути к файлу, где он сохранен. Мы можем легко перейти к папке, в которой сохранен наш файл, и выбрать файл, который мы хотим открыть. Таким образом, мы можем легко заключить, что этот метод намного более эффективен по сравнению с первым методом.

То, что нужно запомнить

  • Убедитесь, что путь и имя файла указаны верно при использовании первого метода. Макрос не будет работать при изменении буквы или пробела в пути или имени файла.
  • Убедитесь, что фильтры, указанные в коде во втором методе, верны. Существует множество форматов Excel, которые могут быть не видны из-за фильтра.
  • Убедитесь, что объявление и код, используемый в VBA, верны, чтобы избежать ошибок.

Рекомендуемые статьи

Это руководство к VBA Workbook Open. Здесь мы обсудим два различных метода открытия книги с помощью кода Excel VBA, а также практические примеры и загружаемый шаблон Excel. Вы также можете посмотреть следующие статьи, чтобы узнать больше -

  1. Полное руководство по VBA Workbook
  2. HYPERLINK Формула в Excel
  3. Открытые файлы с VBA FileDialog
  4. Примеры электронных таблиц Excel

Категория:

VBA