Página 1 de 1

Copiar dados de uma pagina da web

Enviado: Seg Fev 11, 2019 4:48 pm
por maandrake
Bom dia, tenho um BD Access para cadastrar clientes e seus veículos, uso o código a seguir para acessar a pagina do detran e copiar manualmente os dados do veículo.

Private Sub ComandoConsultaPlaca_Click()

Dim ieApp As Object
Dim Button As HTMLInputElement

Set ieApp = CreateObject("InternetExplorer.Application")

With ieApp
.Visible = True
ShowWindow .hwnd, SW_MAXIMIZE 'Usa o mdlIE para Maximizar a janela que abre do IE
SetForegroundWindow .hwnd
.navigate ("http://consultas.detrannet.sc.gov.br/se ... asp?placa=" & Placa.Value & "&renavam=" & Renavam.Value)

End With
End Sub

Gostaria de saber se é possível colocar um código para que após resolvido o captcha e for apertado o botão de consulta o código vba copie automaticamente os dados do veículo. Isso é possível?