Я працюю над наступним макросом у excel, який перебирає всі робочі таблиці в робочій книжці і зберігає кожен у свій .csv файл. Проблема полягає в тому, що мені це потрібно для збереження у форматі .csv, закодованого UTF-8. Я читав, що кодування Excel за замовчуванням для .csv - це ANSI, яке для мене не працюватиме, оскільки в них є деякі файли зі спеціальними символами. Хтось знає, як я можу з цим піти?
Макрос:
Public Sub ExportSheetsToCSV()
Dim wsExport As Worksheet
Dim wbkExport As Workbook
For Each wsExport In Worksheets
wsExport.Select
nm = wsExport.Name
If Not IsActiveSheetEmpty() Then
ActiveSheet.SaveAs fileName:="H:\CSV_Split_Exports\" & nm, FileFormat:=xlCSV
Application.DisplayAlerts = True
End If
Next wsExport
End Sub