make selection in listbox html with vba


D

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.
 
Ad

Advertisements

D

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.
 
T

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
 
D

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 .
 
T

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
 
D

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="ucTitreRendu:DdSelDate">
<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.
 
Ad

Advertisements

T

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="ucTitreRendu:DdSelDate">
<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.
 
Ad

Advertisements

D

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="ucTitreRendu:DdSelDate">
<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.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top