Click in Button web site with VBA

S

samucavsj

New Member
Joined
Sep 22, 2014
Messages
2
Dear, good afternoon!
Can you help me?
Must click a button on a website, but can not.
Below is the source code of the page:


<TBODY>
<TR>
<TD class=clsCampo2 align=left><SPAN id=DetalhesProposta1_lblPropostaD>Proposta Mapfre</SPAN>: </TD>
<TD style="WIDTH: 300px" align=left><SPAN id=DetalhesProposta1_lblPropostaDValue>10407846860628243</SPAN>  <INPUT style="BORDER-RIGHT-WIDTH: 0px; BORDER-TOP-WIDTH: 0px; BORDER-BOTTOM-WIDTH: 0px; BORDER-LEFT-WIDTH: 0px" id=DetalhesProposta1_lnkbtnDocumentoEletronico *******="************('/EntradaPropostas/ImprimirProposta.aspx?NumeroNSU=10407846860628243','', 'resizable=no, menubar=no,scrollbars=yes,width=100,height=100');" src="../Imagens/print.gif" type=image name=DetalhesProposta1$lnkbtnDocumentoEletronico> </TD>
<TD style="BACKGROUND-COLOR: #eee" colSpan=2 align=middle><SPAN id=DetalhesProposta1_lblPropostaConciliadaD>Proposta Conciliada com TronWeb</SPAN>: </TD></TR>
<TR>





below is the macro I created to create the button.


Private Sub Populate_Click()




Dim Dc_Usuario As String
Dim Dc_Senha As String
Dim Dc_URL As String
Dim objElement As Object
Dim objCollection As Object
Dim DOC As HTMLDocument
Dim htmldoc As String
Dim i As Long
Dim ObjIe As New InternetExplorer 'Referencie "Microsoft Internet Controls"






ObjIe.Visible = True


ObjIe.Navigate "http://intranet"
'ObjIe.Navigate "http://intranet/iContent/area.jsp?idArea=10"
'ObjIe.Navigate "http://intranet/iContent/area.jsp?idArea=807"
'ObjIe.Navigate "http://intranet/iContent/area.jsp?idArea=330"
Do While ObjIe.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
ObjIe.Navigate "http://intranet/iContent/area.jsp?idArea=50077"






Application.Wait Now + TimeValue("00:00:01")


ObjIe.Navigate "http://conexaocomercial.mapfre.com.br/default.aspx?popup=true&framework=OAHxHCZGJxb6MRdHCSSrCyBoIhoJNh%2BVV24UfFamT3%2FAU2tqelBcXn0Xf0eifkFHS3P6f1XoR2ZrTWbae1P6W3j9Zkerfl5dTnQqZEeVV3DHQ3IsdULBTmw8a0pqc0xi&search=&alias=iFrameFerramentas&idArea=50077&idDocumento=56942"
ObjIe.Visible = True




a = 2


ObjIe.Visible = True


With ObjIe

Do While ObjIe.Busy
Application.Wait DateAdd("s", 2, Now)
Loop
Application.Wait Now + TimeValue("00:00:02")
.Document.getElementById("ctl00_txtCPF").Focus
.Document.getElementById("ctl00_txtCPF").Value = "27739463833"
.Document.getElementById("ctl00_ImageButton12").Click
Do While ObjIe.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
Application.Wait Now + TimeValue("00:00:03")


.Document.getElementById("ctl00_Conteudo_gvPropostas_ctl02_btnDetalhes").Click


Do While ObjIe.Busy
Application.Wait DateAdd("s", 1, Now)
Loop
Application.Wait Now + TimeValue("00:00:03")





.Document.getElementById("DetalhesProposta1_lnkbtnDocumentoEletronico").Click

Do While ObjIe.Busy
Application.Wait DateAdd("s", 1, Now)

Loop

Debug.Print .LocationURL
End With
End Sub

below the button you want to click, but already tried and can not.

.Document.getElementById("DetalhesProposta1_lnkbtnDocumentoEletronico").Click

Cant Help me?
Thanks<link href="StyleSheets/ModalPopUp.css" rel="stylesheet" type="text/css"><link href="StyleSheets/StyleSCO.css" rel="stylesheet" type="text/css"><link href="../StyleSheets/StyleSCO.css" rel="stylesheet" type="text/css"><link href="../StyleSheets/ModalPopUp.css" rel="stylesheet" type="text/css"><style type="text/css">

<input class="SYN_LNN" value="54" type="label" unselectable="on"><input id="syn_ctrl54" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
body

<input class="SYN_LNN" value="55" type="label" unselectable="on"><input id="syn_ctrl55" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="56" type="label" unselectable="on"><input id="syn_ctrl56" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
margin: 0px;

<input class="SYN_LNN" value="57" type="label" unselectable="on"><input id="syn_ctrl57" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="58" type="label" unselectable="on"><input id="syn_ctrl58" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
#modalPage

<input class="SYN_LNN" value="59" type="label" unselectable="on"><input id="syn_ctrl59" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="60" type="label" unselectable="on"><input id="syn_ctrl60" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
display: none;

<input class="SYN_LNN" value="61" type="label" unselectable="on"><input id="syn_ctrl61" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
position: absolute;

<input class="SYN_LNN" value="62" type="label" unselectable="on"><input id="syn_ctrl62" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
width: 100%;

<input class="SYN_LNN" value="63" type="label" unselectable="on"><input id="syn_ctrl63" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
height: 100%;

<input class="SYN_LNN" value="64" type="label" unselectable="on"><input id="syn_ctrl64" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
top: 0px;

<input class="SYN_LNN" value="65" type="label" unselectable="on"><input id="syn_ctrl65" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
left: 0px;

<input class="SYN_LNN" value="66" type="label" unselectable="on"><input id="syn_ctrl66" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="67" type="label" unselectable="on"><input id="syn_ctrl67" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
.modalBackground

<input class="SYN_LNN" value="68" type="label" unselectable="on"><input id="syn_ctrl68" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="69" type="label" unselectable="on"><input id="syn_ctrl69" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
filter: Alpha(Opacity=60);

<input class="SYN_LNN" value="70" type="label" unselectable="on"><input id="syn_ctrl70" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
-moz-opacity: 0.3;

<input class="SYN_LNN" value="71" type="label" unselectable="on"><input id="syn_ctrl71" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
opacity: 0.3;

<input class="SYN_LNN" value="72" type="label" unselectable="on"><input id="syn_ctrl72" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
width: 100%;

<input class="SYN_LNN" value="73" type="label" unselectable="on"><input id="syn_ctrl73" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
height: 100%;

<input class="SYN_LNN" value="74" type="label" unselectable="on"><input id="syn_ctrl74" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
background-color: #000000;

<input class="SYN_LNN" value="75" type="label" unselectable="on"><input id="syn_ctrl75" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
position: absolute;

<input class="SYN_LNN" value="76" type="label" unselectable="on"><input id="syn_ctrl76" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
z-index: 500;

<input class="SYN_LNN" value="77" type="label" unselectable="on"><input id="syn_ctrl77" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
top: 0px;

<input class="SYN_LNN" value="78" type="label" unselectable="on"><input id="syn_ctrl78" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
left: 0px;

<input class="SYN_LNN" value="79" type="label" unselectable="on"><input id="syn_ctrl79" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="80" type="label" unselectable="on"><input id="syn_ctrl80" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
.modalContainer

<input class="SYN_LNN" value="81" type="label" unselectable="on"><input id="syn_ctrl81" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="82" type="label" unselectable="on"><input id="syn_ctrl82" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
position: absolute;

<input class="SYN_LNN" value="83" type="label" unselectable="on"><input id="syn_ctrl83" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
width: 500px;

<input class="SYN_LNN" value="84" type="label" unselectable="on"><input id="syn_ctrl84" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
left: 50%;

<input class="SYN_LNN" value="85" type="label" unselectable="on"><input id="syn_ctrl85" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
top: 50%;

<input class="SYN_LNN" value="86" type="label" unselectable="on"><input id="syn_ctrl86" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
z-index: 750;

<input class="SYN_LNN" value="87" type="label" unselectable="on"><input id="syn_ctrl87" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="88" type="label" unselectable="on"><input id="syn_ctrl88" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
.modal

<input class="SYN_LNN" value="89" type="label" unselectable="on"><input id="syn_ctrl89" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="90" type="label" unselectable="on"><input id="syn_ctrl90" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
background-color: Transparent; /*border: solid 2px black;*/

<input class="SYN_LNN" value="91" type="label" unselectable="on"><input id="syn_ctrl91" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
position: relative;

<input class="SYN_LNN" value="92" type="label" unselectable="on"><input id="syn_ctrl92" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
top: -300px;

<input class="SYN_LNN" value="93" type="label" unselectable="on"><input id="syn_ctrl93" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
left: -300px;

<input class="SYN_LNN" value="94" type="label" unselectable="on"><input id="syn_ctrl94" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
z-index: 1000;

<input class="SYN_LNN" value="95" type="label" unselectable="on"><input id="syn_ctrl95" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
width: 10px;

<input class="SYN_LNN" value="96" type="label" unselectable="on"><input id="syn_ctrl96" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
height: 10px;

<input class="SYN_LNN" value="97" type="label" unselectable="on"><input id="syn_ctrl97" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
padding: 0px;

<input class="SYN_LNN" value="98" type="label" unselectable="on"><input id="syn_ctrl98" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="99" type="label" unselectable="on"><input id="syn_ctrl99" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
.modalTop

<input class="SYN_LNN" value="100" type="label" unselectable="on"><input id="syn_ctrl100" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="101" type="label" unselectable="on"><input id="syn_ctrl101" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
width: 592px;

<input class="SYN_LNN" value="102" type="label" unselectable="on"><input id="syn_ctrl102" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
background-color: #000099;

<input class="SYN_LNN" value="103" type="label" unselectable="on"><input id="syn_ctrl103" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
padding: 4px;

<input class="SYN_LNN" value="104" type="label" unselectable="on"><input id="syn_ctrl104" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
color: #ffffff;

<input class="SYN_LNN" value="105" type="label" unselectable="on"><input id="syn_ctrl105" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
text-align: right;

<input class="SYN_LNN" value="106" type="label" unselectable="on"><input id="syn_ctrl106" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="107" type="label" unselectable="on"><input id="syn_ctrl107" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
.modalTop a, .modalTop a:visited

<input class="SYN_LNN" value="108" type="label" unselectable="on"><input id="syn_ctrl108" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="109" type="label" unselectable="on"><input id="syn_ctrl109" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
color: #ffffff;

<input class="SYN_LNN" value="110" type="label" unselectable="on"><input id="syn_ctrl110" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="111" type="label" unselectable="on"><input id="syn_ctrl111" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
.modalBody

<input class="SYN_LNN" value="112" type="label" unselectable="on"><input id="syn_ctrl112" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="113" type="label" unselectable="on"><input id="syn_ctrl113" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
padding: 10px;

<input class="SYN_LNN" value="114" type="label" unselectable="on"><input id="syn_ctrl114" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="115" type="label" unselectable="on"><input id="syn_ctrl115" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
#modalPage2

<input class="SYN_LNN" value="116" type="label" unselectable="on"><input id="syn_ctrl116" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
{

<input class="SYN_LNN" value="117" type="label" unselectable="on"><input id="syn_ctrl117" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
display: none;

<input class="SYN_LNN" value="118" type="label" unselectable="on"><input id="syn_ctrl118" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
position: absolute;

<input class="SYN_LNN" value="119" type="label" unselectable="on"><input id="syn_ctrl119" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
width: 100%;

<input class="SYN_LNN" value="120" type="label" unselectable="on"><input id="syn_ctrl120" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
height: 100%;

<input class="SYN_LNN" value="121" type="label" unselectable="on"><input id="syn_ctrl121" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
top: 0px;

<input class="SYN_LNN" value="122" type="label" unselectable="on"><input id="syn_ctrl122" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
left: 0px;

<input class="SYN_LNN" value="123" type="label" unselectable="on"><input id="syn_ctrl123" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
}

<input class="SYN_LNN" value="124" type="label" unselectable="on"><input id="syn_ctrl124" class="SYN_BCH" role="button" value="-" type="label" unselectable="on">
</style>
 
You must log in or register to reply here.

Similar threads

A
  • Solved
Calendar form cancel button passing data to worksheet
Replies
7
Views
1K
AndyEd
A
J
  • Solved
VBA Web Scraping - FindElementBy - DownloadCSV Button ElementNotVisibleError Runtime error 11
2
Replies
15
Views
4K
johnd3099
J
V
  • Question Question
Issue with scraping with VBA
Replies
1
Views
724
John_w
J
M
  • Question Question
Help with FilterXML formula
Replies
0
Views
2K
montex01
M
L
  • Question Question
VBA works on work PC but not home PC
Replies
3
Views
2K
rollis13
rollis13

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top