Try:

WebBrowser1.Document.frmTrText.lp.selectedIndex = 35 'index is zero-based

Tim

wrote in message
...
I can't seem to figure out how to set the value of the following combo
box on the following website...

http://babelfish.altavista.com/

The combo box controls the translation language combobox and it is
called "lp" but when I refrence it in VBA I get error messages... My
code...

Private Sub CommandButton5_Click()
WebBrowser1.Document.All("lp").value = 36 'Spanish to English
End Sub

I have also tried using the refrenced value...

Private Sub CommandButton5_Click()
WebBrowser1.Document.All("lp").value = "es_en" 'Spanish to English
End Sub

Any help is greatly appreciated!!!