Notifications
Clear all

Resultado de Formula Se; Procv e Hiperlink

5 Posts
3 Usuários
0 Reactions
1,030 Visualizações
(@anglima)
Posts: 2
New Member
Topic starter
 

Pessoa boa tarde!
Preciso de uma ajuda em relação à uma formula que estou tentando usar, explicando as Planilhas:
1º) Planilha 1 onde está mapeada uma planta e divida em linhas e colunas representando referências.
2º) Planilha 2 onde faço o input de informações e coloco a referência na Planta com base na Planilha 1

Quando faço o input na Planilha 2 as células da Planilha 1 calculam e descobrme que existe uma referência em determinada célula, então essa célula admite determinado valor da Planilha 2, o resultado desse cálculo é um procv com o Hiperlink para Planilha 2, para caso queira visualizar os dados da Planilha 2.
Qual o problema?
O resultado das formulas Se e Procv estão OK, a formulá de link também não apresenta erro, porém quando clico na Célula para abrir a Planilha não abre nada, nem ao menos aparece o erro de caminho no arquivo. Já tentei várias coisas, e não consigo encontrar o problema.
Segue a Formula abaixo:

=SEERRO(SE(E(COL()=PROCV(COL();'\TDBSORSVR001ComumPublicoCCRHKT MAP[ANDON HENKATEN.xlsx]MASTER'!$D$7:$D$300000;1;0);LIN()=PROCV(LIN();'\TDBSORSVR001ComumPublicoCCRHKT MAP[ANDON HENKATEN.xlsx]MASTER'!$E$7:$E$300000;1;0);(LIN()*COL())+(LIN()-COL())*0,0001=PROCV((LIN()*COL())+(LIN()-COL())*0,0001;'\TDBSORSVR001ComumPublicoCCRHKT MAP[ANDON HENKATEN.xlsx]MASTER'!$AB$7:$AB$300000;1;0));HIPERLINK(PROCV((COL()*LIN())+(LIN()-COL())*0,0001;'\TDBSORSVR001ComumPublicoCCRHKT MAP[ANDON HENKATEN.xlsx]MASTER'!$AB$7:$AC$300000;2;0);PROCV((COL()*LIN())+(LIN()-COL())*0,0001;'\TDBSORSVR001ComumPublicoCCRHKT MAP[ANDON HENKATEN.xlsx]MASTER'!$AB$7:$AC$300000;2;0));"");"")

 
Postado : 20/02/2018 11:12 am
carlosrgs
(@carlosrgs)
Posts: 631
Prominent Member
 

Boa tarde anglima

Não sei se estou falando coisa com coisa, mas até onde eu sei nós inserimos um hiperlink numa célula, até ai OK.
Exemplo ao digitar na célula A1 o endereço do forum www.planilhando.com.br automaticamente é inserido o link

Mas se utilizar uma fórmula/função com HIPERLINK para buscar esse valor o excel não abrirá ao clicar
Nos arquivos que já precisei fazer a busca de link, eu criei uma coluna para inserir a Função GetAddress

V.B.A. (Alt+F11)

Function GetAddress(HyperlinkCell As Range)
GetAddress = Replace(HyperlinkCell.Hyperlinks(1).Address, "mailto:", "")
End Function

Ficará na célula A1 com www.planilhando.com.br e na B1 com http://www.planilhando.com.br/ (resultado da função)
E o PROCV em vez de retornar o valor da coluna A, peço da coluna B!

_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.

 
Postado : 20/02/2018 11:35 am
(@anglima)
Posts: 2
New Member
Topic starter
 

Cara obrigado por me esclarecer, porém sou bem fraco em VBA, será que você consegue me ajudar sendo um pouco mais detalhado nessa função GetAddress, onde eu colocaria ela? Não sei se é possível, eu te mandar por e-mail as planilhas para você entender melhor.

 
Postado : 21/02/2018 4:55 am
carlosrgs
(@carlosrgs)
Posts: 631
Prominent Member
 

Para inserir a função é simples.

Com a tela do Excel aberta aperte Alt+F11

Vá em Inserir -> Modulos e cole o texto do código:

Function GetAddress(HyperlinkCell As Range)
GetAddress = Replace(HyperlinkCell.Hyperlinks(1).Address, "mailto:", "")
End Function

Feche a janela que abriu e já pode começar a utilizar a função criada por VBA "GetAddress"

Após finalizar salvar a planilha habilitada para Macros

em vez de .xlsx salvar com .xlsm

_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.

 
Postado : 21/02/2018 5:40 am
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Anglima, bom dia

Qual conteúdo (valor/tipo) o argumento dentro da função HIPERLINK estaria retornando? É uma referência à intervalos da própria pasta de trabalho ou é um link externo pra internet/e-mail?
Se for referência, tem que ser tipo texto e constar o nome da pasta de trabalho antes (entre colchetes, se tiver caracteres especiais/espaços):

Tipo, assim funciona:

=HIPERLINK("[Pasta 1.xlsx]Plan2!B5")

Mas assim não funciona:

=HIPERLINK("Plan2!B5")

 
Postado : 21/02/2018 7:43 am