make selection in listbox html with vba

[Dieru]

Here is my first post

I have to make a selection in a listbox which is on a web page with
VBA. I have the beginning of the code :
Sub detecte()
lien = "my web adress"
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate lien
Do Until IE.ReadyState = 4
DoEvents
Loop 'attend la fin du chargement
IE.Visible = True
IE.Document.all("ucTitreRendu_DdSelDate").Value = "-1"

End Sub

the problem is with that code
"IE.Document.all("ucTitreRendu_DdSelDate").Value = "-1"", I only
select the first link but it does nothing. It should select the first
link and load the corresponding page.

for ex :
the selected link is march with the informations corresponding to
march.
if I select April from VBA I'd like to have the information
correponding to April.

Thanks for your help it's very important.

 

[Dieru]

Hellooo

Is anybody have a solution? May be it is too hard and I will not have
an answer or the subject does not interest you.

 

[Tim Williams]

This does not select anything:

IE.Document.all("ucTitreRendu_DdSelDate").Value = "-1"

Maybe you meant something like
IE.Document.all("ucTitreRendu_DdSelDate").selectedIndex = 0

This will select the first item in the list.
It's not clear how this loads the month's information: maybe via an
"onchange" event handler on the select ?

Tim

 

[Dieru]

This does not select anything:


Maybe you meant something like
IE.Document.all("ucTitreRendu_DdSelDate").selectedIndex = 0

This will select the first item in the list.
It's not clear how this loads the month's information: maybe via an
"onchange" event handler on the select ?

Tim

Thanks Tim but with your code I have the same result. The page does
not update.
There is an onchange : "onchange="__doPostBack('ucTitreRendu
$DdSelDate','')"" but i don't know how to call this function from
Excel .

 

[Tim]

It would help if you could show the complete code you're using, as well as
the relevant source from the web page.

Tim

 

[Dieru]

It would help if you could show the complete code you're using, as well as
the relevant source from the web page.

Tim







- Afficher le texte des messages précédents -

Here is the code for the listbox :
<select language="javascript"
class="texteSmall" id="ucTitreRendu_DdSelDate"
style="border-style: none; width: 95%;"
onchange="__doPostBack('ucTitreRendu$DdSelDate','')" ]=""
name="ucTitreRendudSelDate">
<option value="-1">JUIN 2007 [en cours]</option>
<option value="107" selected="selected">AVRIL
2007</option>
</select>
</td>
</tr>
</tbody>
</table>

And you already have the VBA code I am using.

 

[Tim Williams]

That HTML looks odd. There is no "language" attribute for select elements.

This should do it though:

With IE.Document.all("ucTitreRendu_DdSelDate")
.selectedIndex = 0
.onchange
End With

Tim

It would help if you could show the complete code you're using, as well as
the relevant source from the web page.

Tim




- Afficher le texte des messages précédents -

Here is the code for the listbox :
<select language="javascript"
class="texteSmall" id="ucTitreRendu_DdSelDate"
style="border-style: none; width: 95%;"
onchange="__doPostBack('ucTitreRendu$DdSelDate','')" ]=""
name="ucTitreRendudSelDate">
<option value="-1">JUIN 2007 [en cours]</option>
<option value="107" selected="selected">AVRIL
2007</option>
</select>
</td>
</tr>
</tbody>
</table>

And you already have the VBA code I am using.

 

[Dieru]

That HTML looks odd. There is no "language" attribute for select elements.

This should do it though:

With IE.Document.all("ucTitreRendu_DdSelDate")
.selectedIndex = 0
.onchange
End With

Tim

It would help if you could show the complete code you're using, as wellas
the relevant source from the web page.



- Afficher le texte des messages précédents -

Here is the code for the listbox :
<select language="javascript"
class="texteSmall" id="ucTitreRendu_DdSelDate"
style="border-style: none; width: 95%;"
onchange="__doPostBack('ucTitreRendu$DdSelDate','')" ]=""
name="ucTitreRendudSelDate">
<option value="-1">JUIN 2007 [en cours]</option>
<option value="107" selected="selected">AVRIL
2007</option>
</select>
</td>
</tr>
</tbody>
</table>

And you already have the VBA code I am using.

Perfect Tim, thanks a lot.