KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Excel: сохранение или экспорт всех листов в отдельные файлы CSV или Текстовый файл (2 простых способа)

АвторSiluviaДата изменения

В мире анализа данных, отчётности и обмена информацией Microsoft Excel часто используется для работы с книгами, содержащими несколько листов. Нередко возникает необходимость сохранять или экспортировать каждый лист в отдельный файл CSV (значения, разделённые запятыми) или текстовый файл (.txt). Такая задача встречается повсеместно — будь то обмен данными с коллегами, импорт в другие базы данных или программные приложения, системная интеграция, а также архивирование отдельных наборов данных для соблюдения нормативных требований или резервного копирования. Однако Excel на сегодняшний день не предоставляет встроенной функции для одновременного экспорта всех листов в отдельные файлы, из-за чего многократное ручное сохранение становится утомительным процессом.

В этой статье представлены практичные и эффективные способы автоматизации экспорта или преобразования всех (или выбранных) листов Excel в отдельные файлы CSV или текстовые файлы, чтобы ваш рабочий процесс оставался оптимизированным и свободным от ошибок.

Сохранение или экспорт всех листов в CSV или Текстовый файл с помощью кода VBA

Хотя Excel не предлагает встроенной функции для пакетного экспорта всех листов в отдельные файлы CSV или текстовые файлы, вы можете автоматизировать этот процесс с помощью кода VBA. Это решение особенно полезно как для тех, кто знаком с основами программирования, так и для всех, кому нужен более гибкий контроль над экспортом — например, возможность указать папку назначения или настроить имена создаваемых файлов. Приведённые ниже сценарии VBA позволяют автоматически сохранять каждый лист вашей книги в отдельный файл.

Экспорт или преобразование всех листов в отдельные файлы CSV

1. Нажмите одновременно Alt+F11, чтобы открыть редактор Microsoft Visual Basic для приложений (VBA). Даже если вкладка «Разработчик» не отображается в Excel, вы всё равно можете использовать это сочетание клавиш для доступа к среде VBA.

2. В окне Microsoft Visual Basic для приложений выберите в меню Вставка > Модуль. Это создаст новый модуль, в который можно ввести сценарий. Затем скопируйте и вставьте следующий код VBA в созданное окно:

Sub ExportSheetsToCSV()
	Dim xWs As Worksheet
	Dim xcsvFile As String
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Copy
		xcsvFile = CurDir & "\" & xWs.Name & ".csv"
		Application.ActiveWorkbook.SaveAs Filename: = xcsvFile, _
		FileFormat: = xlCSV, CreateBackup: = False
		Application.ActiveWorkbook.Saved = True
		Application.ActiveWorkbook.Close
	Next
End Sub

3. Чтобы запустить код, нажмите клавишу F5 или щёлкните кнопку «Выполнить» на панели инструментов. После выполнения вы увидите, что каждый лист экспортирован в отдельный CSV-файл и сохранён в папке Документы. Каждый файл автоматически получает имя соответствующего листа — это упрощает организацию экспортированных данных. Пример экспортированных файлов см. на скриншоте ниже:

Снимок экрана нескольких файлов CSV, сохраненных в папке «Документы»

Примечания и советы: В зависимости от размера книги и количества листов экспорт может занять несколько секунд. Обязательно сохраните книгу перед запуском макросов VBA, чтобы избежать случайной потери данных. Убедитесь, что формулы на листах при необходимости преобразованы в значения — форматы CSV и текст сохраняют только значения, а не сами формулы.

Экспорт или преобразование всех листов в отдельные файлы Текстовый файл

Следующий код VBA позволяет экспортировать каждый лист вашей книги в отдельный текстовый файл (.txt). Это особенно полезно в сценариях, где требуется импортировать или обрабатывать текстовые файлы в других системах или на других платформах.

Sub ExportSheetsToText()
	Dim xWs As Worksheet
	Dim xTextFile As String
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Copy
		xTextFile = CurDir & "\" & xWs.Name & ".txt"
		Application.ActiveWorkbook.SaveAs Filename: = xTextFile, FileFormat: = xlText
		Application.ActiveWorkbook.Saved = True
		Application.ActiveWorkbook.Close
	Next
End Sub

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

Снимок экрана нескольких текстовых файлов, сохраненных в папке «Документы»

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

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

Устранение неполадок:Если макрос не экспортирует файлы должным образом, убедитесь, что:

  • Книга сохраняется перед запуском макроса, чтобы избежать неожиданного закрытия или ошибок.
  • У вас есть права на запись в папку «Документы» (либо измените код, чтобы указать другое расположение).
  • Не все имена листов допустимы в качестве имён файлов Windows. Символы, такие как /, \ и :, в именах листов могут вызвать ошибки при создании файлов.
  • Настройки безопасности макросов в Excel разрешают выполнение кода VBA. Обязательно включите макросы, если появится соответствующий запрос.

Сохранение или экспорт всех / выбранных листов в CSV или Текстовый файл с помощью Kutools для Excel

Для тех, кто ищет простое решение без написания или запуска сценариев VBA, Kutools для Excel предлагает интуитивный и удобный способ экспортировать все или выбранные листы в отдельные файлы CSV, TXT и других форматов — всего за несколько щелчков мыши. Этот подход идеально подходит пользователям любого уровня, особенно тем, кто не хочет возиться с кодом или часто нуждается в быстрой пакетной экспортизации.

Kutools для Excelпредлагает более 300 расширенных функций для упрощения сложных задач, повышая креативность и эффективность.Интегрировано с возможностями ИИ, Kutools автоматизирует задачи с высокой точностью, делая управление данными простым и удобным.Подробная информация о Kutools для Excel…         Бесплатная пробная версия…

1. Перейдите на вкладку Лента Excel и нажмите KUTOOLS PLUS > Книга > Разделить книгу. Это запустит интерфейс пакетного экспорта. См. скриншот ниже:

Снимок экрана опции «Разделить книгу» на вкладке Kutools Plus в Excel

2. В диалоговом окне Разделить книгу вы увидите список всех имён листов с флажками:

  • 1). Чтобы экспортировать все листы, оставьте все элементы отмеченными в разделе Имя листа. Если вы хотите экспортировать только определённые листы, снимите отметки с тех, которые следует исключить.
  • 2). В области Параметры откройте выпадающий список Указать формат сохранения и выберите в качестве предпочитаемого типа файла либо Текст Unicode (*.txt), либо CSV (Macintosh) (*.csv). Правильный выбор формата гарантирует беспрепятственный импорт данных в большинство популярных баз данных, табличных и текстовых редакторов.
  • 3). После завершения выбора нажмите кнопку Разделить, чтобы продолжить.

Снимок экрана диалогового окна «Разделить книгу»

3. Когда появится диалоговое окно Выбор папки, выберите папку для сохранения экспортируемых файлов и нажмите ОК, чтобы начать экспорт. Обратите внимание на целевой каталог — это обеспечит лёгкий доступ к экспортированным документам.

Снимок экрана диалогового окна «Выбор папки» в Excel для указания папки сохранения файлов

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

Зачем использовать Kutools для Excel?

По сравнению с ручным экспортом или использованием макросов VBA, Kutools для Excel предоставляет уникальные преимущества как для отдельных пользователей, так и для организаций:

  • ⚡Пакетный экспорт с минимальными усилиями — Экспортируйте все или выбранные листы за секунды, выполняя за это время то, на что ушли бы часы при использовании стандартных средств Excel или ручной обработке.
  • 📁Гибкие варианты экспорта — поддержка множества форматов, включая CSV, TXT, PDF, XLSX и XLS, обеспечивает совместимость ваших данных с самыми разными платформами и бизнес-требованиями.
  • 🔍Гибкий выбор листов – Возможность включать или исключать скрытые и пустые листы, чтобы ваши экспортируемые данные оставались краткими и сфокусированными на соответствующей информации.
  • 🧾Чёткая система именования файлов — по умолчанию каждый выходной файл получает имя соответствующего листа, что помогает избежать путаницы и лишнего переименования после экспорта.
  • 🧩Не требуются знания программирования — процесс полностью графический и интуитивно понятный, поэтому любой пользователь может экспортировать данные независимо от уровня технической подготовки.

Демонстрация: сохранение, экспорт или преобразование нескольких/всех листов в CSV или Текстовый файл с помощью Kutools для Excel

 
Kutools для Excel: Более 300 удобных инструментов всегда под рукой! Воспользуйтесь функциями на базе ИИ для более умной и быстрой работы!Скачать сейчас!

Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции…
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул…
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий…
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором…
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов…
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

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

Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек