Neste artigo, existem 3 maneiras rápidas de converter em lote documentos do Word em arquivos docx e vice-versa.
Geralmente é bem conhecido que versões diferentes do Word salvam arquivos em tipos diferentes, com extensões como .doc ou .docx. No trabalho em equipe, é provável que membros diferentes usem versões diferentes do Word. Consequentemente, isso leva à dificuldade de abrir e editar arquivos compartilhados. Por exemplo, você não pode abrir arquivos docx no Word com versões anteriores a 2007. Além disso, você pode abrir arquivos doc no Word com versões de 2007 e superiores, mas algumas das opções podem ser restritas, causando transtornos no edição.
Assim, é de grande necessidade encontrar maneiras de converter entre arquivos Word doc e docx, melhor se conseguir o processamento em lote.
Método 1: Conversão em lote de documentos do Word em arquivos Docx
- primeiro e primeiroost, organize todos os arquivos a serem processados em uma pasta de arquivos.
- Em seguida, abra o Word e pressione “Alt+F11” para abrir o editor VBA.
- Agora clique no projeto “Normal” e clique em “Inserir” depois dele.
- Em seguida escolha “Módulo” para inserir um novo módulo no projeto.
- Em seguida, clique duas vezes no módulo para abrir a área de edição e cole os seguintes códigos:
Sub TranslateDocIntoDocx() Dim objWordApplication As New Word.Application Dim objWordDocument As Word.Document Dim strFile As String Dim strFolder As String strFolder = "E:\Temp\" strFile = Dir(strFolder & "*.doc", vbNormal) While strFile <> "" Com objWordApplication Defina objWordDocument = .Documents.Open(FileName:=strFolder &strFile, AddToRecentFiles:=False, ReadOnly:=True, Visible:=False) Com 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
- Por fim, clique no botão “Executar”.
Segundos depois, você descobrirá que todos os arquivos doc foram convertidos em arquivos docx.
Nota:
Na linha de código “strPasta = “E:\Temp\””, você deve substituir o "E:\Temp.” com a localização da sua pasta de arquivos.
Método 2: Converter em lote arquivos Word Docx em arquivos Doc
- Para% starPara desativar, coloque todos os arquivos docx em uma pasta de arquivo.
- Da mesma forma, pressione “Alt+ F11” para abrir o editor VBA.
- Em seguida, siga o mesmo caminho do método 1 para inserir um novo módulo e abri-lo.
- Em seguida cole os seguintes códigos lá:
Sub TranslateDocxIntoDoc() Dim objWordApplication As New Word.Application Dim objWordDocument As Word.Document Dim strFile As String Dim strFolder As String strFolder = "E:\Temp\" strFile = Dir(strFolder & "*.docx", vbNormal) While strFile <> "" Com objWordApplication Defina objWordDocument = .Documents.Open(FileName:=strFolder & strFile, AddToRecentFiles:=False, ReadOnly:=True, Visible:=False) Com objWordDocument .SaveAs FileName:=strFolder & Replace(strFile, " docx", "doc"), FileFormat:=0 .Close End With End With strFile = Dir() Wend Set objWordDocument = Nothing Set objWordApplication = Nothing End Sub
- Por fim, pressione o botão "Executar" para start convertendo.
Ainda assim, você deve se lembrar de mudar “E:\Temp.” na linha de código “strPasta = “E:\Temp\”” para o caminho real da pasta do arquivo.
Método 3: Use o modo “Salvar como”
- Em primeiro lugar, organize todos os arquivos doc ou docx em uma pasta.
- Em segundo lugar, pressione “Ctrl” e clique para selecionar todos os arquivos.
- Em seguida, clique com o botão direito e escolha “Salvar como” no menu.
- Agora haverá várias janelas “Salvar como” aparecendo, então escolha doc ou docx para o tipo de arquivo de acordo.
- Por fim, clique em “Salvar” para fechar todas as janelas.
No entanto, devido à variedade de versões do Windows ou do Office, a opção “Salvar como” pode não estar disponível no menu contextual. Portanto, é altamente recomendável seguir as 2 formas macro para conduzir a tarefa.
Cuide da integridade de seus arquivos
Embora tenhamos apresentado 3 maneiras de converter entre arquivos Word doc e docx, esses arquivos são altamente suscetíveis a corrupções devido a erros humanos ou manuseio incorreto. Portanto, você deve fazer backup com freqüência e também manter um Utilitário de reparo de problemas em documentos do Word em caso de ocorrência de danos.
Introdução do autor:
Vera Chen é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo Ferramenta de reparo de erros de dados do Excel e pdf reparar produtos de software. Para mais informações visite www.datanumen.com
Este site me foi recomendado pelo meu primo. Não tenho certeza se isso post foi escrito por ele, pois ninguém mais sabe tão detalhadamente sobre o meu problema. Você é maravilhoso! Obrigado!
Certifique-se de adicionar o símbolo de barra invertida “\” no final do caminho do arquivo. Copiei acidentalmente o caminho da minha pasta e esqueci de adicionar a barra invertida. Isso resolveu meu problema.
O Método Um não funciona. Tinha 6 arquivos .doc. Apenas um foi convertido para .docs e esse mesmo arquivo .doc também criou um arquivo .docxx. Macro mostra ainda em execução, mas não fazendo nada.
O RECURSO SALVAR COMO NÃO FUNCIONA.