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:
- Se as pastas de trabalho nas subpastas também precisarem ser convertidas, marque a caixa de seleção Incluir subpastas ao adicionar pastas;
- Se você deseja remover os arquivos originais após a conversão, marque a caixa Excluir arquivos de origem após a conversão;
- Se você deseja manter a data de modificação dos arquivos originais, marque a caixa Manter a hora de modificação dos arquivos de origem;
- A estrutura de diretórios dos arquivos pode ser mantida marcando a caixa Preservar a estrutura de diretórios dos arquivos durante a conversão;
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:
| | |
Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins