Microsoft WordでのSaveCopyAsの動作

Question

誰もが知っているように、WordはPowerPointやExcelなどのSaveCopyAsを提供していません。私はさまざまなアプローチを試みましたが、満足のいく結果はありませんでした。

正しい書式設定（要素の配置 - > wdPasteDefault）またはスタイルの正しい書式（フォントと色 - > wdPasteDefault）のいずれかでドキュメントをオンザフライでコピーできます。

元のドキュメントを閉じる場合は、ドキュメントを保存するかどうかを尋ねる必要があり、パスを選択する必要があります。私は2010年の

2016へのアプローチをサポートする最後のWord 2016に異なるアプローチを試してみました今の

されました：

 object wdWhat = Microsoft.Office.Interop.Word.WdGoToItem.wdGoToPage; 
     object wdWhich = Microsoft.Office.Interop.Word.WdGoToDirection.wdGoToAbsolute; 

     Microsoft.Office.Interop.Word.Range range = document.Range(ref missObj, ref missObj); 
     Microsoft.Office.Interop.Word.Range pageRange = document.Range(ref missObj, ref missObj); 

     pageRange.Start = range.GoTo(ref wdWhat, ref wdWhich, ref missObj, ref missObj).Start; 
     pageRange.End = document.Range(ref missObj, ref missObj).End; 
     pageRange.Copy(); 

     Microsoft.Office.Interop.Word.Document newDoc = AddinModule.CurrentInstance.WordApp.Documents.Add(ref missObj, ref missObj, ref missObj, ref missObj); 

     newDoc.PageSetup.PageWidth = document.PageSetup.PageWidth; 
     newDoc.PageSetup.PageHeight = document.PageSetup.PageHeight; 
     AddinModule.CurrentInstance.WordApp.Selection.PasteAndFormat(Microsoft.Office.Interop.Word.WdRecoveryType.wdPasteDefault); 

     object newDocName = filePath; 
     newDoc.SaveAs(ref newDocName, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj, ref missObj); 
     object saveChanges = WdSaveOptions.wdSaveChanges; 
     ((Microsoft.Office.Interop.Word._Document)newDoc).Close(saveChanges, ref missObj, ref missObj); 
     Marshal.ReleaseComObject(newDoc); 
     newDoc = null; 

Answer 1

IPersistFileでよく知られた解決策があり、

using System.Runtime.InteropServices.ComTypes; 

var f = (IPersistFile)doc; 
f.Save("[path]", false);