vba - Pulling Data from MS Word Textbox into Excel -

vba - Pulling Data from MS Word Textbox into Excel -

i have somewhere in part of 300 appraisal forms , have open them in turn , strip out info excel. sounds vba me. far have this...

dim objwdapp object dim objwddoc object on error resume next set objwdapp = getobject(, "word.application") if err.number <> 0 set objwdapp = createobject("word.application") end if err.clear on error goto 0 set objwdapp = createobject("word.application") set objwddoc = objwdapp.documents.open(filename:="u:\pdr\newprocess\mike hibbert.docx") objwdapp.visible = false range("a1") = objwddoc.textname.value objwdapp.quit set objwddoc = nil set objwdapp = nil

but it's erroring on range("a1") = objwddoc.textname.value

run time error 438

i know doesn't run through items in folder etc, @ stage i'd info word excel.

cheers mike

excel vba ms-word