VorCompareURLs ()
Schwaches doc1 als Dokument, doc2 als Dokument
Einstellen doc1 = Documents.Open („http://google.com/ ")
Einstellen doc2 = Documents.Open („http://yahoo.com/ ")
Application.CompareDocuments OriginalDocument: =doc1, RevisedDocument: =doc2, Bestimmungsort: = _
wdCompareDestinationNew, Körnigkeit: =wdGranularityWordLevel, _
CompareFormatting: =True, CompareCaseChanges: =True, CompareWhitespace: = _
Ausrichten, CompareTables: =True, CompareHeaders: =True, CompareFootnotes: =True, _
CompareTextboxes: =True, CompareFields: =True, CompareComments: =True, _
CompareMoves: =True, RevisedAuthor: = " Autor ", IgnoreAllComparisonWarnings _
: =False
ActiveWindow.ShowSourceDocuments = wdShowSourceDocumentsBoth
Enden-Unterseeboot
|