אופיס 365 כיצד ממירים קבצי וורד מרובים ל- HTML ?

[נירוש]

יש לי קבצי וורד מרובים, שאני צריך להמיר ל - HTML.
ניתן לפתוח קובץ קובץ ולעשות שמירה בשם וכו' אך אני מחפש דרך קלה יותר כדי להמיר את כולם בבת אחת.
מישהו מכיר דרך לעשות את זה?

 

[נירוש]

לאף אחד אין עצה??

 

[שמח לעזור]

אם רלוונטי,
1. להעתיק את הקוד דלהלן:

$word = New-Object -comobject word.application

$saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatFilteredHTML")

Get-ChildItem "C:\wordsDocFolder" -Filter *.docx | 
Foreach-Object {
    $doc = $word.documents.open($_.fullname)
    $doc.saveAs([ref]"$($_.fullname).html", [ref]$saveFormat)
	$doc.close }

2. להדביק קודם בעורך טקסט כמו וורד ולשנות את הנתיב איפה שכתוב C:\wordsDocFolder לנתיב של התיקיה בה נמצאים הקבצים.
3. להקליד powershell בתפריט ההתחלה של וינדוס. להקליק על windows powershell. להעתיק את הקוד המתוקן ולהדביק בחלון של הwindows powershell ע"י קליק ימני של העכבר בחלל החלון.
ללחוץ אנטר.

 

[5127109]

להפעיל את התוכנה לאחר כיווץ, לבחר תיקיה שבה יהו הקבצים לאחר ההמרה.
לבחור את הפורמט המבוקש - יש שם שני HTML אחד מלא עם תקיה נלוות ואחד שהכל בפנים [Html זה לא סימן מוסכם אבל לעניננו...].
לוחצים על המרה.
במקור, זה נועד למשהו אחר אבל לאחר כמה התאמות אולי יכול לעזור.
זה רק עושה המרה בפועל, כדי להתאים את הענין לאתרים יש צורך בקובץ CSS מותאם.
בהצלחה.
רק לשים לב לא לעשות הרבה קבצים בבת אחת זה תלוי בזיכרון של המחשב. להתשמש בעדינות.

 

[נירוש]

להפעיל את התוכנה לאחר כיווץ, לבחר תיקיה שבה יהו הקבצים לאחר ההמרה.
לבחור את הפורמט המבוקש - יש שם שני HTML אחד מלא עם תקיה נלוות ואחד שהכל בפנים [Html זה לא סימן מוסכם אבל לעניננו...].
לוחצים על המרה.
במקור, זה נועד למשהו אחר אבל לאחר כמה התאמות אולי יכול לעזור.
זה רק עושה המרה בפועל, כדי להתאים את הענין לאתרים יש צורך בקובץ CSS מותאם.
בהצלחה.
רק לשים לב לא לעשות הרבה קבצים בבת אחת זה תלוי בזיכרון של המחשב. להתשמש בעדינות.

מעולה! עושה את העבודה מצוין!

אם רלוונטי,
1. להעתיק את הקוד דלהלן:

$word = New-Object -comobject word.application

$saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatFilteredHTML")

Get-ChildItem "C:\wordsDocFolder" -Filter *.docx | 
Foreach-Object {
    $doc = $word.documents.open($_.fullname)
    $doc.saveAs([ref]"$($_.fullname).html", [ref]$saveFormat)
	$doc.close }

2. להדביק קודם בעורך טקסט כמו וורד ולשנות את הנתיב איפה שכתוב C:\wordsDocFolder לנתיב של התיקיה בה נמצאים הקבצים.
3. להקליד powershell בתפריט ההתחלה של וינדוס. להקליק על windows powershell. להעתיק את הקוד המתוקן ולהדביק בחלון של הwindows powershell ע"י קליק ימני של העכבר בחלל החלון.
ללחוץ אנטר.

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

זה הפלט המתקבל: [בהתחלה עם DOCX, אח"כ ניסיתי עם DOC, שזה הסיומת של קבצי הוורד אצלי]

Windows PowerShell
Copyright (C) 2009 Microsoft Corporation. All rights reserved.

PS C:\Users\XXX> ject word.application
The term 'ject' is not recognized as the name of a cmdlet, function, script file, or operable program. Check the spelli
ng of the name, or if a path was included, verify that the path is correct and try again.
At line:1 char:5
+ ject <<<<  word.application
    + CategoryInfo          : ObjectNotFound: (ject:String) [], CommandNotFoundException
    + FullyQualifiedErrorId : CommandNotFoundException

PS C:\Users\XXX>
PS C:\Users\XXX> $saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatFilteredHTML")
Unable to find type [Microsoft.Office.Interop.Word.WdSaveFormat]: make sure that the assembly containing this type is l
oaded.
At line:1 char:73
+ $saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat] <<<< , "wdFormatFilteredHTML")
    + CategoryInfo          : InvalidOperation: (Microsoft.Offic...rd.WdSaveFormat:String) [], RuntimeException
    + FullyQualifiedErrorId : TypeNotFound

PS C:\Users\XXX>
PS C:\Users\XXX> Get-ChildItem "D:\My Documents\תנך קבצי וורד\איוב - עותק" -Filter *.docx |
>> Foreach-Object {
>>     $doc = $word.documents.open($_.fullname)
>>     $doc.saveAs([ref]"$($_.fullname).html", [ref]$saveFormat)
>>     $doc.close }ject word.application
>>
ForEach-Object : Cannot bind parameter 'Process'. Cannot convert the "ject" value of type "System.String" to type "Syst
em.Management.Automation.ScriptBlock".
At line:2 char:15
+ Foreach-Object <<<<  {
    + CategoryInfo          : InvalidArgument: (:) [ForEach-Object], ParameterBindingException
    + FullyQualifiedErrorId : CannotConvertArgumentNoMessage,Microsoft.PowerShell.Commands.ForEachObjectCommand

PS C:\Users\XXX> $saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatFilteredHTML")
Unable to find type [Microsoft.Office.Interop.Word.WdSaveFormat]: make sure that the assembly containing this type is l
oaded.
At line:1 char:73
+ $saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat] <<<< , "wdFormatFilteredHTML")
    + CategoryInfo          : InvalidOperation: (Microsoft.Offic...rd.WdSaveFormat:String) [], RuntimeException
    + FullyQualifiedErrorId : TypeNotFound

PS C:\Users\XXX>
PS C:\Users\XXX> Get-ChildItem "D:\My Documents\תנך קבצי וורד\איוב - עותק" -Filter *.doc |
>> Foreach-Object {
>>     $doc = $word.documents.open($_.fullname)
>>     $doc.saveAs([ref]"$($_.fullname).html", [ref]$saveFormat)
>>     $doc.close }

 

[שמח לעזור]

אחרי התוכנה של 5127109 אז קצת מיותר להעמיד את הסקריפט אבל בכל זאת מה עם כבודי שחייב הצלה...
הבעיה היא לא מיקום הקבצים (זה נשמר באותה התיקיה) אלא שבהדבקה בחלון הסקריפט הפקודות מבוצעות בנפרד.
הפתרון הפשוט שמצאתי זה לכתוב את כל שבירות השורה ע"י נקודה פסיק, בקיצור הקוד הבא (כולל כמה תיקונים מהקודם) יש לשנות את הנתיב לנתיב המתאים ולהדביק כנ"ל.

$word = New-Object -comobject word.application; $saveFormat = [Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatFilteredHTML"); Get-ChildItem "C:\Abc" -Filter *.docx | 
Foreach-Object {
    $doc = $word.documents.open($_.fullname)
    $doc.saveAs([ref]"$($_.fullname).html", [ref]$saveFormat)
    $doc.Saved = $true
	$doc.close }; $word.Quit(); $word = $null; [gc]::collect(); [gc]::WaitForPendingFinalizers();