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

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

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

3. Поочередно появятся два предупреждающих диалоговых окна. Пожалуйста, нажмите OK > Да.

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

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

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

1. Нажмите Кутулс Плюс > Workbook > Разделить книгу.

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

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

(2) Проверьте Укажите формат сохранения вариант;

(3) Щелкните поле ниже Укажите формат сохранения и выберите CSV (Macintosh) (*. Csv) or PDF (* .pdf) из выпадающего списка.

(4) Щелкните значок Split .

Внимание: Если в вашей книге есть скрытые и пустые листы, проверьте Пропустить скрытые листы и Пропустить пустой лист box будет игнорировать все пустые или скрытые листы при экспорте.

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

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

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

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

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

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, и щелкните значок OK .

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