Visual Basic - introducir valores en página oficial del catastro desde vba

Life is soft - evento anual de software empresarial
 
Vista:
Imágen de perfil de Torremolino
Val: 6
Ha aumentado su posición en 15 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

introducir valores en página oficial del catastro desde vba

Publicado por Torremolino (1 intervención) el 27/04/2017 19:39:03
Hola a todos, solicito buestra ayuda para resolver un problema que me trae de cabeza.... quiero mandar la la siguente página del catastro (https://www1.sedecatastro.gob.es/OVCFrames.aspx?TIPO=CONSULTA) una referencia catastral y que haga click uno de los botones (Gráfica por ejemplo).
El caso es que he desarrolladdo una macro para hacerlo pero me arroja un error 424 y no se como resolverlo.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub catastro(dato As String)
 
Dim IE As New SHDocVw.InternetExplorer
IE.Visible = True
IE.Navigate "https://www1.sedecatastro.gob.es/OVCFrames.aspx?TIPO=CONSULTA"
 
Do While IE.ReadyState <> READYSTATE_COMPLETE
Loop
 
IE.Document.forms("form1").elements("table").getElementById("txtRC").Value = dato 'aqui sale el error 
'IE.Document.forms("form1").getElementById("txtRC").Value = dato DEVUELVE EL MISMO ERROR
 
IE.Document.getElementById("btnAlfanumerico").Click 'tambien arroja el mismo error
 
End Sub


Alguien tiene alguna idea??? estoy perdido puesto en códigos parecidos me han servido en otras ocasiones

Gracias de antemano y un saludo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder