Сохранение листов книги как отдельных файлов
Про сборку листов из нескольких книг в одну текущую я уже писал здесь. Теперь разберем решение обратной задачи: есть одна книга 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 для Microsoft 365 Excel 2021 Excel 2019 Excel 2016 Excel 2013 Еще…Меньше
Если в книге Excel несколько листов, вам может потребоваться сохранить только один лист в виде отдельной книги. Для сохранения одного листа в Excel 2013 или Excel 2016 используйте перемещение или копирование.
Сохранение одного листа
-
Щелкните правой кнопкой мыши ярлычок листа.
-
Щелкните Переместить или скопировать.
-
Щелкните раскрывающееся меню Переместить выбранные листы в книгу. Выберите (новая книга).
-
Нажмите кнопку ОК. Откроется новая книга с перемещенным листом.
Примечание: При этом лист удалится из исходной книги. Если вы хотите сохранить лист в обеих книгах, в диалоговом окне Переместить или скопировать установите флажок Создать копию.
-
Щелкните Файл > Сохранить в новой книге.
Совет: Вы также можете сохранить книгу Excel, нажав клавиши CTRL+S.
Нужна дополнительная помощь?
При работе в Microsoft Excel вам может потребоваться открыть несколько документов или один и тот же файл в нескольких окнах. В более ранних версиях и в версиях, начиная с Excel 2013, это не проблема. Мы просто открываем файлы стандартным способом, и каждый из них запускается в новом окне. Но в версиях приложения 2007–2010 новый документ по умолчанию открывается в главном окне. Такой подход экономит ресурсы компьютерной системы, но в то же время создает ряд недостатков. Например, если пользователь хочет сравнить два документа в параллельных окнах на экране, он не сможет сделать это со стандартными настройками. Давайте рассмотрим, как это можно сделать всеми доступными способами.
Открытие нескольких окон
Если в версиях Excel 2007–2010 у вас уже открыт документ, но вы пытаетесь запустить другой файл, он откроется в том же родительском окне, просто заменив содержимое исходного документа данными нового. Всегда будет возможность перейти к первому запущенному файлу. Для этого переместите курсор к значку Excel на панели задач. Появятся небольшие окна для предварительного просмотра всех запущенных файлов. Вы можете перейти к определенному документу, просто щелкнув это окно. Но это будет только переключатель, а не полноценное открытие нескольких окон, поскольку пользователь не может одновременно просматривать их на экране таким образом.
Но есть несколько приемов, которые можно использовать для одновременного просмотра нескольких документов в Excel 2007-2010 на экране.
Один из самых быстрых способов решить проблему с открытием нескольких окон в Excel раз и навсегда — это установить патч MicrosoftEasyFix50801.msi. К сожалению, Microsoft прекратила поддержку всех решений Easy Fix, включая указанный выше продукт. Поэтому скачать его на официальном сайте сейчас невозможно. При желании вы можете загрузить и установить патч с других веб-ресурсов на свой страх и риск, но вы должны помнить, что этими действиями вы можете поставить под угрозу свою систему.
Способ 1: панель задач
Один из более простых вариантов открытия нескольких окон — это сделать это через контекстное меню значка на панели задач.
- После того, как документ Excel уже запущен, переместите курсор к значку программы, расположенному на панели задач. Щелкните по нему правой кнопкой мыши. Контекстное меню запускается. В нем выбираем, в зависимости от версии программы, пункт «Microsoft Excel 2007» или «Microsoft Excel 2010».
Вместо этого вы можете щелкнуть значок Excel на панели задач левой кнопкой мыши, удерживая нажатой клавишу Shift. Другой вариант — просто навести указатель мыши на значок и затем щелкнуть колесиком мыши. Во всех случаях эффект будет одинаковым, но активировать контекстное меню необязательно.
- Пустой лист Excel открывается в отдельном окне. Чтобы открыть конкретный документ, перейдите на вкладку «Файл» в новом окне и щелкните пункт «Открыть».
- В открывшемся окне открытия файла перейдите в каталог, в котором находится нужный документ, выберите его и нажмите кнопку «Открыть».
После этого вы можете работать с документами одновременно в двух окнах. Точно так же, если необходимо, вы можете запустить их больше.
Способ 2: окно «Выполнить»
Второй способ предполагает действия через окно «Выполнить».
- Набираем на клавиатуре комбинацию клавиш Win + R.
- Окно «Выполнить» активировано. Набираем в его поле команду «excel».
После этого будет запущено новое окно, и чтобы открыть в нем нужный файл, выполняем те же действия, что и в предыдущем способе.
Способ 3: меню Пуск
Следующий метод подходит только для пользователей Windows 7 или более ранних версий операционной системы.
- Нажмите кнопку «Пуск» в Windows. Переходим к «Все программы».
- В открывшемся списке программ перейдите в папку «Microsoft Office». Затем щелкните левой кнопкой мыши ссылку «Microsoft Excel».
После этих действий будет запущено новое окно программы, в котором вы сможете открыть файл стандартным способом.
Способ 4: Ярлык на Рабочем столе
Чтобы запустить Excel в новом окне, нужно дважды щелкнуть ярлык приложения на рабочем столе. Если его там нет, вам нужно создать ссылку.
- Откройте проводник Windows и, если у вас установлен Excel 2010, перейдите по ссылке:
C: Program Files Microsoft Office Office14
Если установлен Excel 2007, адрес будет следующим:
C: Program Files Microsoft Office Office12
- Попав в каталог программы, мы находим файл с именем «EXCEL.EXE». Если в вашей операционной системе не включено отображение расширений, она будет называться просто «EXCEL». Щелкните этот элемент правой кнопкой мыши. В активированном контекстном меню выберите пункт «Создать ссылку».
- Появится диалоговое окно, указывающее, что в этой папке нельзя создать ярлык, но его можно разместить на рабочем столе. Мы принимаем, нажав кнопку «Да».
Теперь можно будет запускать новые окна через ярлык приложения на рабочем столе.
Способ 5: открытие через контекстное меню
Все описанные выше методы предполагают сначала запуск нового окна Excel, а только затем открытие нового документа через вкладку «Файл», что является довольно громоздкой процедурой. Но вы можете значительно упростить открытие документов, используя контекстное меню.
- Создайте ярлык Excel на рабочем столе, используя алгоритм, описанный выше.
- Щелкните ярлык правой кнопкой мыши. В контекстном меню мы останавливаем выбор на пункте «Копировать» или «Вырезать», в зависимости от того, хочет ли пользователь, чтобы ссылка продолжала размещаться на рабочем столе.
- Затем вы должны открыть проводник и перейти по следующему адресу:
C: Users Имя пользователя AppData Roaming Microsoft Windows SendTo
Вместо значения «UserName» вы должны подставить имя вашей учетной записи Windows, которое является каталогом пользователя.
Проблема в том, что по умолчанию этот каталог находится в скрытой папке. Следовательно, вам нужно будет включить просмотр скрытых каталогов.
- В открывшейся папке щелкните любое пустое место правой кнопкой мыши. В стартовом меню отмените выбор пункта «Вставить». Вскоре ссылка будет добавлена в этот каталог.
- Затем откройте папку, в которой находится файл, который вы хотите запустить. Щелкните по нему правой кнопкой мыши. В контекстном меню последовательно переходите к пунктам «Отправить» и «Excel».
Документ откроется в новом окне.
После того, как мы сделали это, добавив ссылку на папку SendTo один раз, у нас появилась возможность постоянно открывать файлы Excel в новом окне через контекстное меню.
Способ 6: изменения в системном реестре
Но вы можете упростить открытие файлов Excel в нескольких окнах. После процедуры, которая будет описана ниже, аналогичным образом будут запущены все документы, открытые обычным способом, то есть двойным щелчком. Правда, эта процедура предполагает манипуляции с реестром. Это означает, что вы должны быть уверены в себе, прежде чем приступить к этому, поскольку любой неправильный шаг может фатально повредить систему в целом. Чтобы исправить ситуацию в случае возникновения проблем, перед началом манипуляций создайте точку восстановления системы.
- Чтобы запустить окно «Выполнить», нажмите комбинацию клавиш Win + R. В открывшемся поле введите команду «RegEdit.exe» и нажмите кнопку «ОК».
- Редактор реестра запускается. В нем мы идем по следующему адресу:
HKEY_CLASSES_ROOT Excel.Sheet.8 shell Open команда
В правой части окна нажмите «По умолчанию».
- Откроется окно для редактирования. В строке «Значение» измените «/ dde» на «/ и«% 1 »». Остальную часть строки оставляем как есть. Щелкните кнопку «ОК».
- Находясь в том же разделе, щелкните правой кнопкой мыши элемент «команда». В открывшемся контекстном меню перейдите к пункту «Переименовать». Мы произвольно переименовываем этот элемент.
- Щелкните правой кнопкой мыши имя раздела «ddeexec». В контекстном меню выберите пункт «Переименовать» и также произвольно переименуйте этот объект.
Поэтому мы сделали возможным открывать файлы с расширением xls стандартным способом в новом окне.
- Чтобы выполнить эту процедуру для файлов .xlsx, перейдите по следующему адресу в редакторе реестра:
HKEY_CLASSES_ROOT Excel.Sheet.12 shell Open команда
Аналогичную процедуру проделываем с элементами этой ветки. То есть меняем параметры элемента «По умолчанию», переименовываем элемент «команда» и ветку «ddeexec».
После завершения этой процедуры файлы xlsx также откроются в новом окне.
Способ 7: параметры Excel
Открытие нескольких файлов в новых окнах также можно настроить с помощью параметров Excel.
- На вкладке «Файл» щелкните пункт «Параметры».
- Окно параметров запускается. Перейдите в раздел «Еще». В правой части окна найдите группу инструментов «Общие». Установите флажок «Игнорировать запросы DDE от других приложений». Щелкните кнопку «ОК».
После этого новые запущенные файлы будут открываться в отдельных окнах. В то же время перед выходом из Excel рекомендуется снять флажок «Игнорировать запросы DDE из других приложений», поскольку в противном случае при следующем запуске программы могут возникнуть проблемы с открытием файлов.
Поэтому в чем-то этот способ менее удобен, чем предыдущий.
Способ 8: открытие одного файла несколько раз
Как известно, Excel обычно не позволяет открывать один и тот же файл в двух окнах. Однако это тоже можно сделать.
- Запустите файл. Перейдите на вкладку «Просмотр». На панели инструментов «Окно» на ленте нажмите кнопку «Новое окно».
- После этих шагов этот файл откроется еще раз. В Excel 2013 и 2016 он сразу же запустится в новом окне. Чтобы документ открывался в отдельном файле в версиях 2007 и 2010, а не в новых вкладках, необходимо изменить реестр, как описано выше.
Как видите, хотя по умолчанию в Excel 2007 и 2010 при запуске нескольких файлов они открываются в одном главном окне, есть много способов запустить их в разных окнах. Пользователь может выбрать наиболее удобный вариант, соответствующий его потребностям.
Содержание:
- Разделить каждый лист на отдельный файл 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 различных версий.
Другие материалы по теме:
Содержание
- Открытие нескольких окон
- Способ 1: панель задач
- Способ 2: окно «Выполнить»
- Способ 3: меню Пуск
- Способ 4: Ярлык на Рабочем столе
- Способ 5: открытие через контекстное меню
- Способ 6: изменения в системном реестре
- Способ 7: параметры Excel
- Способ 8: открытие одного файла несколько раз
- Вопросы и ответы
При работе в Microsoft Excel бывает необходимость открыть несколько документов или один и тот же файл в нескольких окнах. В старых версиях и в версиях, начиная c Excel 2013, сделать это не составляет особых проблем. Просто открываем файлы стандартным способом, и каждый из них запустится в новом окне. Но вот в версиях приложения 2007 — 2010 новый документ открывается по умолчанию в родительском окне. Такой подход экономит системные ресурсы компьютера, но вместе с тем создает и ряд неудобств. Например, если пользователь хочет сравнить два документа, расположив окна на экране рядом, то при стандартных настройках это у него не получится. Рассмотрим, как это можно сделать всеми доступными способами.
Открытие нескольких окон
Если в версиях Эксель 2007 — 2010 у вас уже открыт документ, но вы попытаетесь запустить другой файл, то он откроется в том же родительском окне, просто заменив содержимое первоначального документа на данные из нового. Всегда будет возможность переключиться на первый запущенный файл. Для этого нужно навести на панели задач курсор на иконку Excel. Появится небольшие окошки для предпросмотра всех запущенных файлов. Перейти к конкретному документу можно просто кликнув по такому окошку. Но это будет именно переключение, а не полноценное открытие нескольких окон, так как одновременно вывести их на экран таким способом пользователь не сможет.
Но существует несколько уловок, с помощью которых можно отобразить несколько документов в Excel 2007 — 2010 на экране одновременно.
Одним из самых быстрых вариантов раз и навсегда решить проблему с открытием нескольких окон в Эксель является установка патча MicrosoftEasyFix50801.msi. Но, к сожалению, компания Майкрософт перестала поддерживать все решения Easy Fix, включая вышеуказанный продукт. Поэтому скачать его на официальном сайте сейчас нельзя. При желании можно на свой страх и риск произвести загрузку и установку патча с других веб-ресурсов, но при этом следует помнить, что данными действиями вы можете подвергнуть свою систему опасности.
Способ 1: панель задач
Одним из самых простых вариантов открытия нескольких окон является выполнение данной операции через контекстное меню значка на Панели задач.
- После того, как один документ Эксель уже запущен, наводим курсор на иконку программы, размещенную на Панели задач. Кликаем по ней правой кнопкой мыши. Запускается контекстное меню. В нем выбираем в зависимости от версии программы пункт «Microsoft Excel 2007» или «Microsoft Excel 2010».
Можно вместо этого кликнуть по значку Excel на панели задач левой кнопкой мышки при зажатой клавише Shift. Ещё один вариант — просто навести курсор на значок, после чего кликнуть колесиком мышки. Во всех случаях эффект будет тот же, но не понадобится активировать контекстное меню.
- Открывается чистый лист Эксель в отдельном окне. Для того, чтобы открыть конкретный документ переходим во вкладку «Файл» нового окна и кликаем по пункту «Открыть».
- В запустившемся окне открытия файла переходим в директорию, где расположен нужный документ, выделяем его и жмем на кнопку «Открыть».
После этого вы сможете работать с документами сразу в двух окнах. Таким же образом при необходимости можно запустить и большее количество.
Способ 2: окно «Выполнить»
Второй способ предполагает действия через окно «Выполнить».
- Набираем на клавиатуре комбинацию клавиш Win+R.
- Активируется окно «Выполнить». Набираем в его поле команду «excel».
После этого новое окно запустится, а для того, чтобы открыть в нем нужный файл выполняем те же действия, что и в предыдущем способе.
Способ 3: меню Пуск
Следующий способ подойдет только пользователям Windows 7 или более ранних версий операционной системы.
- Кликаем по кнопке «Пуск» ОС Windows. Переходим по пункту «Все программы».
- В открывшемся перечне программ переходим к папке «Microsoft Office». Далее кликаем левой кнопкой мыши по ярлыку «Microsoft Excel».
После этих действий запустится новое окно программы, в котором стандартным способом можно будет открыть файл.
Способ 4: Ярлык на Рабочем столе
Чтобы запустить программу Excel в новом окне, нужно дважды кликнуть по ярлыку приложения на рабочем столе. Если его нет, то в таком случае ярлык нужно создать.
- Открываем Проводник Windows и если у вас установлен Excel 2010, то переходим по адресу:
C:Program FilesMicrosoft OfficeOffice14
Если установлен Эксель 2007, то в этом случае адрес будет такой:
C:Program FilesMicrosoft OfficeOffice12
- Попав в директорию программы, находим файл под названием «EXCEL.EXE». Если у вас не включен в операционной системе показ расширений, то он будет называться просто «EXCEL». Кликаем по данному элементу правой кнопкой мыши. В активировавшемся контекстном меню выбираем пункт «Создать ярлык».
- Появится диалоговое окно, в котором говорится, что создать ярлык в данной папке нельзя, но можно поместить на рабочий стол. Соглашаемся, нажав кнопку «Да».
Теперь запускать новые окно можно будет через ярлык приложения на Рабочем столе.
Способ 5: открытие через контекстное меню
Все способы, которые были описаны выше, предполагают сначала запуск нового окна Excel, а уже потом через вкладку «Файл» открытие нового документа, что является довольно неудобной процедурой. Но существует возможность значительно облегчить открытие документов путем использования контекстного меню.
- Создаем ярлык Excel на рабочем столе по алгоритму, который описан выше.
- Кликаем по ярлыку правой кнопкой мыши. В контекстном меню останавливаем выбор на пункте «Копировать» или «Вырезать» в зависимости от того, желает пользователь, чтобы ярлык и дальше размещался на Рабочем столе или нет.
- Далее следует открыть Проводник, после чего совершить переход по следующему адресу:
C:UsersИмя_пользователяAppDataRoamingMicrosoftWindowsSendTo
Вместо значения «Имя_пользователя» следует подставить наименование вашей учетной записи Windows, то есть, пользовательского каталога.
Проблема состоит ещё и в том, что по умолчанию данная директория находится в скрытой папке. Поэтому нужно будет включить показ скрытых каталогов.
- В открывшейся папке кликаем по любому пустому месту правой кнопкой мыши. В запустившемся меню останавливаем выбор на пункте «Вставить». Сразу же вслед за этим ярлык будет добавлен в данную директорию.
- Затем открываем ту папку, где расположен файл, который нужно запустить. Кликаем по нему правой кнопкой мыши. В контекстном меню последовательно переходим по пунктам «Отправить» и «Excel».
Документ запустится в новом окне.
Один раз проделав операцию с добавлением ярлыка в папку «SendTo», мы получили возможность постоянно открывать файлы Excel в новом окне через контекстное меню.
Способ 6: изменения в системном реестре
Но можно сделать открытие файлов Excel в нескольких окнах ещё проще. После процедуры, которая будет описана ниже, подобным образом будут запускаться все документы, открытые обычным способом, то есть, двойным щелчком мыши. Правда, эта процедура предполагает манипуляции с системным реестром. Это значит, что нужно быть уверенным в себе, прежде чем браться за неё, так как любой неправильный шаг может фатально навредить системе в целом. Для того, чтобы в случае проблем можно было исправить ситуацию, перед началом манипуляций сделайте точку восстановления системы.
- Для запуска окна «Выполнить», нажимаем комбинацию клавиш Win+R. В открывшемся поле вводим команду «RegEdit.exe» и жмем на кнопку «OK».
- Происходит запуск Редактора реестра. В нем переходим по следующему адресу:
HKEY_CLASSES_ROOTExcel.Sheet.8shellOpencommand
В правой части окна кликаем по элементу «По умолчанию».
- Открывается окно его редактирования. В строке «Значение» меняем «/dde» на «/e “%1”». Остальную часть строки оставляем как есть. Жмем на кнопку «OK».
- Находясь в том же разделе, кликаем правой кнопкой мыши по элементу «command». В открывшемся контекстном меню переходим по пункту «Переименовать». Произвольно переименовываем этот элемент.
- Кликаем правой кнопкой мыши по наименованию раздела «ddeexec». В контекстном меню выбираем пункт «Переименовать» и тоже произвольно переименовываем данный объект.
Таким образом, мы сделали возможным открытие стандартным способом в новом окне файлов с расширением xls.
- Для того, чтобы выполнить данную процедуру для файлов с расширением xlsx, в Редакторе реестра переходим по адресу:
HKEY_CLASSES_ROOTExcel.Sheet.12shellOpencommand
Проделываем аналогичную процедуру и с элементами данной ветки. То есть, изменяем параметры элемента «По умолчанию», переименовываем элемент «command» и ветку «ddeexec».
После выполнения данной процедуры файлы формата xlsx тоже будут открываться в новом окне.
Способ 7: параметры Excel
Открытие нескольких файлов в новых окнах можно настроить также через параметры Excel.
- Во время нахождения во вкладке «Файл» выполняем щелчок мышкой по пункту «Параметры».
- Происходит запуск окна параметров. Переходим в раздел «Дополнительно». В правой части окна ищем группу инструментов «Общие». Устанавливаем галочку напротив пункта «Игнорировать DDE-запросы от других приложений». Жмем на кнопку «OK».
После этого новые запущенные файлы будут открываться в отдельных окнах. В то же время, перед завершением работы в Excel, рекомендуется снять галочку с пункта «Игнорировать DDE-запросы от других приложений», так как в обратном случае при следующем запуске программы возможно возникновение проблем с открытием файлов.
Поэтому, в некотором роде, данный способ менее удобен, чем предыдущий.
Способ 8: открытие одного файла несколько раз
Как известно, обычно программа Excel не дает открыть один и тот же файл в двух окнах. Тем не менее, это тоже можно сделать.
- Запускаем файл. Переходим во вкладку «Вид». В блоке инструментов «Окно» на ленте жмем на кнопку «Новое окно».
- После этих действий данный файл откроется ещё один раз. В Excel 2013 и 2016 он запустится сразу же в новом окне. Для того чтобы в версиях 2007 и 2010 документ открылся в отдельном файле, а не в новых вкладках, нужно произвести манипуляции с реестром, о которых шла речь выше.
Как видим, хотя по умолчанию в Excel 2007 и 2010 при запуске нескольких файлов будут открываться в одном и том же материнском окне, существует множество способов запустить их в разных окнах. Пользователь может сам выбрать более удобный, соответствующий своим потребностям вариант.
В файле Excel вы можете создать несколько рабочих листов, чтобы содержимое между листами было более плавным, зрители могли конвертировать содержимое, легче отслеживать содержимое друг друга, связанное с каждым листом. Это также ограничивает необходимость одновременного открытия нескольких файлов Excel для отслеживания данных. Однако, если файл Excel имеет несколько листов, это увеличит размер файлов Excel, особенно если вы используете дополнительные надстройки или код макроса VBA в Excel.
Если пользователь хочет разделить каждый лист на отдельные файлы Excel, это тоже очень просто. Содержимое листа остается прежним, имя листа становится именем каждого файла, а формула, используемая в листе, не изменяется, или возникает ошибка результата. В следующей статье вы узнаете, как разделить каждый лист в Excel на отдельные файлы.
- Как взломать пароль VBA в Excel
- Как отправить электронное письмо из электронной таблицы Excel с помощью скрипта VBA
- Как сохранить файл Excel, содержащий код макроса VBA
- Как создать мигающие буквы в Excel
Инструкция по разделению листов в Excel отдельно
Шаг 1:
Прежде всего, в Excel сначала должна отображаться вкладка «Разработчик». Затем откройте файл Excel, чтобы разделить листы. Ниже будут 3 листа с разными названиями листов.
Шаг 2:
Нажмите Alt + F11, чтобы открыть VBA в Excel, или щелкните вкладку Разработчик и щелкните Visual Basic.
Шаг 3:
Переключитесь на интерфейс содержимого. Новые пользователи щелкните вкладку «Вставка», а затем щелкните раздел «Модуль», чтобы открыть интерфейс ввода кода VBA.
Затем скопируйте приведенный ниже код в интерфейс.
Дополнительная книга Splitbook ()
Обновление от 20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Для каждого xWs в ThisWorkbook.Sheets
xWs.Copy
Application.ActiveWorkbook.SaveAs Имя файла: = xPath & «» & xWs.Name & «.xls»
Application.ActiveWorkbook.Close False
следующий
Application.DisplayAlerts = True
Application.ScreenUpdating = True
Конец подписки
Шаг 4:
Щелкните значок «Выполнить» на панели инструментов, чтобы запустить программу, или нажмите клавишу F5 на клавиатуре, чтобы запустить код.
Когда процесс кода будет завершен, откройте исходное хранилище файлов Excel и просмотрите каждый файл листа, отображаемый здесь. Имя каждого листа преобразуется в имя каждого файла Excel, чтобы пользователи могли легко управлять файлами. Все формулы, используемые на каждом листе, остаются прежними.
При открытии файла листа, если есть подобное уведомление, нажмите Да, чтобы продолжить открытие содержимого.
С помощью простой операции вы быстро получите файлы листов в Excel. Все содержимое на каждом листе Excel не было изменено.
Желаю всем успехов!