Click here to Skip to main content
11,483,003 members (74,167 online)
Rate this: bad
good
Please Sign up or sign in to vote.
See more: VB.NET Word
Hi Everyone,

I have created Word Application object as following.

MyWordApp = CreateObject("Word.Application")
 
MyWordApp.Documents.Open(Doc1)
 
With MyWordApp.ActiveDocument
    .SaveAs(OutDoc)
    .TrackRevisions = True
    .ShowRevisions = True
    .PrintRevisions = True
    .Compare(Doc2, , 1)
End With

It works fine ! But when Doc1 or Doc2 has Track Changes On and I compare them, I encounter "Command Failed" error.

Any solution to compare a Document that has Track Changes On ?
Posted 18-Mar-11 0:21am
Comments
losmac at 19-Mar-11 16:29pm
   
See here:
http://lifehacker.com/?_escaped_fragment_=247919/microsoft-word-tip--how-to-compare-two-documents-for-differences#!247919/microsoft-word-tip--how-to-compare-two-documents-for-differences
losmac at 7-Apr-11 16:19pm
   
OK, why are you enable TrackRevision before comparing documents?

See MS Help. Take a look at "IgnoreAllComparisonWarnings" variable.

Compare Method
See AlsoApplies ToExampleSpecificsDisplays revision marks that indicate where the specified document differs from another document.

expression.Compare(Name, AuthorName, CompareTarget, DetectFormatChanges, IgnoreAllComparisonWarnings, AddToRecentFiles)
expression Required. An expression that returns a Document object.

IgnoreAllComparisonWarnings Optional Variant. True compares the documents without notifying a user of problems. The default value is False.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



Advertise | Privacy | Mobile
Web03 | 2.8.150520.1 | Last Updated 18 Mar 2011
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100