Click here to Skip to main content
11,715,022 members (65,391 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 17-Mar-11 23:21pm
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)

  Print Answers RSS
0 Sergey Alexandrovich Kryukov 530
1 Richard MacCutchan 275
2 Maciej Los 259
3 ManasKumarM 155
4 Frankie-C 115
0 Sergey Alexandrovich Kryukov 775
1 CHill60 415
2 Richard MacCutchan 405
3 Maciej Los 389
4 OriginalGriff 320


Advertise | Privacy | Mobile
Web02 | 2.8.150901.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