Ir ao conteúdo
  • Cadastre-se

Fábio Gomes_726715

Membro Júnior
  • Posts

    1
  • Cadastrado em

  • Última visita

Reputação

0
  1. Pessoal. Boa noite. Estou com um certo problema para inserir um número que tenho numa planilha em numa página da internet. Acontece que pelo objCollection(i).Value não é possível. A questão é somente conseguir inserir o número do processo judicial via VBA na página http://www.tjrs.jus.br/busca/?tb=proc O nome do objeto na página é: num_processo_mask O captcha estou ciente que vai ser adicionado manualmente. Segue código: Public Sub InserirNrProc() On Error Resume Next Dim i As Long Dim IE As Object Dim objElement As Object Dim objCollection As Object Set IE = CreateObject("InternetExplorer.Application") IE.navigate ("http://www.tjrs.jus.br/busca/?tb=proc") IE.Visible = True Do While IE.Busy Application.Wait DateAdd("s", 1, Now) Loop Set objCollection = IE.document.getElementsByTagName("input") i = 0 While i < objCollection.Length If objCollection(i).Name = "num_processo_mask" Then objCollection(i).Value = 123456789 End If i = i + 1 Wend End Sub Desde já agradeço. Att

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...