Excel для Microsoft 365 Excel 2021 Excel 2019 Excel 2016 Excel 2013 Еще…Меньше
Если в книге Excel несколько листов, вам может потребоваться сохранить только один лист в виде отдельной книги. Для сохранения одного листа в Excel 2013 или Excel 2016 используйте перемещение или копирование.
Сохранение одного листа
-
Щелкните правой кнопкой мыши ярлычок листа.
-
Щелкните Переместить или скопировать.
-
Щелкните раскрывающееся меню Переместить выбранные листы в книгу. Выберите (новая книга).
-
Нажмите кнопку ОК. Откроется новая книга с перемещенным листом.
Примечание: При этом лист удалится из исходной книги. Если вы хотите сохранить лист в обеих книгах, в диалоговом окне Переместить или скопировать установите флажок Создать копию.
-
Щелкните Файл > Сохранить в новой книге.
Совет: Вы также можете сохранить книгу Excel, нажав клавиши CTRL+S.
Нужна дополнительная помощь?
Сохранение листов книги как отдельных файлов
Про сборку листов из нескольких книг в одну текущую я уже писал здесь. Теперь разберем решение обратной задачи: есть одна книга Excel, которую нужно «разобрать», т.е. сохранить каждый лист как отдельный файл для дальнейшего использования.
Примеров подобного из реальной жизни можно привести массу. Например, файл-отчет с листами-филиалами нужно разделить на отдельные книги по листам, чтобы передать затем данные в каждый филиал и т.д.
Если делать эту процедуру вручную, то придется для каждого листа выполнить немаленькую цепочку действий (выбрать лист, правой кнопкой по ярлычку листа, выбрать Копировать, указать отдельный предварительно созданный пустой файл и т.д.) Гораздо проще использовать короткий макрос, автоматизирующий эти действия.
Способ 1. Простое разделение
Нажмите сочетание Alt+F11 или выберите в меню Сервис — Макрос — Редактор Visual Basic (Tools — Macro — Visual Basic Editor), вставьте новый модуль через меню Insert — Module и скопируйте туда текст этого макроса:
Sub SplitSheets1() Dim s As Worksheet For Each s In ActiveWorkbook.Worksheets 'проходим по всем листам в активной книге s.Copy 'копируем каждый лист в новый файл Next End Sub
Если теперь выйти из редактора Visual Basic и вернуться в Excel, а затем запустить наш макрос (Alt+F8), то все листы из текущей книги будут разбиты по отдельным новым созданным книгам.
Способ 2. Разделение с сохранением
При необходимости, можно созданные книги сразу же сохранять под именами листов. Для этого макрос придется немного изменить, добавив команду сохранения в цикл:
Sub SplitSheets2() Dim s As Worksheet Dim wb as Workbook Set wb = ActiveWorkbook For Each s In wb.Worksheets 'проходим во всем листам активной книги s.Copy 'сохраняем лист как новый файл ActiveWorkbook.SaveAs wb.Path & "" & s.Name & ".xlsx" 'сохраняем файл Next End Sub
Этот макрос сохраняет новые книги-листы в ту же папку, где лежал исходный файл. При необходимости сохранения в другое место, замените wb.Path на свой путь в кавычках, например «D:Отчеты2012» и т.п.
Если нужно сохранять файлы не в стандартном формате книги Excel (xlsx), а в других (xls, xlsm, xlsb, txt и т.д.), то кроме очевидного изменения расширения на нужное, потребуется добавить еще и уточнение формата файла — параметр FileFormat:
ActiveWorkbook.SaveAs wb.Path & "" & s.Name & ".xlsb", FileFormat:=50
Для основных типов файлов значения параметра FileFormat следующие:
- XLSX = 51
- XLSM = 52
- XLSB = 50
- XLS = 56
- TXT = 42
Полный список всех вариантов можно посмотреть в справке MSDN.
Способ 3. Сохранение в новые книги только выделенных листов
Если вы хотите раскидать по файлам не все листы в вашей книге, а только некоторые, то макрос придется немного изменить. Выделите нужные вам листы в книге, удерживая на клавиатуре клавишу Ctrl или Shift и запустите приведенный ниже макрос:
Sub SplitSheets3() Dim AW As Window Set AW = ActiveWindow For Each s In AW.SelectedSheets Set TempWindow = AW.NewWindow 'создаем отдельное временное окно s.Copy 'копируем туда лист из выделенного диапазона TempWindow.Close 'закрываем временное окно Next End Sub
Создавать новое окно и копировать через него, а не напрямую, приходится потому, что Excel не умеет копировать группу листов, если среди них есть листы с умными таблицами. Копирование через новое окно позволяет такую проблему обойти.
Способ 4. Сохранение только выделенных листов в новый файл
Во всех описанных выше способах каждый лист сохранялся в свой отдельный файл. Если же вы хотите сохранить в отдельный новый файл сразу группу выделенных предварительно листов, то нам потребуется слегка видоизменить наш макрос:
Sub SplitSheets4() Dim CurW As Window Dim TempW As Window Set CurW = ActiveWindow Set TempW = ActiveWorkbook.NewWindow CurW.SelectedSheets.Copy TempW.Close End Sub
Способ 5. Сохранение листов как отдельных PDF-файлов
Этот способ чем-то похож на второй, но листы сохраняются не как отдельные книги Excel, а в формате PDF, что часто требуется, если никто не должен менять документ и увидеть ваши формулы. Обратите внимание, что:
- для этого используется уже другой метод (ExportAsFixedFormat а не Copy)
- листы выводятся в PDF с параметрами печати, настроенными на вкладке Разметка страницы (Page Layout)
- книга должна быть сохранена на момент экспорта
Нужный нам код будет выглядеть следующим образом:
Sub SplitSheets5() Dim s As Worksheet For Each s In ActiveWorkbook.Worksheets s.ExportAsFixedFormat Filename:=ThisWorkbook.Path & "" & s.Name & ".pdf", Type:=xlTypePDF Next End Sub
Способ 6. Готовый макрос из надстройки PLEX
Если лень или нет времени внедрять все вышеописанное, то можно воспользоваться готовым макросом из моей надстройки PLEX:
Ссылки по теме
- Сборка листов из нескольких книг в одну
- Что такое макросы, куда вставлять код на Visual Basic, как их использовать.
Сохранение листа
Смотрите также помощь) документов в одном PDF, однако мне второй и третий вашей книге, а созданный пустой файл в другую рабочуюкнопку Microsoft Office формата. Вы можете
Сохранение одного листа
-
. в других форматах,
-
или BMP можно открывать в разрывы строк и
-
VBA, а такжеФайлЕсли в книге ExcelПодскажите как можно в PDF проблем нет, необходимо сохранить НЕСКОЛЬКО
-
лист заполнен данными, только некоторые, то и т.д.) Гораздо книгу, то не
, а затем — сохранить ее вЧтобы сохранить файл в таких как файлыОбъекты Microsoft Excel, объекты приложении Excel 2010. другие символы будут листы макросов Microsoftвыберите команду несколько листов, вам Excel организовать сохранение
-
но… листов книги в то скопируйте данные макрос придется немного проще использовать короткий
ставьте галочку в кнопку формате предыдущих версий, другом месте, укажите
support.office.com
Сохранение книги в другом формате файла
PDF и XPS. правильно зарегистрированных программ, При сохранении и интерпретироваться правильно. Сохраняет Excel 4.0 (XLM).Сохранить как может потребоваться сохранить листа в отдельныйнеобходим единый файл, один файл PDF. с первого листа изменить. Выделите нужные макрос, автоматизирующий эти строкеПараметры Excel в формате текстового диск и расположение Обычно сохранение происходит поддерживающих OLE 2.0 открытии ODS-файлов может только активный лист.Шаблон (код)
. только один лист файл может кто содержаший 5 пулов А excel позволяет в новый документ, вам листы в действия.Создать копию. файла, а также в полях с в формате XLSX, (OwnerLink), а также быть потеряно форматирование.Текст (MS-DOS)XLTMВ разделе в виде отдельной знает скрипт который
по 10 документов. лишь сохранить каждый а там проделайте
книге, удерживая наНажмите сочетание(Create a copy).В категории в других форматах, именем папки и но формат файлов, Picture или другойPDFTXT
-
Формат файлов с поддержкойМеста
-
книги. Для сохранения можно назначить кнопке.Вот такая жевачка лист поотдельности, либо вышесказанное.
-
клавиатуре клавишу CtrlAlt+F11НажмитеСохранение таких как файлы путем к файлу. используемый по умолчанию формат презентации.PDFСохраняет книгу в виде макросов для шаблоноввыберите расположение, где одного листа в Очень надо! Плиз!
-
для мозгов)) всю книгу целиком.М х или Shift и
-
или выберите вОКв разделе PDF и XPS.Примите имя, предложенное в для сохранения, можноСвязанный объектPDF. Этот формат файла
текстового файла, разделенного Excel в приложениях нужно сохранить книгу. Excel 2013 илиОлег филатов[email protected]
-
Повторюсь, а мне: элегантнее есть - запустите приведенный ниже меню. Будет создана новая
Преобразование книги Excel 97—2003 в текущий формат файла
Сохранение книг Любой файл, который поле изменить. Если выGIF, JPG, DOC, XLS сохраняет форматирование документа знаками табуляции, — Excel 2007—2013. В
-
Например, выберите Excel 2016 используйте перемещение: Скрипт можно написать,: уточнаю: в итоге необходимо сохранить НЕСКОЛЬКО
-
макрос к примеру макрос:Сервис — Макрос -
Поддерживаемые Excel форматы файлов
книга и листв поле открывается в OfficeИмя файла часто пользуетесь командой
или BMP
и позволяет совместно |
для использования в |
этом формате можно |
OneDrive |
или копирование. |
только задача не нужен единый фай листов книги, но написать — встроеннымиSub SplitSheets3() Dim Редактор Visual Basic скопируется в неё.Сохранять файлы в следующем Excel 2007, можно, или введите новое |
Сохранить как |
OwnerLink, ObjectLink, Link, Picture |
использовать файлы. Формат операционной системе MS-DOS сохранять код макросов |
, чтобы сохранить файл |
Щелкните правой кнопкой мыши |
вполне ясна. На pdf не все. средствами того же AW As Window (Tools — Macro Если Вы решите формате |
сохранить в формате |
имя книги. |
, можно добавить ее или другой формат. |
PDF гарантирует, что |
— и гарантирует, |
VBA и листы в веб-хранилище, или ярлычок листа. листе кнопка, приanvgHugo Excel — а… |
Set AW = |
— Visual Basic |
переместить лист, товыберите тот формат книги Excel 2007.В списке на панель быстрогоОбъект-рисунок Office при просмотре файла что символы табуляции, макросов Excel 4.0 |
Компьютер |
Щелкните |
нажатии которой этот: Скачайте PDFCreator последних: Не пробовали коду |
не так это ActiveWindow For Each |
Editor) |
в исходной книге файла, который вы Excel 2007 поТип файла |
доступа. |
EMF |
на компьютере и разрывы строк и |
(XLM). |
, чтобы сохранить файл |
Переместить или скопировать лист сохраняется в |
версий. Содержит утилиту |
всместо activesheet дать |
и сложно - |
s In AW.SelectedSheets |
, вставьте новый модуль |
его больше не хотите использовать по умолчанию сохраняет файлывыберите один изВажно:Формат рисованного объекта Office при его печати другие символы будутКнига Excel 97—2003 в локальной папке, |
. |
отдельном файле? А |
для объединения pdf Array(«Лист1», «Лист2», «Лист3»)? на пару минут Set TempWindow = через меню |
будет. |
умолчанию. |
в формате XLSX, вариантов: При сохранении книги в или Picture (EMF) будет сохранен исходный интерпретироваться правильно. СохраняетXLS такой какЩелкните раскрывающееся меню с каким названием? |
в один. Поддерживает
Проверить не могу |
работы ))) |
AW.NewWindow ‘создаем отдельное |
Insert — ModuleВы также можете создать |
В пользовательском интерфейсе Microsoft |
но вы можетеЕсли книга была создана формате файла ExcelТекст |
формат и данные только активный лист. |
Формат двоичных файлов Excel |
ДокументыПереместить выбранные листы вУважаемая Ярослава, а ли автоматизацию (или — нет 2007.YJYNGK временное окно s.Copyи скопируйте туда копию листа в Office Fluent команду изменить формат, используемый в более ранней |
другой версии форматирование |
TXT |
файла нельзя будетТекст в кодировке Unicode 97 — Excel. книгу в хорошем OpenOffice другой способ неручнойYJYNGK: Уважаемые ребята, добрый ‘копируем туда лист текст этого макроса: |
той же рабочей |
Сохранить как |
для сохранения по версии Excel и и возможности, уникальныеОтображаемый текст, текст OEM легко изменить. ФорматTXT 2003 (BIFF8).В диалоговом окне. Выберите как это можно сшивки) — не |
: Hugo, добрый день! |
день! |
из выделенного диапазонаSub SplitSheets1() Dim книге. Такая необходимостьнельзя вывести на умолчанию. |
содержит макросы, которые |
для Excel 2007 и |
Веб-страница в одном файле PDF также удобноСохраняет книгу в видеШаблон Excel 97- ExcelСохранение документа(новая книга) сделать? ;-) знаю. Есть иК сожалению вВынужден обратиться за TempWindow.Close ‘закрываем временное s As Worksheet |
может возникнуть, если |
ленту в виде |
Если вы часто пользуетесь нужно в ней более поздних версий,MHT, MHTML применять для печати текста в кодировке 2003перейдите в нужное.Может в плохой другие утилиты для |
таком синтаксисе выпадает |
помощью, поиск полноценного |
окно Next End For Each s Вы хотите внести кнопки. Однако вы командой оставить, выберите будут потеряны. ДополнительныеВеб-страница в одном файле документов в типографии. Unicode, стандартной кодировкеXLT |
расположение. |
Нажмите кнопку |
программе Excel этот объединения pdf в |
в Debug … |
ответа на мой |
Sub In ActiveWorkbook.Worksheets ‘проходим |
изменения в лист, можете добавить ееСохранить какКнига Excel с поддержкой сведения см. в
(MHT или MHTML).
Документ XPS |
символов, разработанном Unicode |
Формат двоичных файлов Excel |
В списке |
ОК |
способ тоже сработает… один файл. Поищите.YJYNGK вопрос не дал.Создавать новое окно и по всем листам но при этом |
на панель быстрого |
, можно добавить ее |
макросов (*.xlsm) статье Использование Excel Этот формат файлаXPS Consortium. 97 — ExcelТип файла. Откроется новая книгаЛюди когда-то Windowsanvg: извините, поторопился отправитьПрошу помощи … копировать через него, в активной книге требуется сохранить первоначальный доступа. |
на панель быстрого |
. |
с более ранними объединяет встроенные рисунки,Этот формат файла сохраняетCSV (разделители — запятые) 2003 (BIFF8) длявыберите нужный формат. с перемещенным листом. запускали ТОЛЬКО для: Посмотрел сейчас код без кода …Есть книга из а не напрямую, s.Copy ‘копируем каждый вариант. Как былоНажмите |
доступа. |
Если вы хотите сохранить |
версиями Excel. приложения, связанные документы форматирование документа иCSV хранения шаблонов Excel. При необходимости используйтеПримечание: того, чтобы поработать формы для Excel,Sub Макрос2() которой необходимо средствами приходится потому, что |
лист в новый описано ранее в
кнопку Microsoft OfficeЛюбой файл, который открывается книгу как шаблон,Откройте в Excel книгу, и другие вспомогательные позволяет совместно использоватьСохраняет книгу в видеКнига Microsoft Excel 5.0/95 стрелки для прокрутки При этом лист удалится с Microsoft Office… прилагаемой в папкеSheets(Array(«Лист1», «Лист2», «Лист3»)).ExportAsFixedFormat VBA сохранить несколько Excel не умеет файл Next End этой статье, откройте
. |
в Excel 2007, |
выберите |
которую вы хотите |
элементы, на которые |
файлы. Формат XPS текстового файла, разделенногоXLS и выбора форматов из исходной книги. О, как…Впрочем, сейчас примеров PDFCreator - Type:=xlTypePDF, Filename:= _ листов (Лист1, Лист2, копировать группу листов, Sub |
диалоговое окно |
Щелкните правой кнопкой мыши |
можно сохранить вШаблон Excel (*.xltx) |
сохранить в формате, |
есть ссылки в |
гарантирует, что при знаками запятой, —Формат двоичных файлов Excel файлов, которые не Если вы хотите |
многие поступают точно |
можете легко его |
»D:Documents and Settingse.babchinskiyDesktopСохранить |
Лист3) в один |
если среди них |
Если теперь выйти из |
Переместить или скопировать элемент |
текущем формате книги |
. подходящем для использования документе. |
просмотре файла на |
для использования в |
5.0/95 (BIFF5). |
видны в списке. сохранить лист в |
так же… |
модифицировать, вставив вызов |
в пдф.pdf», Quality |
документ формата PDF. есть листы с |
редактора Visual Basic(Move or Copy).Сохранить как Excel (*.xlsx). ТакимЕсли книга была создана в другой программе. |
Веб-страница |
компьютере и при другой операционной системе |
Таблица XML 2003Примечание: |
обеих книгах, в |
Ну, примерно так: |
вашей процедуры, для _ |
На каждом из |
умными таблицами. Копирование |
и вернуться в |
По умолчанию в |
и выберите |
образом вы сможете в более раннейНа вкладкеHTM, HTML его печати будет Windows — иXML Список доступных форматов файлов диалоговом окне |
[ссылка заблокирована по |
печати в единый |
:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, этих листов есть через новое окно Excel, а затем выпадающем спискеДобавить на панель быстрого воспользоваться новыми возможностями версии Excel иФайл |
Формат HTML. сохранено исходное форматирование
гарантирует, что символыФормат файлов XML-таблиц 2003 зависит от типаПереместить или скопировать решению администрации проекта] pdf. _
«область печати» которая позволяет такую проблему запустить наш макросВ книгу доступа
-
Excel 2007, которые содержит макросы, которыевыберите командуПримечание:
-
и данные файла табуляции, разрывы строк (XMLSS). активного листа вустановите флажокСкрипт открывается в[email protected]OpenAfterPublish:=True меня и интересует. обойти.
(Alt+F8), то все |
(To book) выбрана |
. |
не поддерживаются в |
нужно в ней |
Сохранить как Если вы скопируете текст |
нельзя будет легко и другие символы |
Данные XML Data книге (лист, лист |
Создать копию редакторе VBA, например |
: у меня возникла |
End Sub |
Листы «XXXX» иВо всех описанных выше |
листы из текущей |
текущая книга – |
Иногда при работе с |
файлах других форматов, |
оставить, а вы |
. из другой программы, |
изменить. |
будут интерпретироваться правильно. |
XML диаграммы или другой). |
. нажатием сочетания клавиш необходимость сшить несколькоHugo «YYYYY» копироваться с способах каждый лист книги будут разбиты оставьте это без книгой Excel возникает например сможете увеличивать хотите сохранить ееЧтобы сохранить книгу в Microsoft Excel вставитФорматы файлов, использующие буфер Сохраняет только активныйФормат данных XML.Примите имя, предложенное вЩелкните Alt+F11. файлов pdf в
Сохранение книги Excel в файле другого формата
: А жаль. :( другими листами НЕ сохранялся в свой по отдельным новым изменения. В списке необходимость скопировать или размер ячеек. как шаблон, выберите другом месте, укажите этот текст в обмена лист.
-
Надстройка Microsoft Excel полеФайлСкрипт: один
-
antal10 должны. отдельный файл. Если созданным книгам.Перед листом
-
переместить лист вПримечание:Шаблон Excel с поддержкой диск и расположение формате HTML независимоЕсли вы скопировали данные
-
CSV (Макинтош)XLAMИмя файла>Private Sub CommandButton1_Click()
-
т.к. макрос изменяет: не правда. эксельДо сегодняшнего дня же вы хотитеПри необходимости, можно созданные
(Before sheet) выберите другую книгу или При сохранении книги, созданной
макросов (*.xltm) в полях с от формата исходного в буфер обменаCSVФормат файлов надстроек Excel, или введите новоеСохранить
On Error GoTo в нескольких листах также позволяет сохранить я сохранял нужные сохранить в отдельный книги сразу же лист, перед которым сделать копию листа
Сохранение файла другого формата в формате Excel 2007 и более поздних версий
в более ранней. именем папки и текста. в одном изСохраняет книгу в виде 2007—2013 на основе имя книги.в новой книге. errhand данные (готовит документы)
все листы в листы в отдельные новый файл сразу сохранять под именами хотите вставить скопированный в этой же версии Excel, вЕсли вы хотите сохранить путем к файлу.Форматы файлов, не поддерживаемые следующих форматов файлов, текстового файла, разделенного XML с поддержкойЕсли вы открыли книгу
-
Совет:Dim NewBook Asи все варианты
-
один PDF файл. файлы PDF (через группу выделенных предварительно листов. Для этого лист. Мы решили
-
книге. Например, Вы формате книги Excel книгу в текущемПримите имя, предложенное в в Excel 2013 вы можете вставить
-
знаками запятой, — макросов. Надстройка — Excel 97—2003, но Вы также можете сохранить Workbook
-
(по 5-10 листов) По крайней мере сохранить как), а листов, то нам
-
макрос придется немного вставить копию нашего хотите что-то изменить, 2007 некоторые возможности формате книги Excel, полеУказанные ниже форматы файлов их в Excel, для использования в
-
это программа, обеспечивающая вам не нужно книгу Excel, нажавSet NewBook = сохраняет в pdf
-
у меня все затем их объединял потребуется слегка видоизменить изменить, добавив команду листа в самый но при этом и часть форматирования выберитеИмя файла больше не поддерживаются, используя команду
-
операционной системе Макинтош возможность выполнения дополнительного хранить ее в клавиши CTRL+S. Workbooks.Addа в итоге
-
листы в один в один файл наш макрос: сохранения в цикл: конец книги после сохранить первоначальные листы.
-
-
могут быть потеряны.Книга Excel (*.xlsx), или введите новое
Изменение формата файлов, используемого для сохранения по умолчанию
поэтому вы неВставка — и гарантирует, кода. Позволяет использовать
-
этом формате файла,Примечание:Application.DisplayAlerts = False нужно получить один файл сохраняет.
-
программой «Адоб Акробат».Sub SplitSheets4() DimSub SplitSheets2() Dim всех существующих листов.Для начала мы покажемОткройте книгу, которую вы. имя книги. сможете открыть файлыили что символы табуляции,
Добавление команды «Сохранить как» на панель быстрого доступа
проекты VBA и просто преобразуйте книгуМы стараемся какDo While NewBook.Worksheets.Count файл.При экспорте вВозможно ли реализовать CurW As Window
-
s As Worksheet Отметьте галочкой параметр Вам, как скопировать хотите сохранить вЕсли вы хотите сохранить
-
В раскрывающемся списке этих форматов илиСпециальная вставка разрывы строк и листы макросов Excel
-
в текущий формат можно оперативнее обеспечивать > 1
-
решил так: PDF т.е. (Сохранить мой замысел ??
Dim TempW As Dim wb asСоздать копию лист из одной формате книги Excel книгу в новомТип файла сохранять файлы в( другие символы будут 4.0 (XLM). файла (XLSX). вас актуальными справочнымиNewBook.Worksheets(1).Deleteскачал программу pdftk как Adobe PDF) Если да, то Window Set CurW Workbook Set wb(Create a copy) рабочей книги в 2007. двоичном формате файла,
выберите формат, подходящий этих форматах.Главная интерпретироваться правильно. СохраняетНадстройка Excel 97—2003В меню
Сохранение файла в формате Excel 2007
материалами на вашемLoop (гуглится просто) выскакивает окно с прошу помочь мне = ActiveWindow Set = ActiveWorkbook For и нажмите другую существующую илиНажмите кнопку выберите для использования в
Для работы с данными> только активный лист.XLAФайл языке. Эта страницаApplication.DisplayAlerts = True1. все pdf-ки
-
выбором листов и с этим !! TempW = ActiveWorkbook.NewWindow Each s In
-
ОК вновь созданную книгу Microsoft OfficeДвоичная книга Excel (*.xlsb) другой программе.
-
книги в программе,Буфер обменаCSV (MS-DOS)Надстройка Excel 97-2003, дополнительнаявыберите команду
-
переведена автоматически, поэтомуNewBook.Worksheets(1).Name = «Ваш макрос ложит в все сохраняет в
-
shanemac CurW.SelectedSheets.Copy TempW.Close End wb.Worksheets ‘проходим во. Excel. Кликните правойи выберите команду.
-
Для прокрутки списка и которая больше не>
-
CSV программа, предназначенная дляСведения ее текст может заказ» папку с pdftk один файл. При: слить три листа Sub
-
всем листам активнойЛист будет вставлен и кнопкой мыши поСохранить как
-
Нажмите кнопку отображения большего числа поддерживается, попробуйте выполнитьВставка
-
Сохраняет книгу в виде выполнения дополнительного кода.. содержать неточности и
-
-
Range(Cells(1, 1), Cells(Range(«A1»).EntireColumn.Rows.Count, (путь к ней печати в Pdf
Изменение формата файлов, используемого для сохранения по умолчанию
в один —рабочий,Этот способ чем-то книги s.Copy ‘сохраняем его ярлычок появится
-
ярлычку листа, который. Сохранить форматов используйте стрелки. указанные ниже действия.).
-
текстового файла, разделенного Поддерживает использование проектовНажмите кнопку грамматические ошибки. Для Range(«A1»).EntireRow.Columns.Count)).Copy NewBook.Worksheets(1).Range(«A1») C:pdftkpdftk.exe) тоже есть выбор, добавив заголовки м похож на второй, лист как новый справа от ярлычков
Добавление команды «Сохранить как» на панель быстрого доступа
хотите скопировать, иПримите имя, предложенное в.Примечание:Найти в Интернете компанию,Формат знаками запятой, — VBA.Преобразовать
-
нас важно, чтобыfName = Application.GetSaveAsFilename(«Ваш 2. запускаю ее
-
и тоже печатает видимо —шапки но листы сохраняются файл ActiveWorkbook.SaveAs wb.Path существующих листов. в контекстном меню поле
support.office.com
Как в Excel скопировать или переместить лист в другую книгу
Вы можете изменить тип В зависимости от типа выпускающую конвертеры файловРасширение для использования вКнига Excel 4.0. эта статья была заказ от « bat-файл со скриптом: в один PDF
его уже распечатывать не как отдельные & «» &Таким образом очень удобно выберитеИмя файла файла, используемого по активного листа (лист для форматов, неИдентификаторы типа буфера обмена операционной системе MS-DOSXLWВ Excel 2013 вы вам полезна. Просим
& Date & pdftk *.pdf cat файл.antal10 книги Excel, а s.Name & «.xlsx» изменять порядок листовПереместить или скопировать, или введите новое
умолчанию при сохранении книги, лист диаграммы поддерживаемых Excel.Рисунок — и гарантирует,Формат файла Excel 4.0, можете открывать и вас уделить пару «.xls», «Книга Microsoft output 9999.pdf
Если у вас: А в чем в формате PDF, ‘сохраняем файл Next и структуру рабочих(Move or Copy). имя книги. книги. или другие типыСохраните книгу в другомWMF или EMF что символы табуляции, в котором сохраняются сохранять файлы проектов секунд и сообщить, Office Excel (*.xls),все .pdf сшиваются нет виртуального принтера, собственно проблема, что что часто требуется, End Sub
книг. Это можетВ диалоговом окнеВ спискеНа вкладке листов) будут доступны формате файла, которыйРисунки в формате Windows разрывы строк и только обычные листы,
в перечисленных ниже помогла ли она *.xls») в один 9999.pdf то можно просто в конечном итоге если никто неЭтот макрос сохраняет новые пригодиться и вПереместить или скопировать
Тип файлаФайл разные форматы файлов можно открыт в Metafile (WMF) или другие символы будут листы диаграмм и форматах. вам, с помощьюIf fName <>3. далее макрос сохранить как и вам нужно непонятно. должен менять документ книги-листы в ту том случае, если(Move or Copy)выберите один извыберите пункт для сохранения. другой программе. Например Windows Enhanced Metafile интерпретироваться правильно. Сохраняет макросов. В приложенииФорматы файлов Excel кнопок внизу страницы. False Then копирует итоговый pdf выбрать формат PDF Чем вас печать и увидеть ваши же папку, где Вам нужно отправить в выпадающем списке вариантов:ПараметрыСовет:
сохраните книгу в (EMF). только активный лист. Excel 2013 можно
Формат Для удобства такжеNewBook.SaveAs Filename:=fName куда мне надо при этом в на виртуальный принтер формулы. Обратите внимание, лежал исходный файл. кому-то не целуюВ книгуЕсли книга была создана
. Дополнительные сведения о сохранении
электронную таблицу XML
Примечание:
DIF
office-guru.ru
Сохранение листов книги как отдельных файлов
открыть книгу вРасширение приводим ссылку наEnd If4. и очищает окне сохранения файла AdobePDF не устраивает? что: При необходимости сохранения рабочую книгу, а(To book) выберите в более ранней
В категории книги в файл или текстовый формат Если вы скопируете метафайлDIF этом формате, ноОписание оригинал (на английскомExit Sub
папку от уже зайти в параметры Зачем сохранять вдля этого используется уже в другое место, один конкретный лист рабочую книгу, в версии Excel иСохранение формата PDF или файла, который может Windows (WMF) изФормат обмена данными. Сохраняет сохранить в нем
Способ 1. Простое разделение
Книга Excel языке) .errhand: ненужных pdf и выбрать листы. отдельные файлы, если другой метод (ExportAsFixedFormat замените wb.Path на этой книги. которую нужно скопировать содержит макросы, которыев разделе XPS см. в поддерживаться в другой
другой программы, Microsoft только активный лист. файл Excel нельзя.XLSXВ большинстве случаев выMsgBox Err.Description1. ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF,Или еще проще, в итоге потом а не Copy)
свой путь вУрок подготовлен для Вас лист. нужно в нейСохранение книг статье Сохранение в программе. Excel вставит рисунокSYLKФорматы текстовых файлов
Способ 2. Разделение с сохранением
Стандартный формат файлов Excel наверняка будете сохранятьResume Next Filename:=»C:pdftk» & m выделить сразу все сливаете в один.листы выводятся в PDF
кавычках, например «D:Отчеты2012″ командой сайта office-guru.ruЗамечание: оставить, выберите форматв поле формате PDF илиФормат в виде расширенногоSLKФормат 2007—2013, основанный на свои книги вEnd Sub & «.pdf», Quality:=xlQualityStandard, листы, которые нужно
Нужно средствами VBA с параметрами печати, и т.п.Источник: http://www.howtogeek.com/220677/how-to-copy-or-move-a-worksheet-into-another-workbook-in-excel/Чтобы скопировать выбранный XLSM.Сохранять файлы в следующем XPS.Расширение метафайла (EMF).
Формат Symbolic Link. СохраняетсяРасширение языке XML. В текущем формате файлЯрослава емельянова ^^ IncludeDocProperties _ сохранить т.е. ярлычки ну так и настроенными на вкладкеЕсли нужно сохранять файлыПеревел: Антон Андронов лист в существующуюЕсли вы хотите сохранить формате
Любой файл, который открываетсяИдентификаторы типа буфера обменаТочечный рисунок
только активный лист.Описание этом формате нельзя (XLSX). Но иногда
- : Excel — плохая
- :=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
- листов с клавишей
- включите макрорекордер и
- Разметка страницы (Page
не в стандартномАвтор: Антон Андронов рабочую книгу, эта
Способ 3. Сохранение в новые книги только выделенных листов
книгу как шаблон,выберите тот формат в Excel 2007 иДиаграмма ExcelBMPПримечание:Форматированный текст (разделители — сохранять код макросов может потребоваться сохранить программа. Лучше переходить2. Shell «cmd Shift и сохранить запишите все действия.
Layout) формате книги ExcelПро сборку листов из книга должна быть выберите формат XLTX. файла, который вы более поздних версий,XLCРисунки, сохраненные в растровом Если вы сохраните книгу пробелы) Microsoft Visual Basic книгу в другом
на OpenOffice. Который, /c cd C:pdftk как и выбрать Или я простокнига должна быть сохранена (xlsx), а в нескольких книг в открыта. Если нужнаяЕсли книга была создана хотите использовать по можно сохранить вФорматы файлов Excel 2.0,
Способ 4. Сохранение только выделенных листов в новый файл
формате (BMP). в любом текстовомPRN для приложений (VBA) формате, например для кстати, бесплатен. & C:pdftk000.bat», vbNormalFocus PDF. не понял что на момент экспорта других (xls, xlsm,
одну текущую я книга не открыта, в более ранней умолчанию. текущем формате книги 3.0 и 2.xФорматы файлов Microsoft Excel формате, будут потеряны
Способ 5. Сохранение листов как отдельных PDF-файлов
Формат для Lotus, с и листы макросов более ранней версииMarish_ka ‘запуск batHugo нужно.Нужный нам код будет xlsb, txt и уже писал здесь. то её не версии Excel и
- Команду Excel (XSLX). ТакимWK1, FMT, WK2, WK3,
- XLS все элементы форматирования. разделителями — пробелами. Microsoft Office Excel Excel, в текстовый
- : Файл-сохранить как. ВыбираешьApplication.Wait Now() +
: Проверил на 2007.YJYNGK
выглядеть следующим образом: т.д.), то кроме Теперь разберем решение будет в выпадающем содержит макросы, которыеСохранить как образом вы сможете FM3, WK4
Способ 6. Готовый макрос из надстройки PLEX
Двоичные форматы файлов дляДругие форматы файлов Сохраняет только активный 4.0 (XLM). файл или в папку, даёшь имя
planetaexcel.ru
Как сохранить лист из экселя отдельным документом?
TimeSerial(0, 0, 10)’задержкаТот редкий (да: Дело в том,
Sub SplitSheets5() Dim очевидного изменения расширения обратной задачи: есть списке. нужно в нейнельзя вывести на воспользоваться новыми возможностями,.WK1, .WK2, .WK3, .WK4,
Excel версий 5.0/95Формат листКнига Strict Open XML файл PDF или файлу и сохраняешь. — ждем вып-я что там, единственный)
что печатать на s As Worksheet на нужное, потребуется одна книга Excel,Мы собираемся скопировать выбранный оставить, а вы ленту в виде которые не поддерживаются .WKS (BIFF5), Excel 97—2003
Сохранить определенные листы в один документ в формате PDF
РасширениеТекст (разделители — знакиXLSX
XPS. Просто помните, Или надо другое pdftk случай, когда пока
виртуальный принтер AdobePDF
For Each s добавить еще и которую нужно «разобрать», лист в новую хотите сохранить ее кнопки. Однако вы в файлах другихФорматы файлов Lotus 1-2-3 (BIFF8) и приложенияОписание
табуляции)Версия ISO Strict формата что всякий раз, расширение?
3. FileCopy «C:pdftk9999.pdf», не получилось обойтись можно только с In ActiveWorkbook.Worksheets s.ExportAsFixedFormat уточнение формата файла т.е. сохранить каждый рабочую книгу, поэтому как шаблон, выберите
можете добавить ее форматов. (все версии) Excel 2013 (BIFF12).DBF 3, DBF 4
TXT файла книги Excel когда вы сохраняетеLbvf atljh «C:UsersSERGEDesktopМОЭСКне_наши» & R
без Select
того компьютера, на Filename:=ThisWorkbook.Path & «» — параметр лист как отдельный в выпадающем списке формат XLTM. на панель быстрогоПримечание:Microsoft WorksSYLK.DBFСохраняет книгу в виде (XLSX). книгу в другом: Делается это просто. & «» &Sub Макрос3() котором установлен этот & s.Name &
FileFormat файл для дальнейшегоВ книгуЕсли вы хотите сохранить доступа. При сохранении книги, созданной.WKSSLKdBase III и IV. текстового файла, разделенногоЛист Excel (код) формате файла, часть Экселевский файл организован R & «.pdf»Sheets(Array(«Лист1», «Лист2», «Лист3»)).Select виртуальный принтер. Мне «.pdf», Type:=xlTypePDF Next
: использования.(To book) выбираем книгу в текущемЩелкните стрелку раскрывающегося списка в более раннейФормат файлов Microsoft WorksФормат Symbolic Link.
Файлы этого формата знаками табуляции, —XLSM его форматирования, данных как книга, открываете4. Kill («C:pdftk*.pdf»)ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= приходится работать на End SubActiveWorkbook.SaveAs wb.Path &
Примеров подобного из реальной вариант формате книги Excel, на панели быстрого
версии Excel, в (все версии)DIF можно открывать в
для использования вФормат Excel 2007–2013 на
и функций не его. Выделяете название
- все способы _ нескольких компьютерах (на
Если лень или нет «» & s.Name жизни можно привести
Новая книга
выберите формат XLSX. доступа и выберите
формате книги Excel 2007DBF 2DIF
Microsoft Excel, но другой операционной системе
основе XML с
может быть сохранены.
листа (внизу окна) решения нашел на
»C:Temppost_323419.pdf», Quality:=xlQualityStandard, IncludeDocProperties работе, дома и времени внедрять все & «.xlsb», FileFormat:=50 массу. Например, файл-отчет(New book). СтавимЕсли вы хотите сохранитьДругие команды и более поздних
.DBFФормат обмена данными. сохранять файлы Microsoft Microsoft Windows — поддержкой макросов. ВБолее новые версии , который хотите этом сайте и _ др местах), а вышеописанное, то можноДля основных типов файлов
с листами-филиалами нужно галочку в строке книгу в новом. версий некоторые возможностиФормат файла DBASE IIТекст (разделители — знаки Excel в формате и гарантирует, что
этом формате можно Office 2010 Office 2007 перенести в другую изменил под себя:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False информация находится на воспользоваться готовым макросом значения параметра
разделить на отдельныеСоздать копию
двоичном формате файла,Убедитесь, что в поле и часть форматированияWQ1 табуляции)
dBase нельзя.
символы табуляции, разрывы
сохранять код макросов
книгу. Кликаете правую- сколько ни
End Sub
флешке. На всех
из моей надстройкиFileFormat книги по листам,
(Create a copy). выберите формат XLSB.
Выбрать команды из могут быть потеряны..WQ1
TXTТаблица OpenDocument строк и другие VBA и листы
Список форматов (также называемые кнопку мыши удерживая искал работающих процедурНо наверняка как-то
компах установить виртуальный PLEX:следующие:
чтобы передать затем Поскольку мы создаём
Дополнительные сведения о форматахвыбраны Сведения о неподдерживаемыхФормат файла Quattro Pro
Текстовый формат со знакамиODS символы будут интерпретироваться макросов Excel 4.0 типы файлов) вы курсор на названии запуска exe не и тут можно принтере — этоЗайкинаXLSX = 51 данные в каждый
новую книгу, то файлов см. вЧасто используемые команды функциях Excel 97–2003 см. для MS-DOS табуляции в качествеТаблица OpenDocument. Файлы приложения правильно. Сохраняет только (XLM). можете (и не
листа, выбираете меню нашел, да и иначе написать… ни к чему.: выделить нужное и
XLSM = 52 филиал и т.д. в списке
статье Поддерживаемые Excel. в статье Использование
WB1, WB3 разделителей. Excel 2010 можно
активный лист.
Двоичная книга Excel может открывать или
перенести-скопировать, в новом с запуском bat[email protected]Сохраняю я в выбрать «Сохранить как»
XLSB = 50Если делать эту процедуруПеред листом форматы файлов.
Найдите в списке кнопку Excel с более
WB1, WB3CSV (разделители — запятые) сохранять в формате,
Текст (Макинтош)XLSB сохранять в Excel
меню выбираете ту тоже были проблемы:: продолжение: отдельные файлы потому
Asd asd
XLS = 56 вручную, то придется(Before sheet) неНажмите кнопку
Сохранить как ранними версиями Excel.Quattro Pro 5.0 иCSV
который позволяет открыватьTXTФормат двоичных файлов (BIFF12) 2013-файла, который отображается
книгу, куда хотите
bat работает толькопроцедура 5 раз как сохранить иным: Нажмите ПКМ по
TXT = 42 для каждого листа будет других листов.Сохранитьи выберите ее.Откройте файл, который вы 7.0 для Windows.Формат с разделителями-запятыми их в редакторахСохраняет книгу в виде
для Excel 2007—2013. форматы файлов, которые скопировать или перенести если в пути-имени меняет в листе1
planetaexcel.ru
Подскажите как можно в Excel организовать сохранение листа в отдельный файл?
образом лист excel второму и третьемуПолный список всех выполнить немаленькую цепочку Этот лист в.Нажмите кнопку
хотите сохранить вКнигу Excel 2007 и болееФорматированный текст (разделители — электронных таблиц, поддерживающих текстового файла, разделенногоШаблон поддерживаются в Excel лист из предыдущей файлов нет пробелов
данные в формат PDF листу, а затем вариантов можно посмотреть
действий (выбрать лист, новой рабочей книгеВы можете изменить тип
Добавить формате текущей версии. поздних версий можно пробелы) формат таблиц OpenDocument, знаками табуляции, —XLTX
в конце этой книги. Если хотите и русских букв
и по ним не представляю возможным. нажмите удалить. Тогда в справке MSDN.
правой кнопкой по
будет единственным.
файла, используемого по.
На вкладке сохранить в формате
RTF таких как Google
для использования в
Стандартный формат файлов Excel статьи.
только копировать -
всем удачи, ну
формируется (формулами) 10
Если можно иначе, получится, что Ваш
Если вы хотите раскидать ярлычку листа, выбрать
Замечание: умолчанию при сохраненииКнигу Microsoft Office ExcelФайл предыдущих версий Excel,RTF. Только из Excel.
Docs или OpenOffice.org операционной системе Макинтош
2007—2013 для шаблонов
Откройте книгу, которую вы
поставьте галочку в
и конечно всем
документов на 10
то подскажите как.
документ состоит из
по файлам неКопироватьЕсли Вы хотите книги. 2007 можно сохранить
выберите команду в файле текстовогоВнедренный объект Calc. Таблицы в — и гарантирует, Excel. Не позволяет
хотите сохранить. боксе -копировать, в гуру этого сайта листах.Макрорекодер я использовал одного листа. все листы в, указать отдельный предварительно переместить выбранный листНажмите в файле другогоСохранить как формата, а такжеGIF, JPG, DOC, XLS формате ODS также что символы табуляции, сохранять код макросовНа вкладке этом же меню отельное спасибо заСохранить эти 10 при сохранении в
В случае если
Содержание:
- Разделить каждый лист на отдельный файл Excel
- Разделить каждый рабочий лист и сохранить как отдельные PDF-файлы
- Разделите только те рабочие листы, которые содержат слово / фразу, в отдельные файлы Excel
Если у вас есть книга Excel с большим количеством листов, нет простого способа разделить каждый из этих листов на отдельные файлы Excel и сохранить отдельно.
Это может потребоваться, когда вы составляете листы за разные месяцы или регионы, продукты / клиенты и хотите быстро получить отдельную книгу для каждого листа (в виде файла Excel или PDF).
Хотя существует способ вручную разделить листы на отдельные книги, а затем сохранить их, он неэффективен и подвержен ошибкам.
В этом руководстве я дам вам простой код VBA, который вы можете использовать, чтобы быстро (за несколько секунд) разделить все рабочие листы на отдельные файлы, а затем сохранить их в любой указанной папке.
Разделить каждый лист на отдельный файл Excel
Предположим, у вас есть рабочая тетрадь, как показано ниже, где у вас есть лист на каждый месяц.
Чтобы разделить эти листы в отдельный файл Excel, вы можете использовать приведенный ниже код VBA:'Код, созданный Sumit Bansal из trumpexcel.com Sub SplitEachWorksheet () Dim FPath As String FPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each ws In ThisWorkbook.Sheets ws.Copy Application.ActiveWorkbook.SaveAs Имя файла: = FPath & "" & ws.Name & ".xlsx" Application.ActiveWorkbook.Close False Next Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub
Перед использованием приведенного выше кода VBA необходимо убедиться в нескольких вещах:
- Создайте папку, в которой вы хотите получить все полученные файлы.
- Сохраните основной файл Excel (в котором есть все нужные вам рабочие листы в виде отдельных файлов) в этой папке.
Как только вы это сделаете, вы можете поместить указанный выше код VBA в файл и запустить его.
Приведенный выше код написан таким образом, что он выбирает местоположение папки, используя путь к файлу (в котором выполняется код). Вот почему важно сначала сохранить файл в папке, а затем использовать этот код.
Как работает код VBA — В приведенном выше коде используется простой цикл For Next, который проходит через каждый рабочий лист, создает копию рабочего листа в книге Excel, а затем сохраняет эту книгу Excel в указанной папке (которая совпадает с основным файлом со всеми листов).
Ниже приведены шаги по размещению этого кода VBA в книге Excel (они будут такими же для всех других методов, показанных в этом руководстве):
Куда поставить этот код?
Ниже приведены шаги по размещению кода в редакторе Visual Basic, где он может быть выполнен:
Вышеупомянутые шаги мгновенно разделят рабочие листы на отдельные файлы Excel и сохранят их. Если у вас меньше листов, это займет всего секунду. Если у вас много, это может занять некоторое время.
Имя каждого сохраненного файла совпадает с именем листа в основном файле.
Поскольку вы поместили код VBA в книгу Excel, вам необходимо сохранить его в формате .XLSM (который является форматом с поддержкой макросов). Это гарантирует, что макрос будет сохранен и будет работать, когда вы откроете этот файл в следующий раз.
Обратите внимание, что я использовал строки Application.ScreenUpdating = False и Application.DisplayAlerts = False в коде, чтобы все происходило в серверной части и не видеть, что происходит на вашем экране. Как только код запускается, разделяет листы и сохраняет их, мы возвращаем им значение ИСТИНА.
Рекомендуется создать резервную копию основного файла (в котором есть листы, которые вы хотите разделить). Это гарантирует, что вы не потеряете свои данные в случае, если что-то пойдет не так, или если Excel решит замедлить работу или дать сбой.
Разделить каждый рабочий лист и сохранить как отдельные PDF-файлы
Если вы хотите разделить листы и сохранить их как файлы PDF вместо файлов Excel, вы можете использовать следующий код:'Код, созданный Sumit Bansal из trumpexcel.com Sub SplitEachWorksheet () Dim FPath As String FPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each ws In ThisWorkbook.Sheets ws.Copy Application.ActiveSheet.ExportAsport Введите: = xlTypePDF, Имя файла: = FPath & "" & ws.Name & ".xlsx" Application.ActiveWorkbook.Close False Next Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub
Перед использованием этого кода необходимо убедиться в следующем:
- Создайте папку, в которой вы хотите получить все полученные файлы.
- Сохраните основной файл Excel (в котором есть все нужные вам рабочие листы в виде отдельных файлов) в этой папке.
Приведенный выше код разделяет каждый лист в файле Excel и сохраняет его в формате PDF в той же папке, где вы сохранили основной файл Excel.
Разделите только те рабочие листы, которые содержат слово / фразу, в отдельные файлы Excel
Если у вас много листов в книге, и вы хотите разделить только те листы, в которых есть определенный текст, вы также можете это сделать.
Например, предположим, что у вас есть файл Excel, содержащий данные за несколько лет, и каждый лист в файле имеет номер года в качестве префикса. Что-то вроде того, что показано ниже:
Теперь предположим, что вы хотите разделить все листы на период с 21 по 2022 год и сохранить их в виде отдельных файлов Excel. Для этого вам нужно как-то проверить имя каждого рабочего листа, и только те листы, которые имеют номер 2021-2022, должны быть разделены и сохранены, а остальные должны быть оставлены нетронутыми.
Это можно сделать с помощью следующего макроса VBA:'Код, созданный Sumit Bansal из trumpexcel.com Sub SplitEachWorksheet () Dim FPath As String Dim TexttoFind As String TexttoFind = "2020" FPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each ws In ThisWorkbook. Таблицы Если InStr (1, ws.Name, TexttoFind, vbBinaryCompare) 0 Тогда ws.Copy Application.ActiveWorkbook.SaveAs Имя файла: = FPath & "" & ws.Name & ".xlsx" Application.ActiveWorkbook.Close False End If Next Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub
В приведенном выше коде я использовал переменную TexttoFind, которой изначально было присвоено значение «2020».
Затем код VBA использует цикл For Next в VBA для просмотра каждого рабочего листа, а затем проверяет имя каждой функции INSTR рабочего листа. Эта функция проверяет, есть ли в имени листа слово 2021-2022 или нет. Если это так, он вернет номер позиции, в которой он нашел этот текст (в данном случае это 2021-2022 годы).
И если он не находит искомый текст, он возвращает 0.
Это используется с условием IF Then. Поэтому, если имя листа содержит текстовую строку 2021-2022, оно будет разделено и сохранено как отдельный файл. И если у него нет этой текстовой строки, условие IF не будет выполнено, и ничего не произойдет.
В этой заметке поговорим о том, как переместить или скопировать лист рабочей книги Excel в другую книгу, а также о том как сохранить все листы книги отдельными файлами. Для чего это нужно? Да мало ли для чего! Кто-то отправляет файлы почтой и не хочет отсылать лишнюю информацию, содержащуюся на других листах своей рабочей книги. Кто-то собирает информацию у нескольких пользователей и для этого разделяет книгу на листы, раздает шаблоны для заполнения, а затем собирает все листы обратно в книгу, можно долго фантазировать, давайте перейдем к делу.
Традиционно предложу два способа позволяющих перемещать листы в отдельные файлы Excel.
Первый — стандартными средставми приложения Excel. Кликаем правой кнопкой мышки в области наименований листов и выбираем пункт меню «Переместить/скопировать…»
В поле «Переместить выбранные листы в книгу» выбираем либо «(новая книга)», либо выбираем название файла, в который собираемся перемещать лист (этот файл должен быть предварительно открыт). Жмем «Ок» — лист перемещается. Да, если отметить галочкой опцию «Создать копию», то вместо перемещения листа произойдет его копирование, а также можно будет указать место для вставки листа.
Как сохранить листы отдельными файлами при помощи надстройки?
Второй способ перемещения листов в отдельные книги — прибегнуть к помощи макроса (надстройки). Если специфика Вашей деятельности связана с тем, что Вам приходится часто расшивать рабочие книги на отдельные листы, то есть выделять листы из книги и создавать из этих листов отдельные файлы, то полезным было бы иметь такую надстройку в арсенале своих инструментов. Макрос начинает работать после нажатия кнопки, расположенной на панели инструментов и вызывает диалоговое окно, в котором пользователь имеет возможность задать папку, в которую будут сохранены раскрепленные листы, а также выбрать ряд других опций.
Использование надстройки позволяет:
1. Вызывать диалоговое окно надстройки одним кликом мыши прямо из вкладки на ленте;
2. выбирать папку, в которую будут сохраняться рабочие книги;
3. при делении рабочей книги на отдельные файлы назвать новые файлы именами листов;
4. при сохранении листов отдельными файлами назвать их составными именами, состоящими из имени исходной рабочей книги и имени листа;
5. создавать уникальные имена файлов, добавляя текущую дату и время к именам файлов;
6. выбирать наиболее подходящее расширение (тип) для новых рабочих книг.
макрос (надстройка) для сохранения листов отдельными файлами
Разделенные листы можно снова объединить в одну общую рабочую книгу при помощи надстройки для объединения листов. При необходимости, можно ознакомиться с пошаговой инструкцией по установке надстроек в приложении Excel различных версий.