Como abrir uma caixa de mensagem ao clicar em uma determinada célula no Excel?
Este artigo tem como objetivo mostrar o método de exibição de caixa de mensagem ao clicar em uma determinada célula no Excel.
Uma caixa de mensagem pop-up ao clicar em uma determinada célula com código VBA
Uma caixa de mensagem pop-up ao clicar em uma determinada célula com código VBA
Faça o seguinte para abrir uma caixa de mensagem ao clicar em uma determinada célula na planilha.
1. Shift para abrir a planilha com determinada célula de que você precisa para exibir a caixa de mensagem ao clicar nela. Clique com o botão direito na guia da planilha e selecione Ver código no menu do botão direito.
2. No Microsoft Visual Basic para Aplicações janela, copie e cole o código VBA abaixo na janela Código.
Código VBA: caixa de mensagem pop-up ao clicar em uma determinada célula
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then _
MsgBox "You have select cell " & Target.Address & vbCrLf & "Please input a number", vbInformation, "Kutools for Excel"
End Sub
Notas:
1). No código, “A1: B10” significa que uma caixa de mensagem aparecerá ao clicar em qualquer célula deste intervalo.
2). “Você selecionou uma célula” e “Insira os dados” são o conteúdo exibido da caixa de mensagem.
Altere-os conforme necessário.
3. aperte o outro + Q simultaneamente para fechar o Microsoft Visual Basic para Aplicações janela.
A partir de agora, ao clicar em qualquer célula do intervalo A1: B10, você obterá uma caixa de mensagem conforme a imagem mostrada abaixo.
Artigos relacionados:
- Como criar um temporizador de caixa de mensagem para fechar automaticamente a caixa de mensagem após certo tempo no Excel?
- Como copiar texto de caixa de mensagem no Excel?
- Como abrir uma caixa de mensagem ao ativar / abrir uma planilha especificada no Excel?
- Como abrir uma caixa de mensagem pop-up para exibir o intervalo de células ou valores de células no Excel?
- Como abrir uma caixa de mensagem pop-up se o valor da célula mudar dentro de um intervalo 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!