Note: The other languages of the website are Google-translated. Back to English

How to convert multiple xls files to xlsx files in Excel?

To convert an old xls Excel file to a new xlsx file, you can apply the Save As feature in Excel, but, if there are multiple xls files needed to be converted, how could deal with this task quickly and easily?

Convert multiple xls formats to xlsx formats with Save As function one by one

The Save As function in Excel can help you convert the old workbook’s xls format to new xlsx format one by one.

1. Open your workbook that you want to convert its format.

2. Click File > Save As, and a Save As dialog will display, specify a folder to place the new format of the file, and then click Save as type drop down list to choose Excel Workbook, see screenshot:

3. Then click Save button to close the dialog, and this Excel format has been converted from xls to xlsx.

Tips: With this Save As function, you just only convert one Excel file at a time, if you have hundreds of Excel files need to be converted, this method is not a good choice.

Convert multiple xls formats to xlsx formats at once with VBA code

If you want to convert multiple xls files to xlsx files at once without saving one by one, here, I will talk about a VBA code for you, please do with the following steps:

1. Hold down the ALT + F11 keys to open the Microsoft Visual Basic for Applications window.

2. Click Insert > Module, and paste the following code in the Module Window.

VBA code: Convert multiple xls formats to xlsx formats at once

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", _
xWbk.Close SaveChanges:=False
End If
strFile = Dir
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Then, press F5 key to run this code, and a window will be displayed, please select a folder which contains the xls files that you want to convert, see screenshot:

4. Then,click OK, another window is popped out, please select a folder path where you want to output the new converted files, see screenshot:

5. And then, clik OK, after finishing the conversion, you can go to the specified folder to preview the converted result, see screenshots:

Convert multiple xls formats to xlsx formats at once with a powerful feature

With this Kutools for Excel’s Format Converter utility, you can convert multiple xls formats to xlsx formats or vise versa, it also can help you convert multiple workbooks to PDF files at one.

Note:To apply this Format Converter, firstly, you should download the Kutools for Excel, and then apply the feature quickly and easily.

After installing Kutools for Excel, please do as this:

1. Click Kutools Plus > Workbook > Format Converter, see screenshot:

2. And a promt box will pop out to remind you must close the workbook that you want to convert. See screenshot:

3. Click OK, then, in the File Format Converter dialog, specify the following options:

  • Under the Convert type drop down list, select Excel 97-2003 to Excel 2007 or higher;
  • Then click Add button to add the xls files that you want to convert, you can add the workbooks from your computor disk or OneDrive as you need;

4. After inserting the xls files, still in the File Format Converter dialog box, please click button to choose one folder path to output the converted files, and then specify some operations you need at the bottom of the dialog box, see screenshot:

Notes: In the above dialog box:
  • If the workbooks in the subfolders needed to be converted as well, please check the Include subfolders when adding folders check box;
  • If you want to remove the original files after converting, please check the Delete source files after conversion box;
  • If you want to keep the modified date of original files, please check the Keep modified date of original files box;
  • The directory structure of the file can be retained by checking the The directory structure of the file is preserved when converted box;

5. Then click OK to start converting, after finishing the conversion, you can go to the specific folder to preview the converted result. See screenshots:

The Best Office Productivity Tools

Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%

  • Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
  • Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
  • Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
  • Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
  • Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
  • Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
  • Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
  • Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
  • More than 300 powerful features. Supports Office / Excel 2007-2021 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.
kte tab 201905

Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
officetab bottom
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Can you save a xls as a xlsx and maintain 1,048,576 rows and XFD Columns?
This comment was minimized by the moderator on the site
Thanks so much for the VBA CODE. Very Useful
This comment was minimized by the moderator on the site
Thank You!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations

Follow Us

Copyright © 2009 - | All rights reserved. Powered by ExtendOffice. | Sitemap
Microsoft and the Office logo are trademarks or registered trademarks of Microsoft Corporation in the United States and/or other countries.
Protected by Sectigo SSL