當前位置:成語大全網 - 漢語詞典 - VBA宏如何比較兩個word文件中相同的內容並刪除重復的部分?

VBA宏如何比較兩個word文件中相同的內容並刪除重復的部分?

以下是記錄的VBA電碼

ChangeFileOpenDirectory "D:\要比較的文件夾名\ "

申請。比較文檔_

OriginalDocument:=Documents("待比較文檔1.doc "),_

修訂的文檔:=文檔("文檔2。待比較的文檔”),_

目的地:=wdCompareDestinationNew,_

粒度:=wdGranularityWordLevel,_

CompareFormatting:=True,CompareCaseChanges:=True,_

CompareWhitespace:=True,CompareTables:=True,_

CompareHeaders:=True,CompareFootnotes:=True,_

compare text box:= True,CompareFields:=True,_

CompareComments:=True,CompareMoves:=True,_

修訂作者:="guchzhAL ",_

ignore allcomparisonwarnings:= False

活動窗口。showsourcedocuments = wdshowsourcedocumentsbosth個人還是覺得這種比較工作還是手動比較好。

復習?→?比較

選擇要比較的文檔。

比較結果