Calling the "Compare and Merge WorkSite Documents" option in Word

SirHC

Hi,

Can anyone tell me how I can call the "Compare and Merge WorkSite Documents..." command/dialog via a macro in Word? (the same as what appears when using this option via the Tools menu) I want to set up a button on a toolbar to call this command and then perform some other functions.

Regards

Chris

jny

You could probably go through the Word command controls and progarmmatically press the command, like so:

[VBA] 'Word Object Model
=======================================
Dim objCommandBarControls As CommandBarControls
Dim objCommandBarControl As CommandBarControl
Dim objCompareMerge As CommandBarButton

If Word.Documents.Count = 0 Then
Exit Sub
End If

For Each objCommandBarControl In Word.CommandBars("Tools").Controls
If "iManageCompareMergeDocuments" = objCommandBarControl.Tag Then
Set objCompareMerge = objCommandBarControl
Exit For
End If
Next objCommandBarControl

objCompareMerge.Execute
=======================================