Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Copiar tabela na internet e colar no Excel - VBA

A Web está aí, não há como negar. Ela é onipresente em praticamente toda operação eletrônica realizada nos dias de hoje. Como não podia ser diferente, o Excel, ferramenta máxima para analistas e profissionais das mais diversas áreas do mercado precisa estar alinhado com esta necesssidade. E ele está! Neste forum, o debate é focado em expor dúvidas, sugestões, modelos de código e exemplos de uso do Excel na Integração com tecnologias Web.
binhonik
Acabou de chegar
Acabou de chegar
Mensagens: 1
Registrado em: Qui Set 28, 2017 9:48 pm

Copiar tabela na internet e colar no Excel - VBA

Mensagem por binhonik »

Pessoal, desculpem o nível extremamente principiante no assunto, mas preciso encontrar uma forma de copiar três tabelas de um determinado site (http://www.mercadobitcoin.com.br/BRLBTC/negociacoes) e colar em uma planilha do excel. Simples assim, porém, devido ao pouco conhecimento, não estou conseguindo fazer. Me ajudem por favor.

O que consegui até agora foi apenas abrir a página web:

Sub Abre_IE()

Dim URL As String
URL = "https://www.mercadobitcoin.com.br/BRLLTC/negociacoes/"
Dim ie As Object
Set ie = CreateObject("internetexplorer.application")
ie.Visible = True
ie.navigate URL
Do While ie.ReadyState <> 4
DoEvents
Loop

ie.Document.getelementbyid("???????").Click
ie.Document.getelementbyid("???????").Copy

Do While ie.ReadyState <> 4
DoEvents
Loop

ActiveSheet.Paste Destination:=Worksheets("Plan1").Cell("A1")

End Sub


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Peterson
Acabou de chegar
Acabou de chegar
Mensagens: 5
Registrado em: Sáb Jun 24, 2017 2:34 pm

Re: Copiar tabela na internet e colar no Excel - VBA

Mensagem por Peterson »

Use a Biblioteca do Selenium Babic


Responder