Notifications
Clear all

Macro com internet Explorer

5 Posts
3 Usuários
0 Reactions
1,231 Visualizações
wfranca
(@wfranca)
Posts: 297
Reputable Member
Topic starter
 

Pessoal,

to tentando realizar o login via vba, até o presente momento eu consigo preencher o usuário e a senha, mas não consigo fazer com que a macro click no botão para acessar a pagina.

alguém pode ajudar? O codigo sempre para na linha "IE.Document.forms(0).submit"

Sub Logar()


Dim btnInput As Object '
Dim ElementCol As Object '

Dim IE As InternetExplorer
Dim C
Dim ULogin As Boolean, ieForm
Dim MyPass As String, MyLogin As String

Application.DisplayAlerts = False

MyLogin = "XXXXXX"
MyPass = "XXXXXXXXXX"

Set IE = New InternetExplorer ' Nova Página
IE.Visible = True

Mysite = "https://ptsnappy.appypie.com/login"
IE.Navigate Mysite 'Acessar link
Do Until IE.ReadyState = READYSTATE_COMPLETE 'Loop ate conectar na página
Loop

    IE.Document.all("login_username").innerText = MyLogin
    IE.Document.all("login_password").innerText = MyPass
    'obtém o forma a qual o controle de login pertence para submetê-lo
    IE.Document.forms(0).submit
Do Until IE.ReadyState = READYSTATE_COMPLETE 'Loop ate conectar na página
Loop
End Sub

Welington Gonçalves

 
Postado : 26/08/2018 10:39 am
(@salezzi)
Posts: 10
Active Member
 

Ola wfranca, espero que este código de ajude. Porém você precisa encontrar o ID no HTLM do seu site.

IE.document.getElementById("digita aqui seu ID").Click

Espero ter te ajudado.

Se a informação foi útil, click no joinha ao lado do botão citar. Sucesso!!!

 
Postado : 26/08/2018 11:13 am
wfranca
(@wfranca)
Posts: 297
Reputable Member
Topic starter
 

OI Salezzi,

eu to tentando encontrar o ID mas não consigo identificar qual devo usar,

consegue identificar abaixo?

<button class="buttonbottom dHeight ng-binding" id="submitme" style="width: 100%;" ng-click="checklogin( '', login_username, login_password, 'login', '2', saveEditLater)" ng-bind-html='"Iniciar sessão" | htmlEntities' ng-show="loginImageLoader==false">Iniciar sessão</button>

Welington Gonçalves

 
Postado : 26/08/2018 11:36 am
(@teleguiado)
Posts: 142
Estimable Member
 

wfranca, tente o código abaixo:

IE.Document.getElementById("submitme").Click

Obrigado.

Teleguiado.
E-mail: [email protected]

 
Postado : 26/08/2018 12:34 pm
(@salezzi)
Posts: 10
Active Member
 

O id é este como teleguiado falou:"submitme"

Se a informação foi útil, click no joinha ao lado do botão citar. Sucesso!!!

 
Postado : 26/08/2018 1:48 pm