Hi Tom,
how about this one:
Dim B As CommandBar
Dim C As CommandBarControl
Set B = CommandBars("Mail Merge")
For Each C In B.Controls
Debug.Print C.Caption, C.ID
Next

Signature
Greetings from Bavaria, Germany
Helmut Weber, MVP WordVBA
Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"
tom - 17 Sep 2005 12:30 GMT
Thanks Helmut, the problem is that I dont't have Word 2000! I have 97
and 2002, and for my program I need to know the codes for 2000. In
version 2002 there are other buttons than in 97, so how is that in
2000.
Can anybody help me with that?
Thanks a lot,
Tom