U ovom članku postoje 3 brza načina za grupno pretvaranje Word doc datoteka u docx datoteke i obrnuto.
Općenito je poznato da različite verzije Worda spremaju datoteke u različitim vrstama, s nastavcima poput .doc ili .docx. U timskom radu vjerojatno je da različiti članovi koriste različite verzije Worda. Posljedično, to dovodi do poteškoća pri otvaranju i uređivanju datoteka za dijeljenje. Na primjer, ne možete otvoriti docx datoteke u Wordu s ranijom verzijom prije 2007. Osim toga, možda ćete moći otvoriti doc datoteke u Wordu s verzijom 2007 i novijim, ali neke od opcija mogu biti ograničene, uzrokujući neugodnosti u uređivanje.
Stoga je od velike potrebe pronaći načine za pretvorbu između Word doc i docx datoteka, bolje ako se može postići skupna obrada.
Metoda 1: Skupno pretvaranje Word Doc u Docx datoteke
- Prvi i prviost, organizirajte sve datoteke za obradu u jednu mapu datoteka.
- Zatim otvorite Word i pritisnite “Alt+ F11” da otvorite VBA editor.
- Sada kliknite "Normal" projekt i kliknite "Insert" nakon njega.
- Zatim odaberite “Modul” za umetanje novog modula u projekt.

- Zatim dvaput kliknite na modul da biste otvorili područje za uređivanje i zalijepite sljedeće kodove:
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 <> ""
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
- Na kraju kliknite gumb "Pokreni".
Nekoliko sekundi kasnije, vidjet ćete da su sve doc datoteke pretvorene u docx datoteke.
Bilješka:
U retku koda "strFolder = “E:\Temp\””, trebali biste zamijeniti "E:\temp” s lokacijom vaše mape datoteke.
Metoda 2: Skupno pretvaranje Word Docx datoteka u Doc datoteke
- Za start isključeno, smjestite sve docx datoteke u jednu mapu datoteka.
- Slično, pritisnite “Alt+ F11” da biste otvorili VBA editor.
- Zatim slijedite isti način iz metode 1 da biste umetnuli novi modul i otvorili ga.
- Zatim tamo zalijepite sljedeće kodove:
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 <> "" With objWordApplication Set objWordDocument = .Documents.Open(FileName:=strFolder & strFile, AddToRecentFiles:=False, ReadOnly:=True, Visible:=False) With 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
- Na kraju pritisnite gumb "Pokreni" da start pretvaranje.
Ipak se morate sjetiti da se promijenite "E:\temp" u retku koda "strFolder = “E:\Temp\”” do vaše stvarne staze mape datoteke.
Metoda 3: Koristite način "Spremi kao".
- Najprije posložite sve doc ili docx datoteke u jednu mapu.
- Zatim pritisnite “Ctrl” i kliknite za odabir svih datoteka.
- Zatim desnom tipkom miša kliknite i odaberite "Spremi kao" na izborniku.
- Sada će se pojaviti više prozora "Spremi kao", stoga odaberite doc ili docx za vrstu datoteke u skladu s tim.
- Na kraju kliknite "Spremi" da zatvorite sve prozore.
Međutim, zbog raznolikosti verzija sustava Windows ili Office, opcija "Spremi kao" možda neće biti dostupna na kontekstualnom izborniku. Stoga se visoko preporučuje korištenje 2 makronačina za izvođenje zadatka.
Pazite na integritet svoje datoteke
Iako smo predstavili 3 načina pretvorbe između Word doc i docx datoteka, te su datoteke vrlo osjetljive na oštećenja zbog ljudskih pogrešaka ili pogrešnog rukovanja. Stoga biste trebali često sigurnosno kopirati i čuvati a Uslužni program za popravak problema s Word dokumentom u slučaju nastanka štete.
Uvod za autora:
Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući Alat za popravak grešaka u podacima programa Excel i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com



