Access Internet Explorer via Excel VBA
Hello Everyone,
I use the following code to access Internet Explorer via
Excel VBA.
I am trying to find out how do I make a selection of a combobox
in a web page via VBA?
Sub FillInForm()
'Reference MS Internet Controls
Dim IE As InternetExplorer
Set IE = New InternetExplorer
With IE
.Visible = True
.Navigate "http://www.wrox.com"
'Wait until page is loaded. Warning for endless loop here!
Do Until IE.ReadyState = READYSTATE_COMPLETE: Loop
'This is an example on how I enter data to a textbox
.Document.Forms(1).Elements(0).Value = "Internet Explorer"
'If the web page has a dropdown box... How do I make my
'Selection via code?????????
End With
Set IE = Nothing
End Sub
Any help would be appreciated...
Thank You
tony_813
Tony_813
|