Hi,jmarin
here is a sample, hope can help you.
Code:
Sub test()
Dim wrdApp As Object
Dim myDoc As Object
Set wrdApp = CreateObject("Word.Application")
With wrdApp
.Visible = False
Set myDoc = .Documents.Open("e:\test.doc")
myDoc.Bookmarks("Region").Range.Copy
Sheet1.Range("A1").PasteSpecial xlPasteValues
Application.CutCopyMode = False
End With
myDoc.Close True
wrdApp.Quit
Set myDoc = Nothing
Set wrdApp = Nothing
End Sub