☰

Converter em lote .doc para .docx (e equivalente para outros formatos de escritório)?

tag-icon • tag-icon windows-xp microsoft-office conversion batch
Converter em lote .doc para .docx (e equivalente para outros formatos de escritório)?

Desejo converter um grande número de arquivos do Office para versões mais recentes, por exemplo. .doc para .docx. Eu preciso de algo para todos os diferentes tipos de arquivos de aplicativos do MS Office.

Qual a melhor ferramenta para o trabalho (Windows XP)?

Estou procurando algo grátis (cerveja) e posso gerenciar um grande número de arquivos (fazer isso abrindo arquivos manualmente não é viável).

Obrigado.

Responder1

A resposta está estruturada para converter todos os documentos, não apenas documentos do Word.

Digamos que você tenha toneladas de planilhas do Excel, apresentações do PowerPoint e documentos do Word em seu computador que foram escritos no Office XP ou 2003. Como você converte todos esses arquivos para o novo formato do Office 2007.

Uma opção é abrir todos eles no programa Office associado e salvá-los manualmente no formato mais recente (docx, xlsx ou pptx). Ou siga estas etapas e converta todos os documentos de uma só vez.

Etapa 1: baixarKit Gerenciador de Migraçãoe extraia-o para uma nova pasta - digamos: c:\office.

pacote de escritório

Passo 2: Baixe e instale oPacote de escritório- esta etapa é necessária mesmo se você já tiver o Microsoft Office 2007 instalado em seu computador.

Etapa 3: Supondo que você extraiu os arquivos do Office Manager no diretório c:\office, vá para c:\office\tools, abra ofc.ini usando o bloco de notas e adicione a seguinte linha.

fldr=c:\usuários\labnol\documentos

Refere-se ao local da pasta que contém seus arquivos do Office. Estou apontando isso para minha pasta Documentos, mas pode ser diferente na sua máquina.

Passo 4: Abra o prompt de comando e vá para c:\office\tools. Lá você verá um utilitário chamado ofc.exe - este é o Office File Converter que converterá todos os arquivos antigos do Office para o novo formato de documento do Office 2007 em massa. Correr.

converter-docs

Imediatamente, todos os arquivos antigos do Office nessa pasta (e subpastas) serão convertidos para o novo formato e salvos em uma nova pasta.

Este utilitário funciona com Word (doc para docx), bancos de dados Access, PowerPoint (ppt para pptx), diagramas Visio, Excel (xls para xlsx) e arquivos do Microsoft Project. No entanto, a conversão pode falhar em documentos protegidos por senha.

Tirado deaqui.

Responder2

A seguirmacro vbairá converter todos os documentos em uma pasta selecionada

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 paraGraham Mayor - MVP do Word

Responder3

Converter em massa DOC para DOCX

A Microsoft possui um utilitário de conversão em massa que pode converter vários arquivos DOC em arquivos DOCX. Esta postagem do blog apresenta informações muito básicas sobre seu uso.

Responder4

Não posso receber crédito por esta solução, pois a obtive deFóruns da Microsoft. Repostando aqui por conveniência:

  1. Coloque todos os arquivos .doc em uma pasta, por exemplo, **D:\doc**.

  2. Abra o Word e pressione Alt+ F11para abrir o editor VBA.

  3. Agora clique em “Normal”projeto e clique em“Inserir” > “Módulo” para inserir um novo módulo no projeto.

  4. Clique duas vezes no módulo para abrir a área de edição e cole o seguinte 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. Clique em “Correr" botão. Segundos depois, você descobrirá que todos os arquivos .doc foram convertidos em arquivos .docx. Os arquivos .doc originais permanecerão.

informação relacionada