Как преобразовать несколько файлов xls в файлы xlsx в Excel?
Чтобы преобразовать старый файл xls Excel в новый файл xlsx, вы можете применить функцию «Сохранить как» в Excel, но, если необходимо преобразовать несколько файлов xls, как можно быстро и легко справиться с этой задачей?
- Преобразование нескольких форматов xls в форматы xlsx с помощью функции «Сохранить как» один за другим
- Преобразование нескольких форматов xls в форматы xlsx одновременно с помощью кода VBA
- Преобразуйте несколько форматов xls в форматы xlsx одновременно с помощью мощной функции
- Преобразование нескольких книг в файлы PDF одновременно
Преобразование нескольких форматов xls в форматы xlsx с помощью функции «Сохранить как» один за другим
Функция «Сохранить как» в Excel может помочь вам преобразовать формат xls старой книги в новый формат xlsx по одному.
1. Откройте книгу, формат которой вы хотите преобразовать.
2. Нажмите Файл > Сохранить какИ Сохранить как появится диалоговое окно, укажите папку для размещения нового формата файла и нажмите Сохранить как выпадающий список для выбора Книга Excel, см. снимок экрана:
3. Затем нажмите Сохранить кнопку, чтобы закрыть диалоговое окно, и этот формат Excel был преобразован из xls в xlsx.
Преобразование нескольких форматов xls в форматы xlsx одновременно с помощью кода VBA
Если вы хотите преобразовать несколько файлов xls в файлы xlsx одновременно, не сохраняя один за другим, здесь я расскажу вам о коде VBA, выполните следующие действия:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: одновременное преобразование нескольких форматов xls в форматы xlsx
Sub ConvertToXlsx()
'Updateby Extendoffice
Dim strPath As String
Dim strFile As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath As String
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the xls files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a folder for outputting the new files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
strFile = Dir(strPath & "*.xls")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While strFile <> ""
If Right(strFile, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & strFile)
xWbk.SaveAs Filename:=xRPath & strFile & "x", _
FileFormat:=xlOpenXMLWorkbook
xWbk.Close SaveChanges:=False
End If
strFile = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится окно, выберите папку, содержащую файлы xls, которые вы хотите преобразовать, см. снимок экрана:
4. Затем щелкните OK, появится другое окно, выберите путь к папке, в которую вы хотите вывести новые преобразованные файлы, см. снимок экрана:
5. А затем нажмите OK, после завершения конвертации вы можете перейти в указанную папку для предварительного просмотра конвертированного результата, см. скриншоты:
Преобразуйте несколько форматов xls в форматы xlsx одновременно с помощью мощной функции
С этой Kutools for ExcelАвтора Конвертер формата утилита, вы можете конвертировать несколько форматов xls в форматы xlsx или наоборот, она также может помочь вам конвертировать несколько книг в файлы PDF одновременно.
После установки Kutools for Excel, пожалуйста, сделайте так:
1. Нажмите Кутулс Плюс > Workbook > Конвертер формата, см. снимок экрана:
2. Появится всплывающее окно с напоминанием о том, что вам необходимо закрыть книгу, которую вы хотите преобразовать. Смотрите скриншот:
3. Нажмите OK, то в Конвертер форматов файлов диалоговом окне укажите следующие параметры:
- Под Тип преобразования раскрывающийся список, выберите Excel 97-2003 в Excel 2007 или выше;
- Затем нажмите Добавить кнопку, чтобы добавить файлы xls, которые вы хотите преобразовать, вы можете добавить книги со своего компьютерного диска или OneDrive по мере необходимости;
4. После вставки файлов xls, все еще в папке Конвертер форматов файлов диалоговое окно, щелкните кнопку, чтобы выбрать путь к одной папке для вывода преобразованных файлов, а затем указать некоторые операции, которые вам нужны, в нижней части диалогового окна, см. снимок экрана:
- Если книги во вложенных папках также необходимо преобразовать, проверьте Включать подпапки при добавлении папок флажок;
- Если вы хотите удалить исходные файлы после преобразования, проверьте Удалить исходные файлы после конвертации коробка;
- Если вы хотите сохранить дату изменения исходных файлов, проверьте Сохранить дату изменения исходных файлов коробка;
- Структуру каталогов файла можно сохранить, установив флажок Структура каталогов файла сохраняется при преобразовании коробка;
5. Затем нажмите OK Чтобы начать преобразование, после завершения преобразования вы можете перейти в определенную папку, чтобы просмотреть преобразованный результат. Смотрите скриншоты:
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!