Thread: WebBrowser1??
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
David David is offline
external usenet poster
 
Posts: 1,560
Default WebBrowser1??

Hi there.

I've read a fair number of postings on the web about this, but still can't
seem to get it to work properly.

Basically, I'm trying to open a HTML page (over the network) in a WebBrowser
window. I call a sub from my code, which is as follows:

Sub ShowWebBrowserIE()
Dim intI As Integer
UserForm1.Show
UserForm1.WebBrowser1.Navigate ("file:///K:/users/tf/t1009.htm")
DoEvents

Do Until (UserForm1.WebBrowser1.ReadyState = READYSTATE_LOADED)
DoEvents
Loop

MsgBox "Should be done"
End Sub

The above does not seem to load my page. I have also tried
READYSTATE_COMPLETE, but this seems to cause my session to hang (although
does load the page). The above examples are consistent with the methods
recommended on the web. Can anyone advise as to what might be going on?

Any help would be very much appreciated. Please post your responses to this
channel.

Many thanks in advance,

David