Как сохранить или экспортировать каждый лист как CSV/PDF файл в Excel?

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

1. Перейдите на лист, который вы хотите сохранить или экспортировать как отдельный .csv файл, и нажмите Файл (или кнопку Office) > Сохранить как.

2. В открывшемся диалоговом окне укажите папку назначения, куда вы хотите сохранить .csv файл, щелкните поле «Указать формат сохранения» и выберите CSV (разделитель запятая) (*.csv) или PDF (*.pdf) из выпадающего списка, затем нажмите кнопку Сохранить.

3. Появятся два предупреждающих диалоговых окна последовательно. Нажмите ОК > Да.

Примечание: Если вы сохраняете активный рабочий лист как PDF файл, эти диалоговые окна не появятся. Просто переходите к следующему шагу.

4. Повторите вышеуказанные шаги 1-3, чтобы сохранить другие листы как отдельные .csv файлы один за другим.

Некоторые пользователи Excel могут отказаться от использования кода VBA по определенным причинам. Не беспокойтесь! Третий метод также позволяет пакетно сохранять или экспортировать каждый лист как .csv файл или PDF файл с помощью утилиты Разделить книгу из Kutools для Excel.

1. Нажмите Kutools Plus > Книга > Разделить книгу.

2. В открывшемся диалоговом окне Разделить книгу,

(1) Оставьте выбор всех листов. Если нет, вы можете установить флажок перед Имя листа, чтобы выбрать все листы;

(2) Установите флажок Конвертировать;

(3) Щелкните поле под опцией Конвертировать и выберите CSV (Macintosh)(*.csv) или PDF (*.pdf) из выпадающего списка.

(4) Нажмите кнопку Разделить.

Примечание: Если в вашей книге есть скрытые и пустые листы, установка флажков Игнорировать скрытые листы и Игнорировать пустой лист позволит игнорировать все пустые или скрытые листы при экспорте.

Kutools для Excel - Усильте Excel более чем 300 необходимыми инструментами. Наслаждайтесь постоянно бесплатными функциями ИИ! Получите прямо сейчас

3. В открывшемся диалоговом окне Обзор папки укажите папку назначения, куда вы хотите сохранить все .csv файлы или PDF файлы, и нажмите кнопку ОК.

Теперь вы увидите, что каждый лист экспортирован и сохранен как отдельный .csv файл в указанной папке.

Если у вас много листов, которые нужно сохранить или экспортировать как .csv файлы, первый метод будет довольно трудоемким и утомительным. Этот VBA упрощает работу и облегчает сохранение или экспорт каждого листа как .csv файла.

1. Одновременно нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Нажмите Вставить > Модуль, а затем вставьте следующий код VBA в новое окно модуля.

VBA: Сохранение каждого листа как отдельного CSV файла

Public Sub SaveWorksheetsAsCsv()
Dim xWs As Worksheet
Dim xDir As String
Dim folder As FileDialog
Set folder = Application.FileDialog(msoFileDialogFolderPicker)
If folder.Show <> -1 Then Exit Sub
xDir = folder.SelectedItems(1)
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.SaveAs xDir & "\" & xWs.Name, xlCSV
Next
End Sub

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

Затем вы увидите, что каждый лист сохранен/экспортирован как отдельный .csv файл в указанной целевой папке.