SEND KEYS?????? Please.... help...

Does anyone know how to make this code run???

'[CODE SECTION]==========================================

Sub waitForPageLoad()
Dim IExp As InternetExplorer

Set IExp = CreateObject("InternetExplorer.Application")


set IExp.Visible = True
IExp.navigate "http://finance.yahoo.com/" 'Reload issue only happens on
sites
'with post data, tables,
etc...
IExp.Stop
IExp.Refresh
'This is the problem here...
IExp.SendKeys "{Enter}" 'Run-time error "438": Object doesn't
'support this property or method.
End Sub

'[END CODE]===============================================

I don't think that there should be anything before Sendkeys - this statement
just sends keystrokes from Excel to the active window/application. I normally
use it after Appactivate, but if the first bit activates IE then that may not
be necessary.

"nisgore" wrote:

> Does anyone know how to make this code run???
>
> '[CODE SECTION]==========================================
>
> Sub waitForPageLoad()
> Dim IExp As InternetExplorer
>
> Set IExp = CreateObject("InternetExplorer.Application")
>
>
> set IExp.Visible = True
> IExp.navigate "http://finance.yahoo.com/" 'Reload issue only happens on
> sites
> 'with post data, tables,
> etc...
> IExp.Stop
> IExp.Refresh
> 'This is the problem here...
> IExp.SendKeys "{Enter}" 'Run-time error "438": Object doesn't
> 'support this property or method.
> End Sub
>
> '[END CODE]===============================================
>
>