O Excel pode converter automaticamente uma entrada em um link clicável dentro da mesma pasta de trabalho?

Question

Por favor, deixe-me esclarecer melhor a minha pergunta. O que eu gostaria de fazer é o seguinte: 1) Tenha uma pasta de trabalho com, digamos, 100 planilhas
2) Cada planilha tem um nome de guia diferente
3) Cada planilha contém um intervalo de células, onde eu vou digitar entradas que podem ou não ser o nome da guia de outra planilha
4) Se eu inserir o nome da guia de uma dessas planilhas em qualquer célula, em qualquer planilha, esse nome será automaticamente vinculado a essa planilha, de modo que, ao clicar nessa célula, eu serei redirecionada para essa planilha. Nesta planilha de destino, posso fazer o mesmo com as células e ser redirecionado para outra planilha, e assim por diante, pulando de uma planilha para outra.

Alguma ideia de como configurar um intervalo de células dessa maneira?

Sei que o Excel cria automaticamente hiperlinks da Internet quando uma entrada de célula começa com "http: //" ou "www." Isso também pode ser feito quando o destino está no mesmo documento e não na Web?

A solução mais próxima que consegui encontrar é essa fórmula, inserida, por exemplo, na célula C3:

= IF (A3="P", HIPERLINK ("[Test.xlsx] Produção! D2", "NEXT > > >"), HIPERLINK ("[Test.xlsx] Suprimento! D2", " PRÓXIMO > > > "))

Se o valor na célula A3 = P e eu clicar no hiperlink na célula C3, ele me levará para a célula D2 da planilha de produção. Para qualquer outro valor em A3, ele me levará para a célula D2 da planilha de suprimentos.

Mas isso ainda não é o que estou procurando. Eu gostaria que, no meu caso, eu pudesse inserir "Produção" em A3, ser convertido em um link clicável, como o nome de uma planilha, e ser redirecionado para a planilha Produção quando clico em A3, não em outras células.

Eu examinei as fórmulas IF, mas elas não podem executar nenhuma ação além de calcular, copiar valores, etc. Então, suponho que minha única opção é usar o VBA, que infelizmente não é meu strong.

Qualquer ajuda será muito apreciada.

    

Answer 1

Eu acredito que os Códigos VBA são a melhor maneira de resolver o seu problema.

Agora, deixe-me dizer como usar esse código.

Isso pode ser usado como Worksheet_Change ou CommandButton_Click , Evento ou até mesmo como uma macro .

Agora, o que é melhor fazer é, na Planilha em algumas CÉLULAS EM BLANCO, inserir os nomes das planilhas, no meu exemplo O endereço da célula é A2 para baixo . De acordo com o "Evento do Código" , o VBA os converterá em Hiperlinks.

Private Sub CommandButton1_Click()
    Dim i As Long
      With Sheets("Sheet1")
        For i = 2 To .Range("A" & .Rows.Count).End(xlUp).Row
         .Hyperlinks.Add Anchor:=.Range("A" & i), Address:="", _
           SubAddress:="'" & .Range("A" & i).Value & "'!A1", TextToDisplay:=.Range("A" & i).Value
          Next i
        End With
  End Sub

NB: Verifique se a quarta linha do código é, para i = 2 a .Range ("A" & .Rows ,

Este 2 é o número da linha & Um nome de coluna significa que a célula A2 é a primeira célula de onde começa a área especificada. Você pode modificar isso conforme necessário.

Além disso, minha sugestão é, primeiro usar o código como evento de clique do botão de comando.

Espero que isso ajude você.

Nota: este código foi testado por mim antes de ser publicado como a Solução.

    

Answer 2

Note, adicionando essas linhas como ANSWER para ajudar o OP, por sugestão dele.

Siga estas etapas para concluir o trabalho.

1. Ir para a folha em branco, na célula A2 & A3 escreva o nome da folha como Folha1, Folha2.
2. Clique na guia Desenvolvedor, localize o Modo de design e clique nele.
3. À esquerda, é Inserir, clique nele e selecione o botão de comando e desenhe em qualquer lugar da área em branco da Planilha.
4. Clique duas vezes no botão de comando desenhado, o Excel abrirá o VBA Editor.
5. Você encontra as linhas CommandButton1_Click () e End Sub.
6. Entre Copiar e Colar o Código. Lembre-se de iniciar Copiar de tipo 2 e terminar com a linha 8.
7. Feche a janela do editor do VBA e clique no botão Design novamente, isso será normal.
8. Finalmente, clique no botão de comando.

Você encontra os nomes das folhas em A2 & A3 virar para Hyperlink.

NB: Da célula A2 para baixo, você pode escrever quantos nomes de folha na coluna.