¿Cómo convertir por lotes archivos de formato .doc a .docx en Word?

Suponiendo que haya recibido algunos documentos de Word en formato 97-2003, ¿cómo puede convertir por lotes todos estos documentos en formato .doc a formato .docx a la vez? Este artículo le mostrará dos métodos para resolver este problema.

Conversión por lotes de archivos de formato .doc a .docx con código VBA

Convierta por lotes archivos de formato .doc a .docx con Kutools para Word

Conversión por lotes de archivos de formato .doc a .docx con código VBA

Esta sección le mostrará el código VBA para convertir todos los documentos en formato .doc en una carpeta específica a documentos .docx a la vez. Por favor, haga lo siguiente.

1. Recopile todos los documentos en formato .doc que convertirá a .docx en una carpeta específica.

2. presione el otro + F11 clave para abrir el Microsoft Visual Basic para aplicaciones ventana.

3. En la ventana, haz clic recuadro > Módulo. Luego copie debajo del código VBA en la ventana del Módulo.

Código VBA: convierte por lotes todos los documentos en formato .doc a .docx en una carpeta determinada

Sub ConvertDocToDocx()
'Updated by ExtendOffice 20181128
    Dim xDlg As FileDialog
    Dim xFolder As Variant
    Dim xFileName As String
    Application.ScreenUpdating = False
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show <> -1 Then Exit Sub
    xFolder = xDlg.SelectedItems(1) + "\"
    xFileName = Dir(xFolder & "*.doc", vbNormal)
    While xFileName <> ""
        Documents.Open FileName:=xFolder & xFileName, _
            ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
            PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
            WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
            wdOpenFormatAuto, XMLTransform:=""
        ActiveDocument.SaveAs xFolder & Replace(xFileName, "doc", "docx"), wdFormatDocumentDefault
        ActiveDocument.Close
        xFileName = Dir()
    Wend
    Application.ScreenUpdating = True
End Sub

4. presione el F5 clave para ejecutar el código. En la apertura Buscar ventana, seleccione la carpeta que contiene los documentos en formato .doc y haga clic en OK. Ver captura de pantalla:

Luego, todos los documentos en formato .doc se convierten a documentos .docx inmediatamente como se muestra en la siguiente captura de pantalla.

Convierta por lotes archivos de formato .doc a .docx con Kutools para Word

Se recomendará una utilidad práctica en esta sección. Con el Doc / Docx utilidad de Kutools for Word, puede convertir fácilmente todos los documentos en formato .doc de una carpeta a documentos .docx. Por favor, intente lo siguiente.

Kutools for Word : Con más de 100 prácticos complementos de Word, gratis para probar sin limitaciones en los días 30.

1. Recopile todos los documentos en formato .doc en una carpeta específica, luego haga clic en Kutools Más > Doc / Docx. Ver captura de pantalla:

2. En el Convertidor de formato de documento cuadro de diálogo, debe hacer lo siguiente:

2.1) Seleccione la carpeta que contiene documentos en formato .doc en el Carpeta de archivos de origen sección;

2.2) Seleccionar Convertir doc a docx del Formato de conversión la lista desplegable;

2.3) Por defecto, el Ruta de destino igual que la fuente casilla está marcada. Si desea colocar todos los documentos .docx convertidos en la misma carpeta, mantenga esta opción seleccionada;

Si desea separar los documentos .docx y los documentos .doc de origen, desmarque la casilla Ruta de destino igual que la fuente y seleccione una nueva carpeta para guardar los documentos .docx en el Salvar a caja;

2.4) Haga clic en Inicio botón. Ver captura de pantalla:

3. Luego aparece un cuadro de diálogo que le indica cuántos documentos se han convertido con éxito, haga clic en OK botón y cierra el Convertidor de formato de documento ventana.

Ahora todos los documentos en formato .doc se convierten a archivos .docx. Ver captura de pantalla:

Si desea tener una versión de prueba gratuita de esta utilidad, vaya a descargar gratis el software primero, y luego vaya a aplicar la operación de acuerdo a los pasos anteriores.

Kutools para Outlook: ¡trae las características avanzadas de 100 a Outlook y hace el trabajo mucho más fácil!

• Auto CC / BCC por reglas al enviar correos electrónicos; Reenvío automático Múltiples correos electrónicos por encargo; Respuesta automática sin servidor de intercambio y más funciones automáticas ...
• Advertencia BCC - muestra un mensaje cuando intentas responder a todos si su dirección de correo está en la lista de BCC; Recordar cuando faltan archivos adjuntos, y más funciones de recordatorio ...
• Responder (todos) con todos los archivos adjuntos en la conversación de correo; Responder muchos correos electrónicos en segundos; Agregar saludo automáticamente cuando responda; Agregar fecha en asunto ...
• Herramientas de archivos adjuntos: administre todos los archivos adjuntos en todos los correos, Separación automática, Comprimir todo, Renombrar todo, Guardar todo ... Informe rápido, Contar correos seleccionados...
• Potentes correos basura por costumbre; Eliminar contactos y correos duplicados... Le permite hacer más inteligente, más rápido y mejor en Outlook.

Leer más ... Descargar ahora...