CompareURLs secondaire ()
Faible doc1 comme document, doc2 comme document
Placer doc1 = Documents.Open (« http://google.com/ ")
Placer doc2 = Documents.Open (« http://yahoo.com/ ")
Application.CompareDocuments OriginalDocument : =doc1, RevisedDocument : =doc2, destination : = _
wdCompareDestinationNew, granularité : =wdGranularityWordLevel, _
CompareFormatting : =True, CompareCaseChanges : =True, CompareWhitespace : = _
Rectifier, CompareTables : =True, CompareHeaders : =True, CompareFootnotes : =True, _
CompareTextboxes : =True, CompareFields : =True, CompareComments : =True, _
CompareMoves : =True, RevisedAuthor : = " auteur ", _ d'IgnoreAllComparisonWarnings
: =False
ActiveWindow.ShowSourceDocuments = wdShowSourceDocumentsBoth
Sous-marin d'extrémité
|