application not working

[parkfairfax]

When I run the following code I get an error '91' " Object Variable or with block variable not set". Can anyone please give me a clue as to what I'm missing here. Thanks, GM

Private Sub Command12_Click()

Set appword = CreateObject("Word.Application&quot '

appword.Visible = True
strdoc = "a:\" & a ' where a is a variable
appword.Documents.Open (strdoc)


ActiveDocument.Select

With Selection.Find

.....(some text) {this is a routine that works, just get past the selection.find statement is the problem for me}

End Sub

 

[dsi]

You can probably skip the ActiveDocument.Select statement since you are not specifying anything to select. If you are trying to select the entire contents (Ctrl-A), just use the Selection.WholeStory call.