............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Asignar valor a combobox de Página Web

Ver el tema anterior Ver el tema siguiente Ir abajo

Asignar valor a combobox de Página Web

Mensaje por albertopa el Miér Sep 07, 2016 1:03 pm

Hola, estoy haciendo un código para poder asignar valor a combobox de una Página web, pero no he dado con la instrucción correcta para hacer que el combobox acepte el valor que le envío desde la macro.

El siguiente código que anexo, lo unico que logra es que el combobox correspondiente al ESTADO quede en blanco.
Lo que debería de hacer es que contenga la palabra CHIHUAHUA

Sub ConsultarSIMCR()
Dim ie As Object

On Error Resume Next
Application.DisplayAlerts = False

Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "http://consultasimcr.ran.gob.mx/consulta_tramite.aspx"
ie.Visible = True

Do Until ie.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop

'Asignar valor a combobox ESTADO
ie.Document.getElementById("vEDO_ID").Value = "CHIHUAHUA"


Do Until ie.ReadyState = READYSTATE_COMPLETE
DoEvents
Loop

Application.Wait (Now + TimeValue("0:00:03"))

ie.Visible = True

Set ie = Nothing
Application.DisplayAlerts = True
End Sub

Espero alguien pueda ayudarme.


albertopa

Masculino Cantidad de envíos : 24
Edad : 49
Ciudad - Pais : Mexico
Version de Excel : 2007
Fecha de inscripción : 04/08/2009

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.