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

Как сохранить каждый лист книги отдельно в формате текстового файла?

АвторСуньДата изменения

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

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

Сохранение каждого листа книги как отдельного файла Текстовый файл с помощью Kutools для Excel хорошая идея3

Экспорт выбранного листа в формате Текстовый файл с помощью Kutools для Excel

синяя стрелка вправо с пузырём Сохранение Текущий лист в формате Текстовый файл с помощью VBA

Если вы не хотите использовать функцию «Сохранить как» для сохранения листа в текстовом формате, воспользуйтесь кодом VBA.

1. Активируйте лист, который вы хотите сохранить в формате текстового файла.

2. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

3. В открывшемся окне выберите Вставка > Модуль, а затем вставьте приведённый ниже код VBA в модуль.

Sub SaveSheetToTxt()
'Updateby20150910
    Dim xRet As Long
    Dim xFileName As Variant
    On Error GoTo ErrHandler:
    xFileName = Application.GetSaveAsFilename(ActiveSheet.Name, "TXT File (*.txt), *.txt", , "Kutools for Excel")
    If xFileName = False Then Exit Sub
    If Dir(xFileName) <> "" Then
        xRet = MsgBox("File '" & xFileName & "' exists.  Overwrite?", vbYesNo + vbExclamation, "Kutools for Excel")
        If xRet <> vbYes Then
            Exit Sub
        Else
            Kill xFileName
        End If
    End If
    ActiveSheet.Copy
    ActiveWorkbook.SaveAs xFileName, xlUnicodeText
    If ActiveWorkbook.Name <> ThisWorkbook.Name Then
        ActiveWorkbook.Close False
    End If
My_Exit:
    Exit Sub
ErrHandler:
    MsgBox Err.Description, , "Kutools for Excel"
End Sub

4. Нажмите кнопку Выполнить, чтобы запустить код. Затем в диалоговом окне Kutools для Excel укажите папку для сохранения текстового файла и задайте имя файла. См. снимок экрана:

Снимок экрана диалогового окна Kutools for Excel «Сохранить как текстовый файл»

5. Нажмите кнопку Сохранить. Теперь текущий лист сохранён в формате текстового файла.

Совет: С помощью VBA можно сохранять только один лист за раз в формате текстового файла.

синяя стрелка вправо с пузырём Сохранение каждого листа книги как отдельного файла Текстовый файл с помощью Kutools для Excel

Если у вас большая книга с сотнями листов, которые нужно сохранить в виде отдельных текстовых файлов, метод VBA также займёт немало времени. В этом случае рекомендуем воспользоваться функцией Kutools для Excel «Разделить книгу» — она не только быстро справится с задачей, но и приятно удивит вас.

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

1. Откройте книгу, листы которой нужно сохранить как отдельные текстовые файлы, и нажмите KUTOOLS PLUS > Книга > Разделить книгу. См. снимок экрана:

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

2. В диалоговом окне Разделить книгу выберите листы, которые нужно разделить и сохранить в формате текстового файла. По умолчанию все листы уже выбраны. Установите флажок Указать формат сохранения и выберите Текст в формате Unicode (*.txt) в раскрывающемся списке ниже. См. снимок экрана:

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

3. Нажмите кнопку Разделить, а затем укажите папку для сохранения текстового файла в диалоговом окне Выбор папки. См. снимок экрана:

Снимок экрана диалогового окна «Обзор папок»

4. Нажмите кнопку ОК. Теперь каждый лист книги сохранён как отдельный текстовый файл в выбранной папке.

С помощью Разделить книгуиз Kutools для Excelможно разделить книгу и сохранить её как отдельные файлы xls, xlsx, Файлы PDF или CSV.Щёлкните здесь, чтобы узнать больше об этой утилите.

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

синяя стрелка вправо с пузырём Экспорт выбранного листа в формате Текстовый файл с помощью Kutools для Excel

С помощью Kutools для Excel можно также экспортировать выделенный диапазон листа в текстовый файл с помощью функции Экспорт диапазона в файл.

Kutools для Excel — включает более 300 незаменимых инструментов для Excel. Работайте в Excel быстрее, проще и эффективнее.Скачать сейчас!

1. Выделите диапазон или несколько диапазонов, которые нужно сохранить в текстовом файле, и нажмите KUTOOLS PLUS > Импорт/Экспорт > Экспорт диапазона в файл. См. снимок экрана:

Снимок экрана параметра «Экспорт диапазона в файл» на вкладке Kutools Plus в Excel

2. В появившемся диалоговом окне установите флажок Текст в формате Unicode в разделе Тип файла, затем перейдите в раздел Параметры текста и выберите нужный параметр, после чего укажите формат Область сохранения.

Снимок экрана диалогового окна «Экспорт диапазона в файл»

3. Нажмите кнопку ОК. В появившемся диалоговом окне Экспорт диапазона в файл задайте имя экспортируемому текстовому файлу и нажмите кнопку ОК.

Снимок экрана диалогового окна «Экспорт диапазона в файл» для задания имени экспортируемого файла

Теперь выделенный фрагмент экспортирован в отдельный текстовый файл.

Kutools для Excel— раскройте весь потенциал 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек