Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Alterar texto em vez de extrair!
Alterar texto em vez de extrair!
Bom dia!
No wesbscraping por VBA tem como alterar o valor ao invés de extrair?
No wesbscraping por VBA tem como alterar o valor ao invés de extrair?
Re: Alterar texto em vez de extrair!
Direto na página?
Resposta curta: não
Resposta longa: sim, mas não surgirá efeito prático. Quando a página for submetida ao servidor, ela ou será considera inválida ou voltará ao estado original
Resposta curta: não
Resposta longa: sim, mas não surgirá efeito prático. Quando a página for submetida ao servidor, ela ou será considera inválida ou voltará ao estado original
Re: Alterar texto em vez de extrair!
Eu sei, mas só vou alterar páginas que eu mesmo criei.
O meu objetivo é só ter uma planilha de excel onde eu possa ver os dados dela montado em um documento ao lado, tipo a visualização do explorer, e depois , talvez salvar o meu documento alterado numa pasta. O site documento/modelo seria visualizado de acordo com o que fosse escolhido na 1ª coluna da linha e seria preenchido com os dados das outras colunas da linha.
O meu objetivo é só ter uma planilha de excel onde eu possa ver os dados dela montado em um documento ao lado, tipo a visualização do explorer, e depois , talvez salvar o meu documento alterado numa pasta. O site documento/modelo seria visualizado de acordo com o que fosse escolhido na 1ª coluna da linha e seria preenchido com os dados das outras colunas da linha.
Re: Alterar texto em vez de extrair!
TUVOK,
A resposta curta sendo não, vamos à longa.
Via Selenium, só usando javascript. Aqui um exemplo de como executa-lo na página:
A partir daí, é usar o mesmo para alterar a página. Neste vídeo uso javascript para alterar uma página direto no navegador:
https://www.youtube.com/watch?v=1wgSxzwUSIQ
A resposta curta sendo não, vamos à longa.
Via Selenium, só usando javascript. Aqui um exemplo de como executa-lo na página:
Código: Selecionar todos
Private Sub Execute_Script()
Dim driver As New ChromeDriver
driver.Get "https://en.wikipedia.org/wiki/Main_Page"
Dim title
title = driver.ExecuteScript("return document.title;")
Debug.Assert "Wikipedia, the free encyclopedia" = title
driver.Quit
End Sub
https://www.youtube.com/watch?v=1wgSxzwUSIQ
Re: Alterar texto em vez de extrair!
M-U-I-T-O O-B-R-I-G-A-D-O!
Voce é 10!
Você é o Cara!
Infelizmente, não entendi como usar o código, nem percebí o que mudou na página.
Desculpe minha ignorância!
Poderia me explicar?
Ah, propósito, tô trabalhando em um projeto que achei na internt thailandeza sobre a task pane que te falei.
Posso te enviar o link por aqui?
Voce é 10!
Você é o Cara!
Infelizmente, não entendi como usar o código, nem percebí o que mudou na página.
Desculpe minha ignorância!
Poderia me explicar?
Ah, propósito, tô trabalhando em um projeto que achei na internt thailandeza sobre a task pane que te falei.
Posso te enviar o link por aqui?
Re: Alterar texto em vez de extrair!
TUVOK,
O exemplo do task pane, é melhor colocar no fórum de modelos prontos. Quanto ao código para mudar a página, veja se isso ajuda:
O exemplo do task pane, é melhor colocar no fórum de modelos prontos. Quanto ao código para mudar a página, veja se isso ajuda:
Código: Selecionar todos
Private Sub Exemplo()
Dim driver As New ChromeDriver
driver.Get "https://en.wikipedia.org/wiki/Main_Page"
driver.ExecuteScript ("document.getElementById('mp-topbanner').innerHTML = '<marquee><h1 style=\'font-size:90px\'>Agora esse é o meu site</h1></marquee>';")
MsgBox "Rá"
driver.Quit
End Sub
Re: Alterar texto em vez de extrair!
Fantástico!
Justamente do que precisava!
Estava quase desistindo, tentando inserir input's nos documentos, o que seria muito mais trabalhoso.
Muito Obrigado mesmo!
Mas, sem querer ser chato ou abusado, gostaria de explorar mais de seus conhecimentos.
Os links que falei seguem abaixo, por que pensei que se eu colocar RESOLVIDO aqui agora você nem iria ver esta mensagem.
Acontece que tenho tido algum progresso sim com as taskpanes, mas acredito que, assim como você fez com este tópico, acertando em cheio a solução, com certeza o fará também com as taskpanes.
Do seu jeito rápido, simples e objetivo, evitando a canseira e a desilusão que, às vezes, nos faz desistir.
Mais uma vez, muitíssimo obrigado!
http://bluesofts.net/Video/Video?guid=3 ... b4daf.html
http://atoolspro.com/install-activex-co ... ually.html
Justamente do que precisava!
Estava quase desistindo, tentando inserir input's nos documentos, o que seria muito mais trabalhoso.
Muito Obrigado mesmo!
Mas, sem querer ser chato ou abusado, gostaria de explorar mais de seus conhecimentos.
Os links que falei seguem abaixo, por que pensei que se eu colocar RESOLVIDO aqui agora você nem iria ver esta mensagem.
Acontece que tenho tido algum progresso sim com as taskpanes, mas acredito que, assim como você fez com este tópico, acertando em cheio a solução, com certeza o fará também com as taskpanes.
Do seu jeito rápido, simples e objetivo, evitando a canseira e a desilusão que, às vezes, nos faz desistir.
Mais uma vez, muitíssimo obrigado!
http://bluesofts.net/Video/Video?guid=3 ... b4daf.html
http://atoolspro.com/install-activex-co ... ually.html
Re: Alterar texto em vez de extrair!
driver.ExecuteScript ("document.getElementById('mp-topbanner').innerHTML = '<marquee><h1 style=\'font-size:90px\'>Agora esse é o meu site</h1></marquee>';")
driver.FindElementsByXPath("//*[@id=""OFÍCIOS-SEI_24156""]/table/tbody/tr[11]/td[2]").Value = Sheets("BD").Range("G" & Linha).Text
Tentei algumas vezes e não está dando certo.
Como exatamente devo mudar minha sintaxe?
Valeu!
driver.FindElementsByXPath("//*[@id=""OFÍCIOS-SEI_24156""]/table/tbody/tr[11]/td[2]").Value = Sheets("BD").Range("G" & Linha).Text
Tentei algumas vezes e não está dando certo.
Como exatamente devo mudar minha sintaxe?
Valeu!