Thank you for the replay. So you kind of gave me a solution. I tried what you suggested but I got the file already open problem. If I use part of the original code but use your option for the range it works. Any idea why? (I'm trying to do this from within Access)
Private Sub Command0_Click() Dim objWord As Object Dim oRng As Word.Range Set objWord = GetObject(, "Word.Application") Set objWord = GetObject("C:/temp/test1.docm") Set oRng = objWord.Sections(1).Range Debug.Print oRng.Text End Sub




Reply With Quote
