CompareURLs secundário ()
Doc1 não ofuscante como o original, doc2 como o original
Ajustar doc1 = Documents.Open (“http://google.com/ ")
Ajustar doc2 = Documents.Open (“http://yahoo.com/ ")
Application.CompareDocuments OriginalDocument: =doc1, RevisedDocument: =doc2, destino: = _
wdCompareDestinationNew, granulosidade: =wdGranularityWordLevel, _
CompareFormatting: =True, CompareCaseChanges: =True, CompareWhitespace: = _
Retificar, CompareTables: =True, CompareHeaders: =True, CompareFootnotes: =True, _
CompareTextboxes: =True, CompareFields: =True, CompareComments: =True, _
CompareMoves: =True, RevisedAuthor: = " autor ", _ de IgnoreAllComparisonWarnings
: =False
ActiveWindow.ShowSourceDocuments = wdShowSourceDocumentsBoth
Submarino da extremidade
|