Como converter vários arquivos xls para xlsx no Excel?

Para converter um arquivo XLS antigo do Excel para o novo formato XLSX, você pode usar o recurso Salvar Como no Excel. No entanto, se precisar converter vários arquivos XLS de uma só vez, como você pode lidar com essa tarefa de forma eficiente?

• Converter vários formatos xls para xlsx usando a função Salvar Como um por um
• Converter vários formatos xls para xlsx de uma só vez com código VBA
• Converter vários formatos xls para xlsx de uma só vez com um recurso poderoso
• Converter várias pastas de trabalho para arquivos PDF de uma só vez

Converter vários formatos xls para xlsx usando a função Salvar Como um por um

A função Salvar Como no Excel pode ajudá-lo a converter o formato antigo da pasta de trabalho de xls para o novo formato xlsx um por um.

1. Abra sua pasta de trabalho que deseja converter seu formato.

2. Clique em Arquivo > Salvar Como, e uma caixa de diálogo Salvar Como será exibida, especifique uma pasta para colocar o novo formato do arquivo e, em seguida, clique na lista suspensa Tipo de salvamento para escolher Pasta de Trabalho do Excel, veja a captura de tela:

3. Em seguida, clique no botão Salvar para fechar a caixa de diálogo, e este formato do Excel foi convertido de xls para xlsx.

Converter vários formatos xls para xlsx de uma só vez com código VBA

Se você quiser converter vários arquivos xls para xlsx de uma só vez sem salvar um por um, aqui, vou falar sobre um código VBA para você, por favor, siga os seguintes passos:

1. Mantenha pressionado as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, e cole o seguinte código na Janela do Módulo.

Código VBA: Converter vários formatos xls para xlsx de uma só vez

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. Pressione a tecla F5 para executar este código, e uma janela será exibida, por favor, selecione uma pasta que contém os arquivos xls que você deseja converter, veja a captura de tela:

4. Clique em OK, outra janela aparecerá, por favor, selecione um caminho de pasta onde você deseja gerar os novos arquivos convertidos, veja a captura de tela:

5. Clique em OK. Uma vez concluída a conversão, navegue até a pasta especificada para visualizar os resultados.

Converter vários formatos xls para xlsx de uma só vez com um recurso poderoso

Com este utilitário Conversor de Formatos do Kutools para Excel, você pode converter vários formatos xls para xlsx ou vice-versa, ele também pode ajudá-lo a converter várias pastas de trabalho para arquivos PDF de uma só vez.

1. Clique em Kutools Plus > Pasta de Trabalho > Conversor de Formatos, veja a captura de tela:

2. E uma caixa de aviso aparecerá para lembrá-lo de que deve fechar a pasta de trabalho que deseja converter. Veja a captura de tela:

3. Clique em OK, depois, na caixa de diálogo Conversor de Formatos de Arquivo, especifique as seguintes opções:

• Na lista suspensa Tipo de Conversão, selecione Converter do Excel 97-2003 para o Excel 2007 ou posterior;
• Em seguida, clique no botão Adicionar para adicionar os arquivos xls que você deseja converter. Você pode adicionar pastas de trabalho do disco do computador ou do OneDrive conforme necessário.

4Após inserir os arquivos xls, ainda na Conversor de Formatos de Arquivo caixa de diálogo, por favor, clique no botão para escolher um caminho de pasta para gerar os arquivos convertidos e, em seguida, especifique algumas operações de que precisa na parte inferior da caixa de diálogo, veja a captura de tela:

5. Em seguida, clique em OK para iniciar a conversão. Após concluir a conversão, navegue até a pasta especificada para visualizar os resultados. Veja as capturas de tela: