Página 1 de 1

Criar uma macro para acionar PogeDown em VBA

Enviado: 03 Abr 2017 às 21:34
por NiltoAraujo
Olà galera !!
Estou com dificuldade em fazer uma macro: em um form adicionei um web Browser1 e em um botão em um frame, gostaria de rolar a barra do webbrowser1 até o final de uma pagina aberta.

Agradeço pela atenção.

Re: Criar uma macro para acionar PogeDown em VBA

Enviado: 10 Abr 2017 às 09:33
por alexandrevba
Bom dia!!

Oque tentou?
Código: Selecionar todos
Private Sub UserForm_Initialize()
    WebBrowser1.Navigate2 "https://www.google.com.br/"
    
    Do
        DoEvents
    Loop Until Me.WebBrowser1.ReadyState = READYSTATE_COMPLETE
    
    WebBrowser1.Document.body.doscroll
    WebBrowser1.Document.body.doscroll
End Sub
Att