Trying to use a find dialog to do a generic screen scrape, but when I try to
pass beta as a string, I get an error "invalid procedure or call". I also
tried "" & beta and a few other configurations. How can I accomplish this?
Thank you.

Dim beta As String
beta = "ext.(" & Format(Month(Date), "00") & "-" & Format(Day(Date), "00")
& "-
" & Format(Year(Date), "0000")
AppActivate "FIND", False
SendKeys beta, True

Brent,
Not sure how a screen scrape involves a certain word.
What is "FIND" ? If it is not another application's title then this will not
work. Check the help for AppActivate.

Do you mean to use the EditFind functionality ?
Is so, record a macro whilst performing a search to get the code.

NickHK

"Brent" wrote in message
...
Trying to use a find dialog to do a generic screen scrape, but when I try
to
pass beta as a string, I get an error "invalid procedure or call". I also
tried "" & beta and a few other configurations. How can I accomplish
this?
Thank you.

Dim beta As String
beta = "ext.(" & Format(Month(Date), "00") & "-" & Format(Day(Date),
"00")
& "-
" & Format(Year(Date), "0000")
AppActivate "FIND", False
SendKeys beta, True