Як відомо, Microsoft Excel може зберігати поточний аркуш як окремий файл .csv або файл PDF. Таким чином, ви можете зберігати або експортувати кожен аркуш як файл .csv або файл PDF по одному вручну.

1. Перейдіть до аркуша, який ви збережете або експортуєте як окремий файл .csv, та натисніть філе (Або Кнопка офісу)> Зберегти як.

2. У діалоговому вікні, що відкриється, вкажіть цільову папку, до якої ви будете зберігати файл .csv, натисніть Зберегти як і виберіть CSV (з комою) (* .csv) or PDF (* .pdf) зі спадного списку та натисніть зберегти кнопки.

3. Послідовно з’являтимуться два діалогові вікна із попередженнями. Клацніть, будь ласка OK > да.

Примітка: Якщо ви збережете активний аркуш як файл PDF, ці діалогові вікна не з’являться. Просто перейдіть до наступного кроку.

4. Повторіть вище кроки 1-3, щоб зберегти інші аркуші як окремі файли .csv по одному.

Якщо існує декілька аркушів, які ви хочете зберегти або експортувати як .csv-файли, перший спосіб буде досить трудомістким і нудним. Цей VBA може спростити роботу та спростити збереження або експортування кожного аркуша у форматі .csv-файлу.

1. прес інший + F11 одночасно відкрити вікно Microsoft Visual Basic for Application.

2. клацання Insert > Модулі, а потім вставте наступний код 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 у вказаній папці призначення.

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

Kutools для Excel - Включає більше 300 зручних інструментів для Excel. Повна функція безкоштовної пробної версії 30 днів, кредитна картка не потрібна! Get It Now

1. Натисніть підприємство > робочий зошит > Роздільна робоча книга.

2. У діалоговому вікні Розділити робочу книгу відкрийте

3. У діалоговому вікні Огляд папки, що відкривається, вкажіть цільову папку, до якої ви збережете весь файл .csv або файл PDF, та натисніть OK кнопки.

Тепер ви побачите, як кожен аркуш експортується та зберігається як окремий файл .csv у зазначеній папці.