מדריך | המרת קובץ וורד DOC לDOCX

[דאנציג]

כידוע אוצריא תומכת בקובצי וורד, אך רק בקבצים חדשים, בסיומת DOCX, ולא בסיומת הישנה DOC.

במקרה וזה קובץ בודד, ניתן להמיר אותו לקובץ DOCX בקלות ובמהירות דרך וורד על ידי כניסה ל'קובץ' > 'מידע', וללחוץ על 'המר':

גם אם יפתח חלון:

ניתן ללחוץ על 'אישור' ללא חשש, אך שימו לב, שישנם עיצובים שמשתנים.

במקרה שיש למשתמש קבצי וורד רבים ישנים, יש צורך להמיר אותם, ואחד אחד זה עבודה רבה.
ניתן להפעיל פקודת מאקרו שהיא ממירה את הקבצים לפורמט הנתמך על ידי אוצריא.

וזו הפקודה:

Sub ConvertDocToDocx()
Dim oDlg As FileDialog
Dim sFolder As String
Dim sName As String, sFullName As String
Dim oDoc As Document
Dim i As Integer: i = 0
    Application.ScreenUpdating = False
    Set oDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If oDlg.Show <> -1 Then Exit Sub
    sFolder = oDlg.SelectedItems(1) + "\"
    sName = Dir(sFolder & "*.doc", vbNormal)
    While sName <> ""
        If Right(LCase(sName), 3) = "doc" Then
            i = i + 1
            Set oDoc = Documents.Open(FileName:=sFolder & sName, _
                                      ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
                                      PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
                                      WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
                                      wdOpenFormatAuto, XMLTransform:="")
            sFullName = Left(oDoc.FullName, InStrRev(oDoc.FullName, Chr(46)))
            If ActiveDocument.HasVBProject = True Then
                ActiveDocument.SaveAs sFullName & "docm", wdFormatXMLDocumentMacroEnabled
            Else
                ActiveDocument.SaveAs sFullName & "docx", wdFormatXMLDocument
            End If
            ActiveDocument.Close
        End If
        sName = Dir()
    Wend
    Application.ScreenUpdating = True
    If i = 1 Then
        MsgBox i & " document converted"
    Else
        MsgBox i & " documents converted"
    End If
    Set oDoc = Nothing
    Set oDlg = Nothing
End Sub

כיצד להשתמש בפקודת מאקרו בספולייר:

Spoiler

מה הם פקודות מאקרו:
פקודות מאקרו הם פקודות קוד שעובדות על מסמכים של אופיס.
כיצד היא עובדת?
כדי להפעיל את הפקודה, יש לפתוח את התוכנה שמריצה את הפקודה (ויז'ואל בייסיק), מתוך הוורד, על ידי לחיצה על אלט + F11 נפתח חלון כזה:

מה שאנחנו צריכים עכשיו זה לפתוח חוברת עבודה, שבה אנחנו מדביקים את הקוד, ולכן נלחץ על הפלוס הקטן שליד המילה normal - נורמל, (הכוונה למסמך תבנית שעליו מבוססים המסמכים החדשים) וללחוץ מקש ימני לבחור insert \ module:

כעת ייפתח חלון בצד ימין שבו מדביקים את הקוד.

וזהו, ניתן לסגור את ויז'ואל בייסיק.
כיצד מפעילים את המאקרו?
כדי להפעיל לחץ על ALT + F8, יפתח חלון מתוך וורד לבחירת פקודות מאקרו שקיימים בחר את הפקודה ברצונך להפעיל, ולחץ על 'הפעל'.

כיצד נקרא המאקרו?
השם של המאקרו הוא השורה שמתחילה משמאל לימין בSub ומסתיימת ב() לדוגמא:

Sub שם_המאקרו ()

במקרה שהמאקרו לא פועל, או לא מופיע, בדוק בויז'ואל בייסיק האם קיים מאקרו, והאם יש לו שם וסיומת, רוב פקודות מאקרו מסתיימות עם

End Sub

שימו לב שבהעתקה לא נשמט שם המאקרו ושורת הסיום.

קישורים חשובים ונצרכים לכל מתעסק עם וורד מפנקסו של הרב @pcinfogmach:

בענין זה.

אוסף מאקרו לוורד.

טיפים לעבודה נכונה עם וורד.

בהצלחה!!!

[חנניה]

אין פה?

[מענין לשמוע]

@חנניה האפשרות הראשונה.

[חנניה]

תודה רבה.
עובד מצוין

[מענין לשמוע]

אולי מישהו יודע לערוך את הקוד שיעבוד גם על תתי תקיות?

[מיתר 33]

יש לי תוכנה יעודית לזה שעושה הכל
ממיר מצויין ומהיר.exe

[מענין לשמוע]

@מיתר-33
באמת נראה מושלם!
תודה רבה, יעיל לי מאוד!

[מישהו 1]

השתמשתי בתוכנה, עם האפשרות של כולל תתי תיקיות ולהמיר לתיקיית יעד, זה ממש מושלם.
רק שלכאורה קובץ DOCX תופס יותר מאשר קובץ TXT למה לא לעשות תוכנה שממירה לקובץ TXT?

[מענין לשמוע]

@מישהו-1
כי זה הרבה יותר מורכב, להפוך את הכותרות למתויגות וכן את ההדגשות...
אבל אדרבה, אם מישהו ירים את הכפפה, הלואי.

[יום חדש מתחיל]

יש כמה שיטות כרגע להפוך קובץ וורד לקובץ TXT עם תגי HTML מותאמים לאוצריא, ראה כאן: https://otzaria.org/forum/post/13675

[סנאי]

אני לא מבין כלום בתכנות, אבל ביקשתי מהבינה מלאכותית שתבנה לי קובץ שימיר קבצים של DOCX לTXT שיתאימו לפורמט של אוצריא. זה עבד לי ממש לא רע במה שניסיתי. לא עשיתי לו רשימה של כל ההמרות, רק של הדברים הבסיסיים (כותרות, הדגשות, כתב גדול וקטן, הערות שוליים). כולל כמובן גם תתי תיקיות.מעלה את זה אם למישהו יהיה תועלת.
ממיר DOCX ל-TXT.exe

[סנאי]

אבל זו יכולה להיות תוכנה שימושית לכל מי שיש לו קבצי וורד שרוצה להכניס לאוצריא ושיתפסו פחות מקום

[יהודי צעיר]

יש כבר תוכנה של סיון להמיר וורד לטקסט

ובסוד... כל קובץ וורד שתפתח באוצריא תוכל ללחוץ על "ערוך את הספר" בתפריט הצד, לעשות CTRL+A (בחר הכל), ולהעתיק משם הכל CTRL+C
הכל כבר יהיה מסודר עם הכותרות והדגשות
ולהדביק בקובץ טקסט

[יהודי צעיר]

[סנאי]

@יהודי-צעיר כתב במדריך | המרת קובץ וורד DOC לDOCX:

יש כבר תוכנה של סיון להמיר וורד לטקסט

ובסוד... כל קובץ וורד שתפתח באוצריא תוכל ללחוץ על "ערוך את הספר" בתפריט הצד, לעשות CTRL+A (בחר הכל), ולהעתיק משם הכל CTRL+C
הכל כבר יהיה מסודר עם הכותרות והדגשות
ולהדביק בקובץ טקסט

אוקיי אני לא מכיר את זה, וגם אין לי בעיה כי זה לקח רבע שעה הכל...
עיקר המטרה שלי היתה אישית בשביל לכלול תתי תיקיות, יש לי תיקיות עם הרבה תתי תיקיות מלאים בוורד

[י. פל.]

@יהודי-צעיר כתב במדריך | המרת קובץ וורד DOC לDOCX:

יש כבר תוכנה של סיון להמיר וורד לטקסט

ובסוד... כל קובץ וורד שתפתח באוצריא תוכל ללחוץ על "ערוך את הספר" בתפריט הצד, לעשות CTRL+A (בחר הכל), ולהעתיק משם הכל CTRL+C
הכל כבר יהיה מסודר עם הכותרות והדגשות
ולהדביק בקובץ טקסט

חידוש גדול!

[דאנציג]

@יהודי-צעיר כתב במדריך | המרת קובץ וורד DOC לDOCX:

ולהדביק בקובץ טקסט

רק לזכור לשמור אותו בפורמט UTF-8.

יישר כוח, זה חידוש שמאוד מקל.