Содержание
В Microsoft Excel вы можете легко преобразовать документ в CSV, выбрав соответствующий тип файла в диалоговом окне «Сохранить как». Благодаря этому методу будет конвертироваться только активный лист. Это связано с тем, что файлы CSV могут содержать только один рабочий лист. Чтобы преобразовать несколько электронных таблиц CSV, необходимо экспортировать их одну за другой, для этого необходимо активировать каждую из них, переместить ее в пустой документ и затем сохранить как CSV. Чтобы сделать эту задачу проще и удобнее, используйте макросы.
направления
-
Запустите Microsoft Excel и откройте ваш документ.
-
Нажмите «Alt + F8», чтобы открыть окно макросов. Введите «ExportSheetsToCSV» в параметре имени для макроса и нажмите «Создать».
-
Введите следующий код в редакторе VBA. Этот макрос создаст файлы CSV в той же папке, что и ваш документ, используя имя рабочих листов для файлов.
Sub ExportSheetsToCSV ()
Dim wSheet As Worksheet Dim csvFile As String
Для каждого wSheet в рабочих листах при ошибке возобновить следующее wSheet.Copy csvFile = CurDir & "" & wSheet.Name & ".csv" ActiveWorkbook.SaveAs Имя файла: = csvFile, _ FileFormat: = xlCSV, CreateBackup: = False ActiveWorkbook.Saved = True ActiveWorkbook.Close Next wSheet
End Sub
-
Закройте редактор VBA и вернитесь к документу.
-
Снова нажмите «Alt + F8», чтобы открыть окно макросов. Выберите «ExportSheetsToCSV» из списка и нажмите «Выполнить». Подождите, пока Excel не завершит преобразование электронных таблиц.
чаевые
- Если вы хотите сохранить файлы CSV в другой папке, замените «CurDir» в строке 9 на путь к папке по вашему выбору. Вы также можете переместить ваш документ в папку по вашему выбору перед запуском макроса.
предупреждение
- По умолчанию макросы отключены в Microsoft Excel. Чтобы активировать их, нажмите кнопку «Microsoft Office», перейдите в «Параметры Excel» и убедитесь, что установлен флажок «Просмотр вкладки разработчика в настройках». В некоторых случаях вам нужно будет перезапустить Excel, чтобы изменения вступили в силу.