☰

¿Convertir por lotes .doc a .docx (y equivalente para otros formatos de Office)?

tag-icon • tag-icon windows-xp microsoft-office conversion batch
¿Convertir por lotes .doc a .docx (y equivalente para otros formatos de Office)?

Deseo convertir una gran cantidad de archivos de Office a las versiones más nuevas, por ejemplo. .doc a .docx. Necesito algo para todos los diferentes tipos de archivos de aplicaciones de MS Office.

¿Cuál es la mejor herramienta para el trabajo (Windows XP)?

Estoy buscando algo gratis (cerveza) y puedo administrar una gran cantidad de archivos (hacer esto abriendo archivos manualmente simplemente no es viable).

Gracias.

Respuesta1

La respuesta está estructurada para convertir todos los documentos, no sólo los documentos de Word.

Supongamos que tiene toneladas de hojas de Excel, presentaciones de PowerPoint y documentos de Word en su computadora que fueron escritos en Office XP o 2003. ¿Cómo se convierten todos estos archivos al nuevo formato de Office 2007?

Una opción es abrirlos todos en el programa de Office asociado y guardarlos manualmente en el formato más nuevo (docx, xlsx o pptx). O sigue estos pasos y convierte todos los documentos de una sola vez.

Paso 1: DescargarKit de administrador de migracióny extráigalo en una nueva carpeta, digamos: c:\office.

paquete de oficina

Paso 2: descargue e instale elPaquete de oficina- Este paso es necesario incluso si ya tiene Microsoft Office 2007 instalado en su computadora.

Paso 3: Suponiendo que extrajo los archivos de Office Manager en el directorio c:\office, vaya a c:\office\tools, abra ofc.ini con el bloc de notas y agregue la siguiente línea.

fldr=c:\usuarios\labnol\documentos

Esto se refiere a la ubicación de la carpeta que contiene los archivos de Office. Estoy apuntando esto a mi carpeta Documentos, pero podría ser diferente en su máquina.

Paso 4: abra el símbolo del sistema y vaya a c:\office\tools. Allí verá una utilidad llamada ofc.exe: este es el convertidor de archivos de Office que convertirá todos los archivos antiguos de Office al nuevo formato de documentos de Office 2007 de forma masiva. Correr.

convertir-docs

Inmediatamente, todos los archivos antiguos de Office en esa carpeta (y subcarpetas) se convertirán al nuevo formato y se guardarán en una carpeta nueva.

Esta utilidad funciona con archivos de Word (doc a docx), bases de datos de Access, PowerPoint (ppt a pptx), diagramas de Visio, Excel (xls a xlsx) y Microsoft Project. Sin embargo, la conversión puede fallar en el caso de documentos protegidos con contraseña.

Tomado deaquí.

Respuesta2

La siguientemacro vbaconvertirá todos los documentos en una carpeta seleccionada

Sub SaveAllAsDOCX()
Dim strFileName As String
Dim strDocName As String
Dim strPath As String
Dim oDoc As Document

With Dialogs(wdDialogCopyFile)
If .Display <> 0 Then
strPath = .Directory
Else
MsgBox "Cancelled by User"
Exit Sub
End If
End With

If Documents.Count > 0 Then
Documents.Close SaveChanges:=wdPromptToSaveChanges
End If
If Left(strPath, 1) = Chr(34) Then
strPath = Mid(strPath, 2, Len(strPath) - 2)
End If
strFileName = Dir$(strPath & "*.doc")

While Len(strFileName) <> 0
Set oDoc = Documents.Open(strPath & strFileName)

strDocName = ActiveDocument.FullName
intPos = InStrRev(strDocName, ".")
strDocName = Left(strDocName, intPos - 1)
strDocName = strDocName & ".docx"
oDoc.SaveAs FileName:=strDocName, _
FileFormat:=wdFormatDocumentDefault
oDoc.Close SaveChanges:=wdDoNotSaveChanges
strFileName = Dir$()
Wend
End Sub

crédito aAlcalde de Graham - MVP de la palabra

Respuesta3

Conversión masiva de DOC a DOCX

Microsoft tiene una utilidad de conversión masiva que puede convertir varios archivos DOC en archivos DOCX. Esta publicación de blog presenta información muy básica sobre su uso.

Respuesta4

No puedo atribuirme el mérito de esta solución ya que la obtuve deForos de Microsoft. Publicando aquí por conveniencia:

  1. Coloque todos los archivos .doc en una carpeta, por ejemplo, **D:\doc**.

  2. Abra Word y presione Alt+ F11para abrir el editor VBA.

  3. Ahora haga clic en "Normal"proyecto y haga clic en"Insertar” > “Módulo”para insertar un nuevo módulo en el proyecto.

  4. Haga doble clic en el módulo para abrir el área de edición y pegue el siguiente código:

     Sub TranslateDocIntoDocx()
   Dim objWordApplication As New Word.Application
   Dim objWordDocument As Word.Document
   Dim strFile As String
   Dim strFolder As String

   strFolder = "D:\doc\"
   strFile = Dir(strFolder & "*.doc", vbNormal)

   While strFile <> ""
     With objWordApplication      
       Set objWordDocument = .Documents.Open(FileName:=strFolder &strFile, AddToRecentFiles:=False, ReadOnly:=True, Visible:=False)

       With objWordDocument
         .SaveAs FileName:=strFolder & Replace(strFile, "doc", "docx"), FileFormat:=16
         .Close
       End With
     End With
     strFile = Dir()
   Wend   

   Set objWordDocument = Nothing
   Set objWordApplication = Nothing
 End Sub

  5. Haga clic en "Correr" botón. Segundos después, encontrará que todos los archivos .doc se han convertido a archivos .docx. Los archivos .doc originales permanecerán.

información relacionada