Как массово конвертировать CSV-файлы в Excel

Файлы CSV часто используются с бухгалтерами, потому что структура функций и команд, которые были выполнены ранее, сохраняется. В настоящее время файлы CSV можно открывать в Excel или легко открывать файлы CSV в Google Таблицах. Однако при работе с файлом CSV в Excel могут возникать некоторые ошибки, такие как вьетнамская ошибка, например, при открытии файла CSV в Excel. Так много людей хотят преобразовать файл CSV в файл Excel, чтобы работать было удобнее.

Чтобы преобразовать файл CSV в формат Excel, существует множество способов сделать это. Если вы хотите пакетно конвертировать файлы CSV в Excel, вы можете обратиться к следующей статье сетевого администрирования. Всего за несколько простых шагов у нас теперь есть файлы XLS или XLSX Excel без необходимости поддержки программного обеспечения.

  1. Как конвертировать PDF-файл в Excel, сохранив тот же формат
  2. Простой способ конвертировать файлы XLSX в XLS
  3. Как конвертировать файлы Excel в Google Таблицы
  4. Как удалить формат таблицы в Excel

1. Преобразуйте файл CSV в пакетный файл XLS.

Шаг 1:

Прежде всего, мы сгруппируем файлы CSV, которые нужно преобразовать в формат XLS, в тот же каталог, что и на изображении ниже.

Изображение 1: Как массово конвертировать CSV-файлы в Excel

Шаг 2:

Затем пользователи открывают Excel, затем щелкают вкладку «Разработчик», а затем – Visual Basic.

Изображение 2: Как массово конвертировать CSV-файлы в Excel

Шаг 3:

Переключитесь на новый пользовательский интерфейс, нажмите «Вставить», а затем выберите «Модуль», чтобы открыть интерфейс и ввести код VBA в Excel.

Изображение 3: Как массово конвертировать CSV-файлы в Excel

Затем вставляем приведенный ниже код в интерфейс в Excel.

Sub CSVtoXLS () ‘UpdatebyExtendoffice20170814 Dim xFd As FileDialog Dim xSPath As String Dim xCSVFile As String Dim xWsheet As String Application.DisplayAlerts = False Application.StatusBar = True xWsheet = ActiveWorkbook.Name Установить xFdiledialDogit = Application.FileDialDogit «Выберите папку:» Если xFd.Show = -1, то xSPath = xFd.SelectedItems (1) Иначе выйти из подпрограммы End If If Right (xSPath, 1) »« Тогда xSPath = xSPath + »« xCSVFile = Dir (xSPath & » * .csv “) Выполнить Пока xCSVFile” “Application.StatusBar =” Преобразование: “& xCSVFile Workbooks.Открыть имя файла: = xSPath & xCSVFile ActiveWorkbook.SaveAs Replace (xSPath & xCSVFile,” .csv “,” .xls “, vbTextCompare) , xlNormal ActiveWorkbook.Close Windows (xWsheet) .Activate xCSVFile = Dir Loop Application.StatusBar = False Application.DisplayAlerts = True End Sub

Изображение 4: Как массово конвертировать CSV-файлы в Excel

Шаг 4:

Наконец, щелкните значок «Выполнить» на верхней панели инструментов, как показано ниже, чтобы запустить код VBA.

Изображение 5: Как массово конвертировать CSV-файлы в Excel

Теперь отобразите папку на компьютере, чтобы мы могли выбрать папку, содержащую файл CSV, для перехода в файл Excel, нажмите ОК. Скоро код VBA запустится и преобразует файл. В конце процесса преобразования вы открываете ранее сохраненную папку с файлом CSV.

Изображение 6: Как массово конвертировать CSV-файлы в Excel

Шаг 5:

В результате мы увидим файлы XLS, как показано ниже.

Изображение 7: Как массово конвертировать CSV-файлы в Excel

2. Пакетное преобразование файла CSV в файл XLSX.

Помимо преобразования CSV в XLS, как указано выше, мы также можем легко преобразовать файлы CSV в XLSX. Во-первых, вы также открываете редактор кода VBA в Excel и вводите код, как показано ниже.

Sub CSVTOXLSX () ‘UpdatebyExtendoffice20170814 Dim xFd As FileDialog Dim xSPath As String Dim xCSVFile As String Dim xWsheet As String Application.DisplayAlerts = False Application.StatusBar = True xWsheet = ActiveWorkbook.Name Set xFdiledialDoger (m) «Выберите папку:» Если xFd.Show = -1, то xSPath = xFd.SelectedItems (1) Иначе выйти из подпрограммы End If If Right (xSPath, 1) »« Тогда xSPath = xSPath + »« xCSVFile = Dir (xSPath & » * .csv “) Выполнить, пока xCSVFile” “Application.StatusBar =” Преобразование: “& xCSVFile Workbooks.Открыть имя файла: = xSPath & xCSVFile ActiveWorkbook.SaveAs Replace (xSPath & xCSVFile,” .csv “,” .XLXS “, vbTextCompare) , xlWorkbookDefault ActiveWorkbook.Close Windows (xWsheet) .Activate xCSVFile = Dir Loop Application.StatusBar = False Application.DisplayAlerts = True End Sub

Изображение 8: Как массово конвертировать CSV-файлы в Excel

Затем нажмите кнопку «Выполнить», чтобы запустить код VBA.

Изображение 9: Как массово конвертировать CSV-файлы в Excel

Когда процесс преобразования будет завершен и откройте папку, содержащую файл CSV, вы увидите преобразованные файлы XLXS.

Изображение 10: Как массово конвертировать CSV-файлы в Excel

3. Преобразуйте файл CSV в Excel онлайн.

Инструменты онлайн-конвертации теперь также поддерживают одновременную передачу нескольких файлов, что удобно для работы пользователей. Существует множество инструментов для преобразования форматов файлов, например, Onlineconvertfree.

Мы переходим по ссылке ниже, чтобы сразу же начать преобразование CSV в XLS. Если вы хотите преобразовать в XLXS, вам нужно только изменить элемент преобразования формата. Затем нажмите «Выбрать файл», чтобы загрузить CSV-файл.

https://onlineconvertfree.com/convert-format/csv-to-xls/

Изображение 11: Как массово конвертировать CSV-файлы в Excel

Наконец, нажмите «Преобразовать», чтобы завершить преобразование.

Изображение 12: Как массово конвертировать CSV-файлы в Excel

Итак, у нас уже есть способы конвертировать серию файлов CSV в файлы Excel. Если вы не знакомы с кодом VBA в Excel, вы можете использовать инструменты онлайн-преобразования, которые также очень полезны.

Желаю успешной реализации!

Похожие записи

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *