Christian ha una cartella piena di file DOC che deve convertire in file DOCX. Si chiede se esiste un modo rapido per convertirli senza aprirli e salvarli singolarmente.

Microsoft non fornisce questa funzionalità in Word, né fornisce un componente aggiuntivo per eseguire le conversioni. Tuttavia, puoi creare la tua macro per eseguire le conversioni. Un approccio piuttosto semplice è mostrato qui:

Sub ConvertBatchToDOCX()

Dim sSourcePath As String     Dim sTargetPath As String     Dim sDocName As String     Dim docCurDoc As Document     Dim sNewDocName As String

' Looking in this path     sSourcePath = "c:\Users\Administrator\Desktop\Testing\"

sTargetPath = "c:\Users\Administrator\Desktop\Converted\"



' Look for first DOC file     sDocName = Dir(sSourcePath & "*.doc")

Do While sDocName <> ""

' Repeat as long as there are source files                  'Only work on files where right-most characters are ".doc"

If Right(sDocName, 4) = ".doc" Then             ' Open file             Set docCurDoc = Documents.Open(FileName:=sSourcePath & sDocName)



sNewDocName = Replace(sDocName, ".doc", ".docx")



With docCurDoc                 .SaveAs FileName:=sTargetPath & sNewDocName, _                   FileFormat:=wdFormatDocumentDefault                 .Close SaveChanges:=wdDoNotSaveChanges             End With         End If         ' Get next source file name         sDocName = Dir     Loop     MsgBox "Finished"

End Sub

Per poter utilizzare la macro, dovrai apportare due modifiche. In primo luogo, specificare nella variabile sSourcePath il percorso completo (seguito da una barra rovesciata) alla directory che contiene i file che si desidera convertire.

Quindi, nella variabile sTargetPath, specificare il percorso completo (con barra rovesciata finale) della directory in cui devono essere archiviati i documenti convertiti.

La macro quindi passa attraverso tutti i file DOC che trova nella directory di origine, li apre e li salva come file DOCX nella directory di destinazione.

Nota che ho detto che questo è un approccio semplice. Il motivo è perché non esegue il controllo degli errori sul suo lavoro. Ad esempio, se si esegue questa macro due volte di seguito, si ottengono errori perché i file salvati nella directory di destinazione esistono già. Inoltre, dovresti capire che questo converte tutti i file DOC in file DOCX. In altre parole, se il file originale contiene delle macro, queste verranno rimosse durante il processo di conversione.

Infine, si noti che il cuore della macro è contenuto in una struttura If / Then che verifica che i 4 caratteri più a destra del nome del file siano effettivamente “.doc”. Ciò viene fatto a causa del comportamento piuttosto aggravante della funzione Dir su alcuni sistemi in cui la ricerca del modello “* .doc” restituirà come corrispondenza qualsiasi nome di file che contains .doc. Ciò significa che restituisce anche file che terminano con .docx e .docm. Ovviamente, questi non dovrebbero essere convertiti, quindi la struttura If / Then è inclusa per eliminarli.

Se preferisci non utilizzare la tua macro, ci sono soluzioni di terze parti che potresti usare. La pagina seguente sul sito di Graham Mayor presenta un componente aggiuntivo gratuito che, tra le altre cose, eseguirà la conversione del documento:

http://www.gmayor.com/document_batch_processes.htm

Potresti essere in grado di individuare altri convertitori simili eseguendo una ricerca sul web per “convertitore doc docx” (senza virgolette).

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

WordTips è la tua fonte di formazione economica su Microsoft Word.

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (643) si applica a Microsoft Word 2007, 2010, 2013 e 2016.