Here's an example:

[VBA]Dim Word
Dim WordDoc
Set Word = CreateObject("Word.Application")

' Make Word visible
Word.Visible = True

'Open the Document
Set WordDoc = Word.Documents.open("c:\adocument.doc")

'Run the macro called foo
Word.Run "foo"

' Close Word
Word.Quit
'Release the object variables
Set WordDoc = Nothing
Set Word = Nothing[/VBA]

HTH