Forum

doc2docx tools
 
Bildirimler
Hepsini Temizle

[Çözüldü] doc2docx tools

4 Yazılar
3 Üyeler
3 Likes
913 Görüntüleme
(@haticekara)
Gönderiler: 225
Reputable Member
Konu başlatıcı
 

Merhaba,

doc uzantılı dosyaları docx'e dönüştürebileceğim bir tool var mı?

bir klasördeki tüm doc uzantılarını tek seferde dönüştürebileceğim bir tool

 
Gönderildi : 09/02/2023 14:03

(@www-rizasahan-com)
Gönderiler: 18026
_
 

Merhaba,
Bu şekilde yapabileceğiniz söylenmiş.

https://www.extendoffice.com/documents/word/5601-word-batch-convert-doc-to-docx.html

1984 doğumluyum. 4 yaşından bu yana İstanbul’da yaşıyorum. Sırası ile aşağıdaki okullarda eğitim gördüm. Paşaköy ilkokulu (1990-1995) Kartal Zekeriyya Güçer İlköğretim Okulu(1995-1998) Ümraniye Teknik ve Endüstri Meslek Lisesi Bilgisayar Bölümü(1998-2001) Kocaeli Üniversitesi Bilgisayar Programcılığı(2002-2004) Anadolu Ünv. İşletme Fakültesi(2006-2009) Lise yıllarından sonra bir bilgisayar firmasının teknik servisinde mesleğe merhaba dedim. Outsource olarak Citibank ytl ve bina taşınma projesinde yer alarak 8 ay görev yaptım. Bu görevden sonra şu an çalışmakta olduğum yerde bilgi işlem sorumlusu olarak göreve başladım ve 18 yıldır görevimin başındayım.

 
Gönderildi : 11/02/2023 22:56
hatice kara reacted

Hakan Uzuner
(@hakanuzuner)
Gönderiler: 32965
Illustrious Member Yönetici
 

This section is going to show you the VBA code to convert all .doc format documents in a specified folder to .docx documents at once. Please do as follows.

1. Please collect all .doc format documents you will convert to .docx in a specified folder.

2. Press the Alt + F11 key to open the Microsoft Visual Basic for Applications window.

3. In the window, click Insert > Module. Then copy below VBA code into the Module window.

VBA code: Batch convert all .doc format documents to .docx in a certain folder

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
doc convert doc to docx 1

4. Press the F5 key to run the code. In the opening Browse window, select the folder contains the .doc format documents and click OK. See screenshot:

doc convert doc to docx 2

Then all .doc format documents are converted to .docx documents immediately as below screenshot shown.

doc convert doc to docx 3

 

Kaynak

How to batch convert .doc format files to .docx in Word? (extendoffice.com)

Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************

 
Gönderildi : 13/02/2023 15:22

(@haticekara)
Gönderiler: 225
Reputable Member
Konu başlatıcı
 

Hocalarım, desteğiniz için çok teşekkür ederim. Sağolun.

 
Gönderildi : 16/02/2023 11:07

Paylaş: