Како претворити .доц формат датотеке у .доцк у Ворд?
Претпостављајући да сте добили неке Ворд документе КСНУМКС-КСНУМКС, како можете да конвертујете све ове .доц форматне документе у .доцк формат одједном? Овај чланак ће вам показати два начина за рјешавање овог проблема.
Батцх претворити .доц формат датотеке у .доцк са ВБА кодом
Батцх претворити .доц формат датотеке у .доцк с Кутоолс за Ворд
Батцх претворити све .доц формат датотеке у фасциклу у .доцк формату:
Конвертор формата документа корисност Кутоолс фор Ворд вам помаже да конвертујете све документе .доц у одређену фасциклу у .доцк формат у исто време. Погледајте снимак екрана:
Кутоолс фор Ворд: са више од КСНУМКС практичних додатака за Ворд, можете слободно покушати без ограничења у КСНУМКС данима. Преузмите и пробајте сада!
Батцх претворити .доц формат датотеке у .доцк са ВБА кодом
Овај одељак ће вам показати ВБА код за претворбу свих .доц форматних докумената у одређеној фасцикли у .доцк документе одједном. Урадите како следи.
КСНУМКС. Молимо сакупљајте све .доц форматне документе које ћете претворити у .доцк у одређеном директоријуму.
КСНУМКС. притисните други + ФКСНУМКС кључ за отварање Мицрософт Висуал Басиц за апликације прозор.
КСНУМКС. У прозору кликните на Убацити > Модули. Затим копирајте испод ВБА кода у прозор Модуле.
ВБА код: Батцх претворити све .доц форматне документе у .доцк у одређеном фолдеру
Sub ConvertDocToDocx() 'Updated by ExtendOffice 20181128 Dim xDlg As FileDialog Dim xFolder As Variant Dim xFileName As String Application.ScreenUpdating = False Set xDlg = Application.FileDialog(msoFileDialogFolderPicker) If xDlg.Show <> -1 Then Exit Sub xFolder = xDlg.SelectedItems(1) + "\" xFileName = Dir(xFolder & "*.doc", vbNormal) While xFileName <> "" Documents.Open FileName:=xFolder & xFileName, _ ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _ PasswordDocument:="", PasswordTemplate:="", Revert:=False, _ WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _ wdOpenFormatAuto, XMLTransform:="" ActiveDocument.SaveAs xFolder & Replace(xFileName, "doc", "docx"), wdFormatDocumentDefault ActiveDocument.Close xFileName = Dir() Wend Application.ScreenUpdating = True End Sub
КСНУМКС. притисните F5 кључ за покретање кода. У отварању Прегледај прозор, одаберите фасциклу садржи документе .доц формата и кликните OK. Погледајте снимак екрана:
Тада се сви документи .доц документа конвертују у .доцк документе одмах као што је приказано испод.
Батцх претворити .доц формат датотеке у .доцк с Кутоолс за Ворд
У овом одељку ће се препоручити корисна корисност. Са Доц / Доцк корисност Кутоолс фор Ворд, можете лако претворити све .доц формат документа у фасциклу у .доцк документе. Молимо покушајте како слиједи.
Кутоолс фор Ворд : Са више од КСНУМКС практичних додатака за Ворд, слободно покушати без ограничења у КСНУМКС данима.
КСНУМКС. Молимо сакупљајте све .доц документе у одређеном директоријуму, а затим кликните на Кутоолс Плус > Доц / Доцк. Погледајте снимак екрана:
КСНУМКС. У Конвертор формата документа дијалог бок, морате урадити како слиједи:
КСНУМКС) Изаберите мапу која садржи документе .доц у формату Фасцикла изворне датотеке секција;
КСНУМКС) Изаберите Претвори доц у доцк од Формат Цонверт падајуће листе;
КСНУМКС) Подразумевано, Путни правац исти као извор кутија је означена. Ако желите да ставите све конвертоване .доцк документе у исту фасциклу, само задржите ову опцију изабрану;
Ако желите да раздвојите .доцк документе и изворне .доц документе, молимо уклоните ознаку Путни правац исти као извор поље и изаберите нову фасциклу да бисте сачували .доцк документе у фолдеру Сачувај у бок;
КСНУМКС) Кликните на Почетак дугме. Погледајте снимак екрана:
КСНУМКС. Затим се појављује дијалошки оквир да би вам испричао колико је докумената успешно конвертовано, кликните на дугме OK дугме и затворите Конвертор формата документа прозор.
Сада сви документи документа .доц конвертују се у .доцк датотеке. Погледајте снимак екрана:
Ако желите да имате бесплатну пробну верзију овог корисничког програма, молимо идите на бесплатан довнлоад софтвера прво, а затим идите да примените операцију према горе наведеним корацима.
Кутоолс за Оутлоок
Више од КСНУМКС напредних функција за Оутлоок КСНУМКС, КСНУМКС, КСНУМКС, КСНУМКС и КСНУМКС
Још карактеристика | Бесплатно скидање | Само $ КСНУМКС за стотине функција
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Be the first to comment.