Como adicionar a ponta do mouse sobre uma determinada forma no Excel?
Em muitos casos, você precisa atribuir a macro a uma determinada forma para executá-la clicando nela em sua planilha. Depois de atribuir macro à forma, adicionar o mouse sobre a ponta pode ajudar a lembrá-lo do que a forma fará em uso futuro. Este artigo mostra dois métodos para adicionar a ponta do mouse sobre uma determinada forma no Excel.
Adicione o mouse sobre a ponta a uma determinada forma adicionando um hiperlink
Adicione a ponta do mouse sobre uma determinada forma com o código VBA
Adicione o mouse sobre a ponta a uma determinada forma adicionando um hiperlink
Você pode adicionar um hiperlink com a dica de tela a uma determinada forma na planilha. Faça o seguinte.
1. Clique com o botão direito do mouse na forma desejada para adicionar o mouse sobre a ponta e, em seguida, clique Hyperlink no menu do botão direito. Veja a imagem:
2. No Insira o hyperlink caixa de diálogo, clique no botão Dica de tela botão. E no Definir Dica de Tela de Hiperlink caixa de diálogo, insira o texto de dica de tela que você precisa exibir enquanto passa o mouse sobre a forma. Por fim, clique no OK botão. Veja a imagem:
3. Quando ele retorna ao Insira o hyperlink caixa de diálogo, clique no botão Bookmark botão. Em seguida, insira A1 em Tipo na caixa de referência de célula do Selecionar lugar no documento caixa de diálogo e, finalmente, clique no OK botão.
4. Clique na OK botão no Insira o hyperlink caixa de diálogo para concluir a criação do hiperlink.
Agora você pode ver a dica de tela exibida ao passar o mouse sobre a forma.
Adicione a ponta do mouse sobre uma determinada forma com o código VBA
Você pode adicionar facilmente o mouse sobre a ponta a uma determinada forma após executar o seguinte código VBA.
1. Abra a planilha que contém a forma que você exibirá como dica ao mover o mouse sobre ela. Clique com o botão direito na guia da planilha e clique em Exibir código no menu de contexto.
2. No Microsoft Visual Basic para Aplicações janela, copie o código VBA abaixo para a janela de código.
Código VBA 1: Adicione o mouse sobre a ponta a uma determinada forma
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updated by Extendoffice 2018/3/30
If Target.Address = Range("A1").Address Then
Call MoveRow
End If
End Sub
3. Clique inserção > Módulo. Em seguida, insira o código VBA abaixo na janela Módulo.
Código VBA 2: Adicione o mouse sobre a ponta a uma determinada forma
Sub Text()
'Updated by Extendoffice 2018/3/30
Dim xShape As Shape
Dim xRg As Range
On Error Resume Next
Application.EnableEvents = False
Set xShape = ActiveSheet.Shapes("Rectangle 4")
If Not xShape Is Nothing Then
ActiveSheet.Hyperlinks.Add xShape, "", "A1", ScreenTip:="Click to run Macro "
End If
If ActiveSheet.Hyperlinks(1).SubAddress = "A1" Then
Call MoveRow
End If
Application.EnableEvents = True
End Sub
Notas:
3. aperte o F5 chave para executar o código. Em seguida, a dica de tela especificada é adicionada à forma certa imediatamente.
Artigos relacionados:
- Como alterar automaticamente o tamanho da forma com base / dependente do valor da célula especificado no Excel?
- Como preencher uma forma com uma cor de fundo transparente no Excel?
- Como ocultar ou reexibir uma determinada forma com base no valor de célula especificado no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!