¿Cómo convertir varios archivos xls a archivos xlsx en Excel?
Para convertir un antiguo archivo xls de Excel en un nuevo archivo xlsx, puede aplicar la función Guardar como en Excel, pero, si hay que convertir varios archivos xls, ¿cómo podría hacer frente a esta tarea de forma rápida y sencilla?
- Convierta varios formatos xls a formatos xlsx con la función Guardar como uno por uno
- Convierta múltiples formatos xls a formatos xlsx a la vez con código VBA
- Convierta múltiples formatos xls a formatos xlsx a la vez con una característica poderosa
- Convierta varios libros de trabajo en archivos PDF a la vez
Convierta varios formatos xls a formatos xlsx con la función Guardar como uno por uno
La función Guardar como en Excel puede ayudarlo a convertir el formato xls del libro antiguo al nuevo formato xlsx uno por uno.
1. Abra su libro de trabajo que desea convertir su formato.
2. Hacer clic Archive > Guardar como, Y un Guardar como aparecerá el cuadro de diálogo, especifique una carpeta para colocar el nuevo formato del archivo, y luego haga clic en Guardar como tipo lista desplegable para elegir Libro de Excel, ver captura de pantalla:
3. Luego haga clic Guardar para cerrar el cuadro de diálogo, y este formato de Excel se ha convertido de xls a xlsx.
Convierta múltiples formatos xls a formatos xlsx a la vez con código VBA
Si desea convertir varios archivos xls a archivos xlsx a la vez sin guardar uno por uno, aquí, hablaré sobre un código VBA para usted, siga los siguientes pasos:
1. Mantenga pulsado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Módulo Ventana.
Código VBA: convierta múltiples formatos xls a formatos xlsx a la 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. Entonces presione F5 para ejecutar este código, y se mostrará una ventana, seleccione una carpeta que contenga los archivos xls que desea convertir, vea la captura de pantalla:
4. Luego, haga clic en OK, se abre otra ventana, seleccione la ruta de la carpeta donde desea generar los nuevos archivos convertidos, vea la captura de pantalla:
5. Y luego, clik OK, después de finalizar la conversión, puede ir a la carpeta especificada para obtener una vista previa del resultado convertido, ver capturas de pantalla:
Convierta múltiples formatos xls a formatos xlsx a la vez con una característica poderosa
Con este Kutools for Excel, Convertidor de formato utilidad, puede convertir múltiples formatos xls a formatos xlsx o viceversa, también puede ayudarlo a convertir múltiples libros de trabajo en archivos PDF a la vez.
Después de instalar Kutools for Excel, haz lo siguiente:
1. Hacer clic Kutools Más > Libro de trabajo > Convertidor de formato, ver captura de pantalla:
2. Y aparecerá un cuadro de aviso para recordarle que debe cerrar el libro de trabajo que desea convertir. Ver captura de pantalla:
3. Hacer clic OK, luego, en el Convertidor de formato de archivo diálogo, especifique las siguientes opciones:
- Bajo la Tipo de conversión lista desplegable, seleccione Excel 97-2003 a Excel 2007 o superior;
- A continuación, haga clic en Añada botón para agregar los archivos xls que desea convertir, puede agregar los libros de trabajo desde su disco computor o OneDrive según lo necesite;
4. Después de insertar los archivos xls, todavía en el Convertidor de formato de archivo cuadro de diálogo, haga clic en para elegir una ruta de carpeta para generar los archivos convertidos, y luego especificar algunas operaciones que necesita en la parte inferior del cuadro de diálogo, vea la captura de pantalla:
- Si los libros de trabajo de las subcarpetas también debían convertirse, consulte la Incluir subcarpetas al agregar carpetas casilla de verificación;
- Si desea eliminar los archivos originales después de la conversión, marque la casilla Eliminar archivos de origen después de la conversión caja;
- Si desea mantener la fecha de modificación de los archivos originales, marque la Conservar la fecha de modificación de los archivos originales caja;
- La estructura del directorio del archivo se puede conservar marcando el La estructura de directorios del archivo se conserva cuando se convierte caja;
5. Luego haga clic OK para comenzar a convertir, después de finalizar la conversión, puede ir a la carpeta específica para obtener una vista previa del resultado convertido. Ver capturas de pantalla:
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!