Excel VBA: сохранение и закрытие рабочей книги (5 подходящих примеров)

Hugh West

03-10-2023 Макросы & Excel VBA
  • Поделись Этим
Hugh West

В этой статье мы расскажем вам 5 методы использования Excel VBA на сохранить и закрыть рабочую тетрадь Поскольку время очень ценно, мы можем сэкономить много времени, пропуская рутинные задачи, используя Excel VBA Более того, мы взяли набор данных, состоящий из 3 колонны : " Имя ", " Родился ", и " Последние работы ". Этот набор данных представляет собой 6 год рождения людей и их последняя информация о фильмах.

Скачать Практическое пособие

VBA для сохранения и закрытия рабочей книги.xlsm

5 примеров сохранения и закрытия рабочей книги с помощью VBA в Excel

1. сохранение и закрытие активной рабочей книги с помощью Excel VBA

Для первого метода мы сохранить и закрыть сайт Активная рабочая тетрадь используя Макрос VBA Мы поднимем Модуль VBA окно, введите наш код и затем выполните его для достижения нашей цели. Без лишних слов, давайте перейдем к пошаговой процедуре.

Шаги:

Перед вводом нашего кода нам необходимо вызвать Модуль VBA . Для этого -

  • Во-первых, из Разработчик вкладка>>> выбрать Visual Basic .

В качестве альтернативы можно нажать ALT + F11 чтобы сделать это тоже. Microsoft Visual Basic для применения " появится после этого.

  • Во-вторых, из Вставка >>> выбрать Модуль .

Здесь мы будем вводить наш код.

  • В-третьих, введите следующий код внутри Модуль . 
 Sub Save_and_Close_Active_Workbook() ActiveWorkbook.Close SaveChanges:=True End Sub

Разбивка кода VBA

  • Во-первых, мы вызываем наш Подпроцедура Сохранить_и_закрыть_активную_рабочую_книгу .
  • Затем, мы обращаемся к нашему текущему Рабочая тетрадь в качестве ActiveWorkbook .
  • После этого, используя Закрыть метод, который мы закрытие наш файл.
  • Наконец, мы установили SaveChanges на Правда что спасет наш Рабочая тетрадь на закрытие .

Теперь мы выполним наш код.

  • Первый, Сохранить это Модуль .
  • Во-вторых, щелкните внутри нашего кода.
  • Наконец, нажмите кнопку Запускайте кнопка.

Если мы обратимся к нашему Приложение Excel мы увидим наши Рабочая тетрадь закрыта. Таким образом, мы успешно сохранено и закрытый сайт Рабочая тетрадь используя Excel VBA .

Читать далее: Как сохранить макрос для всех рабочих книг в Excel (с помощью простых шагов)

2. Excel VBA для сохранения и закрытия конкретной рабочей книги

Для второго метода мы будем использовать сохранить и закрыть конкретный Рабочая тетрадь использование другого VBA код. Здесь мы открыли два Рабочие тетради и мы будем сохранить и закрыть первый Рабочая тетрадь с левой стороны.

Шаги:

  • Первый, как показано в методе 1 , поднимите Модуль VBA .
  • Во-вторых, введите этот код внутри Модуль . 
 Sub Save_and_Close_Specific_Workbook() Workbooks("Macro Save and Close.xlsm").Close SaveChanges:=True End Sub

Разбивка кода VBA

  • Во-первых, мы вызываем наш Подпроцедура Сохранить_и_закрыть_конкретную_рабочую_книгу .
  • Затем мы обращаемся к нашему первому Рабочая тетрадь внутри Объект "Рабочие книги .
  • После этого, используя Закрыть метод, который мы закрытие наш файл.
  • Наконец, мы установили SaveChanges на Правда что спасет наш Рабочая тетрадь на закрытие .
  • В-третьих, как показано в методе 1 , выполните код.

После этого мы увидим, что первый Рабочая тетрадь это закрытый и только второй Рабочая тетрадь это открыть Таким образом, мы показали вам еще один метод. сохранение и закрытие a Рабочая тетрадь .

Читать далее: Excel VBA: сохранение листа как новой рабочей книги без открытия

3. Сохранить и закрыть конкретную рабочую книгу в конкретной папке

Для третьего метода мы собираемся сохранить и закрыть a конкретная рабочая тетрадь в папка используя Excel VBA .

Шаги:

  • Первый, как показано в методе 1 , поднимите Модуль VBA .
  • Во-вторых, введите этот код внутри Модуль . 
 Sub Save_and_Close_Workbook_in_Specific_Folder() Workbooks("Macro Save and Close.xlsm").SaveAs _ Filename:="C:\Users\Rafi\OneDrive\Desktop\Exceldemy\Macro Save and Close.xlsm" Workbooks("Macro Save and Close.xlsm").Close End Sub

Разбивка кода VBA

  • Во-первых, мы вызываем наш Подпроцедура Сохранить_и_закрыть_рабочую_книгу_в_конкретной_папке .
  • После этого, используя SaveAs метод, который мы сохранение наш файл в определенном месте.
  • Затем, мы сохраняем имя файла таким же, как у оригинала Рабочая тетрадь .
  • Наконец, мы закрыть наш Рабочая тетрадь .
  • В-третьих, как показано в методе 1 , выполните код.

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

Читать далее: Макрос Excel VBA для сохранения PDF в определенной папке (7 идеальных примеров)

Похожие чтения

  • Excel VBA: сохранение рабочей книги без подсказки (с простыми шагами)
  • [Исправлено!] Почему Excel не сохраняет мое форматирование? (7 возможных причин)
  • Как сохранить Excel как PDF-ландшафт (с быстрыми шагами)
  • Excel VBA для сохранения в файл с использованием пути из ячейки (с быстрыми шагами)
  • [Исправлено!] Excel CSV файл не сохраняет изменения (6 возможных решений)

4. Вставка кнопки для сохранения и закрытия рабочей книги в Excel

Для четвертого метода мы собираемся создать Кнопка VBA чтобы закрыть и сохранить рабочую книгу в Excel.

Шаги:

  • Первый, как показано в методе 1 , поднимите Модуль VBA .
  • Во-вторых, введите этот код внутри Модуль . 
 Sub Button_Click_Save_and_Close_Workbook() ThisWorkbook.Save Application.Quit End Sub

Разбивка кода VBA

  • Во-первых, мы вызываем наш Подпроцедура Кнопка_нажатия_сохранить_и_закрыть_рабочую книгу .
  • После этого, используя Сохранить метод, который мы сохранение наша рабочая тетрадь
  • Наконец, мы закрыть наш Рабочая тетрадь используя Увольнение метод.

Теперь мы вставим VBA кнопка здесь.

  • Во-первых, из Разработчик вкладка>>> Вставка >>> выбрать Кнопка (Контроль формы) .

  • Затем курсор мыши изменится и перетащит рамку внутрь Рабочая тетрадь .

После этого Диалоговое окно Назначить макрос появится.

  • Затем выберите " Кнопка_нажатия_сохранить_и_закрыть_рабочую книгу ".
  • После этого нажмите OK .

Затем мы увидим Кнопка 1 в Рабочая тетрадь .

  • Наконец, нажмите на кнопку.

Это позволит сохранить и закрыть наш Рабочая тетрадь .

Читать далее: Код VBA для кнопки сохранения в Excel (4 варианта)

5. сохранение и закрытие всех открытых рабочих книг с помощью Excel VBA

В этом последнем методе мы собираемся сохранить и закрыть все открытые Рабочие тетради На этот раз у нас те же два Рабочие тетради как в методе 3 Однако на этот раз мы сохранить и закрыть оба Рабочие тетради Здесь мы будем использовать цикл For Next Loop пройти через наш Рабочие тетради .

Шаги:

  • Первый, как показано в методе 1 , поднимите Модуль VBA .
  • Во-вторых, введите этот код внутри Модуль . 
 Sub CloseAndSaveOpenWorkbooks() Dim z As Workbook With Application For Each z In Workbooks With z If Not z.ReadOnly Then .Save End If If .Name ThisWorkbook.Name Then .Close End If End With Next z .Quit End With End Sub

Разбивка кода VBA

  • Во-первых, мы вызываем наш Подпроцедура CloseAndSaveOpenWorkbooks .
  • Затем, мы используем Для следующего цикла чтобы просмотреть все Рабочие тетради .
  • После этого, используя Сохранить метод, который мы сохранение наши файлы.
  • Затем, мы закрыть весь Рабочие тетради кроме нашего нынешнего Рабочая тетрадь .
  • Наконец, мы имеем закрытый оригинал Рабочая тетрадь используя Увольнение собственность.
  • В-третьих, как показано в методе 1 , выполните код.

Таким образом, это будет сохранить и закрыть два Рабочие тетради Мы можем видеть дата изменения одинакова для двух Рабочие тетради В заключение, мы показали 5 разные Макросы Excel VBA на сохранить и закрыть рабочую тетрадь .

Читать далее: Как сохранить макрос в личную рабочую книгу макросов?

Заключение

Мы показали вам 5 быстро и легко понять Excel VBA на сохранить и закрыть рабочую тетрадь Если у вас возникли какие-либо проблемы, не стесняйтесь оставлять комментарии ниже. Кроме того, вы можете посетить наш сайт Exceldemy подробнее Связанные с Excel статьи. Спасибо за чтение, продолжайте совершенствоваться!

Предыдущий пост Как объединить две строки в Excel (4 простых способа)
Следующий пост Как обновить лист Excel автоматически (3 подходящих метода)

Хью Уэст — опытный тренер и аналитик Excel с более чем 10-летним опытом работы в отрасли. Он имеет степень бакалавра в области бухгалтерского учета и финансов и степень магистра делового администрирования. Хью страстно любит преподавать и разработал уникальный подход к обучению, которому легко следовать и который легко понять. Его экспертные знания Excel помогли тысячам студентов и специалистов по всему миру улучшить свои навыки и преуспеть в своей карьере. В своем блоге Хью делится своими знаниями со всем миром, предлагая бесплатные учебные пособия по Excel и онлайн-обучение, чтобы помочь отдельным лицам и компаниям полностью раскрыть свой потенциал.