Как закрыть все файлы Excel

Обновлено: 20.11.2024

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

Рабочее пространство Excel

Использовали ли вы когда-нибудь функцию рабочей области Excel, которая исчезла в Excel 2013?

  • С помощью рабочей области вы можете открыть две или более рабочих книг, упорядочить их в окне Excel и сохранить эту настройку с именем рабочей области.
  • Позже вы можете открыть эту рабочую область и быстро вернуться к работе. Все файлы открывались автоматически и имели тот же макет, который вы создали ранее.

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

  • Нажмите кнопку, и макрос выведет список всех открытых файлов и закроет каждый файл.
  • Чтобы вернуться к работе, откройте файл макроса и нажмите кнопку, чтобы открыть все перечисленные файлы.

Настройка книги

В образце файла для этой книги лист FileList имеет 2 кнопки для запуска макросов:

  • Список и закрытие книг: создает список всех открытых файлов Excel.
  • Открыть все рабочие книги в списке: открывает все файлы Excel, перечисленные на рабочем листе.

Советы по составлению списка книг

Вот несколько советов по работе с образцом файла List and Close Workbooks.

  • После создания списка его можно отсортировать по алфавиту, чтобы упростить поиск файлов в длинном списке.
  • Прежде чем нажимать кнопку «Открыть все книги», проверьте список файлов.
    • Если вы не хотите открывать один из перечисленных файлов, выберите эту ячейку и очистите содержимое

    Макросы списка рабочих книг

    В примере файла есть 2 макроса:

      - запускается при нажатии кнопки "Список и закрытие рабочих книг" - запускается при нажатии кнопки "Открыть все рабочие книги"

    ПРИМЕЧАНИЕ. Вам не нужно смотреть на код макроса, если только вы не хотите увидеть, как он работает, или внести в него небольшие изменения.

    В образце файла, если вы хотите увидеть код макроса для любой из кнопок рабочего листа:

    • Нажмите правой кнопкой мыши кнопку рабочего листа.
    • Нажмите "Назначить макрос".
    • В окне "Назначить макрос" нажмите кнопку "Изменить".

    Показать и закрыть макрос

    Вот код макроса ListAndCloseWorkbooks, который создает список всех открытых файлов Excel на листе FileList.

    • Макрос очищает столбец 3, чтобы удалить все имена файлов, которые были в нем ранее.
    • Затем макрос проверяет каждый открытый файл Excel.
    • Если файл является надстройкой, его имя не отображается на листе. Файлы надстроек скрыты и автоматически открываются при запуске Excel.
    • Если файл НЕ является надстройкой, путь к нему и имя файла указываются на листе, за исключением книги, содержащей макрос ListAndCloseWorkbooks.
    • Если на листе нет файлов, появится сообщение "Другие книги не открыты".

    Макрос "Открыть все рабочие книги"

    Вот макрос OpenAllListedWorkbooks, который открывает каждый из файлов Excel из списка на листе FileList.

    • Макрос находит номер строки последней заполненной ячейки в столбце C.
    • Начиная с ячейки C1 и заканчивая последней заполненной ячейкой, открывается файл, указанный в ячейке.
    • Если ячейка в списке пуста, эта ячейка пропускается.

    СОВЕТ. Если вы не хотите открывать один из перечисленных файлов, выберите эту ячейку и очистите содержимое

    Загрузить образец файла

    Чтобы просмотреть образец файла из этого руководства, загрузите книгу List and Close All Excel Files. Заархивированный файл имеет формат xlsm и содержит макросы. Не забудьте включить макросы при открытии книги, если вы хотите протестировать макросы.

    Вывод: изучите несколько быстрых способов и советов по сохранению и закрытию всех открытых книг Excel.

    Уровень навыков: начальный

    Если вы, как и я, используете Excel весь день, то может быть легко одновременно открыть много книг.Я стараюсь соблюдать дисциплину, но иногда это сложно. А в конце дня мы просто хотим закрыть все открытые рабочие книги и вернуться домой! Итак, этот пост содержит несколько советов, как быстро закрыть все открытые файлы, чтобы избежать пробок в час пик. 🙂

    Самый быстрый способ закрыть все открытые книги — удерживать клавишу Shift, одновременно нажимая кнопку "Закрыть окно". Кнопка «Закрыть окно» — это значок «x» в правом верхнем углу окна приложения.

    Если все открытые книги были сохранены, все они будут закрыты.

    Если какая-либо из открытых книг НЕ была сохранена, вам будет предложено сохранить файл. Появится всплывающее окно, и вам придется нажимать «Сохранить» или «Не сохранять» для каждой несохраненной книги.

    В этом окне также есть кнопка "Сохранить все". Вы можете нажать эту кнопку, чтобы сохранить все несохраненные книги за один шаг.

    Нажатие кнопки "Отмена" отменит всю операцию, и все еще открытые словари останутся открытыми.

    Мы также можем добавить кнопку "Закрыть все" на панель быстрого доступа (QAT), чтобы закрыть все открытые книги. Это делает то же самое, что и сочетание клавиш Shift+Закрыть окно.

    Преимущество здесь в том, что мы можем использовать сочетание клавиш для нажатия кнопки. Доступ к кнопкам QAT можно получить с помощью сочетания клавиш, нажав клавишу Alt и номер, присвоенный кнопке.

    Чтобы добавить кнопку «Закрыть все» в QAT, откройте окно «Параметры Excel» («Файл»> «Параметры») и выполните действия, указанные на изображении ниже.

    Дополнительный совет: мы также можем использовать сочетание клавиш Ctrl+W, чтобы закрыть одну книгу. Я упомянул этот совет в своем посте о 17 ярлыках Excel на 2017 год.

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

    Вы можете загрузить файл Excel, содержащий макросы, здесь.

    Сохранить и закрыть все файлы Macros.xlsm (15,8 КБ)

    Макрос для закрытия всех книг без сохранения

    Если мы не хотим сохранять какие-либо открытые файлы, мы можем использовать следующий макрос.

    Как работает этот макрос?

    Приведенный выше макрос перебирает все открытые книги на компьютере с помощью цикла For Next. Он использует оператор If, чтобы проверить, является ли файл в цикле (wb.Name) НЕ (<>) файлом, содержащим код ThisWorkbook.Name.

    Затем он использует метод Workbooks.Close (страница справки MSDN), чтобы закрыть книгу. Метод Close имеет необязательный параметр для SaveChanges. Мы можем установить значение True, чтобы сохранить изменения, и False, чтобы закрыть без сохранения.

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

    Макрос для сохранения всех книг, кроме новых несохраненных (блокнотов)

    В конце рабочего дня у меня обычно есть несколько книг, которые я хочу сохранить, и некоторые, которые я НЕ хочу сохранять. Я часто открываю новые рабочие книги, чтобы использовать файлы Excel для быстрых расчетов. Я называю это «чешуйками». Мне не обязательно сохранять их, но я могу сохранить все остальные открытые файлы.

    Файлы блокнота никогда не сохранялись, поэтому у них пока нет расширения. Они называются: Book1, Book2, Book2 и т. д. Обратите внимание, что на снимке экрана нет расширения файла (.xlsx, .xlsm).

    Поэтому мы можем добавить оператор If в наш макрос, чтобы увидеть, существует ли расширение файла. Если расширение файла существует, то мы сохраним файл. Если нет, то мы закроемся без сохранения.

    Как работает этот макрос?

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

    Функция Right используется для возврата 5 символов в конце имени файла. Если wb — это существующий файл, который уже был сохранен, то Right(wb.Name, 5) вернет «.xlsx» или «.xlsm».

    Функция Instr (страница справки MSDN) используется для поиска строки в строке. Он возвращает начальный номер символа строки. Таким образом, если Instr найдет «.xls» в «.xlsx» или «.xlsm», он вернет 1. В противном случае он вернет 0.

    Инструкция If проверяет, больше ли возвращаемое Instr значение, чем 0, и сохраняет изменения при закрытии книги. В противном случае изменения не сохраняются для книг, НЕ содержащих расширения.

    Макрос для сохранения и закрытия всей книги и автоматического присвоения имен файлам

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

    Следующий макрос сохранит и закроет ВСЕ файлы и автоматически присвоит имена новым файлам, которые не были сохранены. Он помещает все новые (блокнотные) файлы в указанную папку.

    Вы сможете вернуться к этой папке, когда у вас будет свободное время для перемещения и переименования файлов.

    Как работает этот макрос?

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

    Чтобы использовать этот макрос, вам нужно изменить переменную sPath на папку на вашем компьютере. Обязательно заканчивайте строку пути к файлу обратной косой чертой.

    Метод Workbooks.Close имеет еще один необязательный параметр (имя файла), который позволяет нам указать имя файла, в котором мы хотим сохранить файл, если файл еще НЕ был сохранен.

    Если мы не используем параметр «Имя файла», Excel предложит нам меню «Сохранить как» для каждого файла. Таким образом, указание имени файла обходит это окно и может сэкономить нам много времени.

    Значение параметра Filename объединяет строку полного пути к файлу. Он также изменяет текущую дату и время в конце имени файла с помощью функций «Формат» и «Сейчас». Функция Format в VBA аналогична функции TEXT в Excel и позволяет указать числовой формат. Функция Now возвращает текущую дату и время на компьютере пользователя.

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

    Бесплатный вебинар по началу работы с макросами и VBA

    Если вам интересно узнать больше о макросах, в настоящее время я провожу бесплатный веб-семинар под названием "7 шагов для начала работы с макросами и VBA". Он будет работать всю эту неделю, и регистрация абсолютно бесплатна.

    Во время вебинара я объясню, почему вам может понадобиться изучить VBA, и расскажу о многих основных концепциях кодирования, которые помогут вам начать работу. Я прыгаю в Excel и редактор VB и рассказываю, как написать и запустить наш первый макрос. Даже если вы уже некоторое время используете VBA, я уверен, что вы узнаете несколько новых советов.

    Каковы ваши советы по сохранению и закрытию файлов?

    Я надеюсь, что эти советы и макросы помогут вам закончить день немного быстрее. Есть ли у вас какие-либо другие советы по закрытию файлов. Пожалуйста, оставьте комментарий ниже с любыми предложениями или вопросами. Спасибо!

    Как быстро закрыть все открытые книги?

    Вы всегда можете работать с несколькими книгами Excel, а после рабочего дня вам нужно сразу закрыть все открытые окна книг. Обычно вы можете закрыть каждый файл отдельно, но это займет много времени и будет проблематичным, когда есть десятки открытых файлов Excel. Есть ли более простой способ немедленно закрыть их все?

    • Повторное использование всего: добавляйте наиболее часто используемые или сложные формулы, диаграммы и другие объекты в избранное и быстро используйте их повторно в будущем.
    • Более 20 текстовых функций: извлечение числа из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
    • Инструменты объединения: несколько книг и листов в одну; Объединение нескольких ячеек/строк/столбцов без потери данных; Объединить повторяющиеся строки и суммировать.
    • Инструменты разделения: разделение данных на несколько листов в зависимости от значения; Одна рабочая книга для нескольких файлов Excel, PDF или CSV; Один столбец в несколько столбцов.
    • Вставить, пропуская скрытые/отфильтрованные строки; Подсчет и сумма по цвету фона; Массовая рассылка персонализированных электронных писем нескольким получателям.
    • Суперфильтр: создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировка по неделям, дням, частоте и т. д.; Фильтр по полужирному шрифту, формулам, комментариям.
    • Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

    Потрясающе! Использование эффективных вкладок в Excel, таких как Chrome, Firefox и Safari!
    Сэкономьте 50 % своего времени и сократите количество кликов мышью каждый день!

    <р>1. Открыв все рабочие книги, удерживайте нажатой клавишу Shift на клавиатуре, а затем нажмите кнопку «Закрыть» в правом верхнем углу строки заголовка Excel, см. снимок экрана:

    <р>2. Затем появится окно с вопросом, хотите ли вы сохранить изменения в активной книге, см. снимок экрана:

    <р>3. Нажмите «Сохранить все», чтобы сохранить изменения во всех книгах и закрыть их все.

    Примечание. Этот метод применяется к Excel 2007, 2010 и 2013.

    <р>1. В Excel 2007 и 2010 есть команда «Выход», которая может помочь вам закрыть все открытые книги и выйти из окна Excel, нажмите «Файл»> «Выход», затем нажмите «Сохранить все» во всплывающем окне подсказки, чтобы сохранить все изменения и закрыть все окна Excel. Смотрите скриншоты:

    <р>2. Если у вас Excel 2013, команда «Выход» больше не остается там, поэтому вы можете использовать команду «Закрыть все окна» на панели задач, указать на значок Excel на панели задач и щелкнуть его правой кнопкой мыши, а затем нажать «Закрыть все окна». всплывающее меню, см. скриншот:

    Если на вашем компьютере установлена ​​вкладка Office, она поможет вам просматривать и редактировать несколько файлов в одном окне с вкладками. Чтобы узнать больше о вкладке Office и загрузить ее, нажмите здесь.

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

    Затем вы можете нажать кнопку «Закрыть» в правом верхнем углу строки заголовка Excel, и появится всплывающее окно с напоминанием о том, хотите ли вы закрыть все вкладки или только текущую вкладку, выберите нужный вариант, чтобы щелкнуть, см. скриншоты:

    Если нажать кнопку "Закрыть все вкладки", все открытые книги будут закрыты одновременно.

    Примечание. Вы также можете щелкнуть правой кнопкой мыши имя одной книги на панели вкладок и выбрать команду «Закрыть все» в контекстном меню, после чего все открытые книги будут закрыты, но Excel останется открытым.

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

    Способ 1. Ярлыки

    <р>1. На самом деле, с помощью ярлыков можно легко достичь этой цели. Вам просто нужно нажать и удерживать клавишу [Shift], одновременно нажимая кнопку закрытия в правом верхнем углу любого окна Excel.

    <р>2. Если вы внесли некоторые изменения в активные рабочие книги, появятся всплывающие окна подтверждения, в которых вам нужно будет выбрать, сохранять их или нет. Тогда все файлы Excel будут сразу же закрыты.

    Способ 2. Панель быстрого доступа

    <р>1. Второй способ — добавить команду Закрыть все на панель быстрого доступа. Нажмите на маленькую стрелку, выберите Дополнительные команды… в раскрывающемся меню.

    <р>2. Выберите Команды не на ленте в поле выбора в разделе Выбрать команды из.

    <р>3. Затем прокрутите вниз, чтобы найти Закрыть все и Добавить в список справа.

    <р>4. Нажмите ОК, чтобы применить его.

    <р>5. Теперь кнопка Закрыть все добавлена ​​на панель быстрого доступа. Вы можете щелкнуть ее, чтобы сразу закрыть все активные книги Excel.

    Подходящее чтение

    Вам также может понравиться

    Заявление об авторских правах. Любое копирование или использование любых публикаций на этом веб-сайте должно осуществляться с письменного разрешения или авторизации Myofficetricks.

    Читайте также: