Excel excel hiperlink com preenchimento automatico

[Francislei Oliveira]

boa tarde, alguém poderia me auxiliar em uma duvida, criei um link para ser direcionado à uma pagina da Internet em uma celula, existe algum comando, que ao clicar no link, já ir para pagina especifica e já preencher o campo da Internet com o conteúdo da célula? Gostaria que ao clicar no link números da chave se acesso, já ir para o site www.fsist.com.br e ja preeencher com o conteudo.

E estou com problema no Procv, não está retornando o valor da tabela da busca ( Planilha CHAVE DE ACESSO ) em destaque de vermelho.

 

obrigado

SIARE.xls

[Visitante]

6 horas atrás, Francislei Oliveira disse:

... existe algum comando,... já ir para pagina especifica e já preencher o campo da Internet com o conteúdo da célula?

É possível via macro e sem precisar inserir os Hyperlinks nas células. Retorne se houver interesse.

 

E estou com problema no Procv, não está retornando o valor da tabela da busca ( Planilha CHAVE DE ACESSO ) em destaque de vermelho.

O PROCV() não só está retornando os erros #N/D (que você destacou em vermelho) como também está retornando os demais resultados incorretos, por conta do ultimo argumento na sua fórmula. Veja abaixo.

 

 

Na sua fórmula substitua o ultimo argumento, conforme indicado em vermelho abaixo.

atual ~~~> =PROCV(C3;'Detalhamento dos débitos'!$A$2:$C$1675;3;1)

altere para ~~~> =PROCV(C3;'Detalhamento dos débitos'!$A$2:$C$1675;3;0)

 

Por exemplo, verifique que nos três primeiros registros da sua planilha os valores retornados pelas suas fórmulas estão incorretos. Veja abaixo os resultados atuais.

35160807232776000186550010000023021050040800
42180155093694000574550040000001041002222326
42180155093694000574550040000001041002222326

 

Após alterar o parâmetro na fórmula os valores retornados serão esses abaixo. Corretos.

35160103649311000174550010000032981000032986
35160161312278000199550010000147231000147234
35160168365501000105550000000092421000225448

[Francislei Oliveira]

@osvaldomp bom dia! Me interesso na macro! Mas nunca fiz uma, não faço ideia! Estou em casa. Logo mais verifico procv! Obrigado 

[Visitante]

Segue uma sugestão via macro. Requer o Internet Explorer.

Instale uma cópia do código abaixo no módulo da planilha Chave de Acesso NF-e, assim:
1. copie o código daqui
2. clique com o direito na guia daquela planilha e escolha 'Exibir Código' para acessar o editor de VBA
3. cole o código na janela em branco que vai se abrir

Aproveite para marcar duas referências, caso não estejam marcadas no seu Excel.

No menu do editor de VBA clique em Ferramentas / Referências ... marque as duas referências destacadas em vermelho na figura abaixo e clique em OK.
4. feito! 'Alt+Q' para retornar para a planilha e testar

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 Dim oWeb As Object
  If Target.Column <> 4 Then Exit Sub
  Set oWeb = CreateObject("InternetExplorer.Application")
  oWeb.Navigate "https://www.fsist.com.br/"
  oWeb.Visible = True
  Do Until oWeb.ReadyState = READYSTATE_COMPLETE
  Loop
  oWeb.document.All.Item("chave").innerText = Target.Value
  'oWeb.document.getElementById("butconsulta").Click
  Cancel = True: Target.Offset(, 1).Interior.Color = 65535
End Sub

 

funcionamento - para consultar uma NFe no site utilizando a chave da NFe, na planilha Chave de Acesso NF-e, coluna D, dê duplo clique na célula que contém a chave da NFe que deseja consultar. O código irá acessar o site e irá colocar a chave na caixa para consulta. A ante penúltima linha do código acima é um comando para clicar em CONSULTA NOVA, na página do site. Aquele comando está desativado, eu sugiro que você faça os testes iniciais e depois ative aquele comando removendo o apóstrofo do início da linha.

O código irá pintar de amarelo a célula à direita da chave consultada.

 

Eu sugiro que você remova os Hyperlinks das chaves pois eles poderão criar algum conflito com a macro.