Как преобразовать несколько файлов xls в файлы xlsx в Excel?
Чтобы преобразовать старый файл Excel XLS в новый формат 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. Нажмите кнопку ОК. Появится новое окно — выберите папку и укажите путь для сохранения преобразованных файлов. См. снимок экрана:
5. Нажмите кнопку ОК. После завершения преобразования перейдите в указанную папку, чтобы просмотреть результаты.
 |  |  |
Преобразование нескольких файлов формата xls в формат xlsx одновременно с помощью мощной функции
С помощью утилиты Kutools для Excel и её функции Пакетное преобразование вы можете мгновенно конвертировать сразу несколько файлов из формата .xls в .xlsx и обратно, а также пакетно сохранять книги в формате PDF.
1. Нажмите кнопку KUTOOLS PLUS > Книга > Пакетное преобразование. См. снимок экрана:
2. Появится всплывающее окно с напоминанием о необходимости закрыть книгу, которую вы хотите преобразовать. См. снимок экрана:
3. Нажмите кнопку ОК, затем в диалоговом окне Пакетное преобразование укажите следующие параметры:
- В раскрывающемся списке Тип преобразованиявыберите Преобразовать Excel 97-2003 в Excel 2007 или более позднюю версию;
- Затем нажмите кнопку Добавить, чтобы выбрать файлы XLS для преобразования. При необходимости вы можете добавлять книги как с компьютера, так и из OneDrive.
4. После добавления файлов XLS в диалоговом окне Пакетное преобразование нажмите кнопку 
, чтобы выбрать путь для сохранения преобразованных файлов, а затем укажите нужные операции в нижней части диалогового окна. См. снимок экрана:
- Если книги в подпапках также необходимо преобразовать, установите флажок Включить подпапки при добавлении папокФлажок;
- Если вы хотите удалить исходные файлы после преобразования, установите флажок Удалить исходные файлы после конвертации;
- Если вы хотите Сохранить дату изменения исходных файлов, установите флажок Сохранять Время изменения исходных файлов;
- Структура каталогов файла может быть сохранена при установке флажка Сохранить структуру каталога файлов во время преобразования;
5. Затем нажмите кнопку ОК, чтобы начать преобразование. После завершения перейдите в указанную папку и ознакомьтесь с результатами. См. снимки экрана:
| | |
Kutools для Excel— раскройте весь потенциал Excel с помощью более чем 300 незаменимых инструментов, которые ускоряют и упрощают вашу работу, а также воспользуйтесь возможностями ИИ для более разумной обработки данных и повышения продуктивности.Получить сейчас
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек