Excel VBA Evento WorkSheet_SelectionChange Linha Coluna MsgBox | M1 – Aula 75 – 42
Curso Excel Planilha VBA Tutorial e Exemplo de Planilha explicativos em detalhes como também video aulas passo a passo de como fazer uso do Evento de Planilha WorkSheet_SelectionChange Linha Coluna MsgBox 42

Faça o Download da Planilha Evento WorkSheet_SelectionChange Linha Coluna MsgBox
Excel VBA Evento WorkSheet_SelectionChange Linha Coluna MsgBox | M1 – Aula 75 – 42.xlsm
Aprenda como usar o evento Worksheet_SelectionChange no Excel VBA para exibir linha e coluna em MsgBox automaticamente.
Aula 75 com videoaula, exercícios e planilha de exemplo Curso Excel VBA – Aula 75 (Parte 42): Como Usar o Evento Worksheet_SelectionChange para Exibir Linha e Coluna com MsgBox no Excel
Nesta aula do Curso Completo de Excel VBA, você aprenderá como utilizar o evento Worksheet_SelectionChange para identificar a linha e a coluna da célula selecionada e, em seguida, exibir essas informações em uma caixa de mensagem (MsgBox). Essa técnica é extremamente útil para criar sistemas de auditoria, relatórios interativos e planilhas que precisam fornecer feedback imediato ao usuário.
Além disso, você terá acesso a videoaulas explicativas, planilhas de exemplo para download e exercícios práticos que reforçam o aprendizado. Dessa forma, o objetivo é proporcionar um treinamento completo, capacitando você a aplicar macros VBA enxutas e eficientes em cenários reais.
🎯 Objetivo da Aula
O foco principal desta aula é ensinar como usar o evento Worksheet_SelectionChange para detectar a célula selecionada e, em seguida, informar ao usuário a linha e a coluna correspondentes. Assim, você poderá criar planilhas mais interativas e dinâmicas, que respondem em tempo real às ações do usuário.
Portanto, essa técnica é ideal para:
- Planilhas de auditoria que precisam registrar a célula acessada
- Sistemas de treinamento em Excel, mostrando ao aluno onde está clicando
- Relatórios interativos que exibem informações adicionais ao selecionar células
- Planilhas de apoio que orientam o usuário durante a navegação
- Aplicações VBA que exigem monitoramento de seleção
🧠 Por que usar o evento Worksheet_SelectionChange?
O Worksheet_SelectionChange é acionado sempre que o usuário seleciona uma célula diferente em uma planilha. Ou seja, ele permite monitorar a navegação do usuário e reagir a cada clique.
Consequentemente, ao aplicar esse evento para exibir linha e coluna, você cria planilhas inteligentes, que fornecem informações imediatas sobre a posição da célula. Além disso, essa técnica pode ser combinada com outras macros, como validação de dados, preenchimento automático ou exibição de instruções.
Dessa forma, dominar esse evento é essencial para quem deseja criar sistemas profissionais e interativos no Excel VBA.
📥 Planilha de Exemplo para Download
Para facilitar seu aprendizado, disponibilizamos uma planilha modelo com os exemplos abordados nesta aula. Assim, você pode baixá-la gratuitamente e acompanhar cada passo da explicação.
Arquivo:
📁 Planilha Exemplo – Worksheet_SelectionChange Linha Coluna MsgBox – M1 – Aula 🔗
🔑 Área de Membros com conteúdo exclusivo
📌 O que você vai aprender nesta aula:
- Como funciona o evento
Worksheet_SelectionChangeno Excel VBA - Como identificar a linha e a coluna da célula selecionada
- Como exibir informações em uma MsgBox automaticamente
- Criar planilhas interativas que respondem ao clique do usuário
- Evitar erros de navegação com mensagens contextuais
- Desenvolver sistemas de auditoria e relatórios dinâmicos
- Integrar o evento com outras macros para soluções completas
- Aplicar lógica condicional para personalizar as mensagens exibidas
🔍 Exemplo prático com código VBA
✅ Exemplo – Exibir linha e coluna em MsgBox
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
🔑 Área de Membros com conteúdo exclusivo
Application.EnableEvents = True
End Sub
Este código é executado sempre que o usuário seleciona uma célula. Em seguida, ele exibe uma MsgBox informando a linha e a coluna da célula selecionada. Dessa forma, você cria uma planilha que fornece feedback imediato ao usuário.
🧩 Aplicações práticas no dia a dia
Imagine que você está desenvolvendo uma planilha de treinamento em Excel. Ao selecionar qualquer célula, o sistema exibe uma mensagem indicando a linha e a coluna. Assim, o aluno entende melhor a estrutura da planilha.
Além disso, em planilhas de auditoria, essa técnica pode ser usada para registrar quais células foram acessadas. Portanto, você terá um histórico de navegação que pode ser útil em relatórios de controle.
Dessa forma, você economiza tempo, melhora a experiência do usuário e garante maior interatividade nas planilhas.
🎥 Videoaula explicativa
A aula foi gravada com foco na clareza e objetividade, explicando cada linha de código e sua função. Assim, você verá, passo a passo, como estruturar o código VBA, onde inseri-lo e como testá-lo na prática. Ao final, será capaz de adaptar os exemplos para suas próprias planilhas e necessidades.
📚 Conclusão
Dominar o evento Worksheet_SelectionChange para exibir linha e coluna em uma MsgBox é uma habilidade essencial para quem deseja criar planilhas profissionais e interativas com Excel VBA. Com isso, você garante maior usabilidade, melhora a experiência do usuário e torna seus sistemas mais inteligentes.
Além disso, ao aplicar os conceitos aprendidos nesta aula, você estará mais preparado para desenvolver soluções personalizadas, otimizando processos e ganhando produtividade. Por fim, lembre-se de praticar com os exercícios propostos e explorar os exemplos fornecidos para fixar o conteúdo.
🙌 Agradecimento
Cada linha de código que você aprende é um passo em direção à excelência em automação com Excel VBA. Portanto, continue praticando, explorando e aplicando os conhecimentos adquiridos. Estou aqui para te ajudar nessa jornada.
👨🏫 Prof. Expedito Marcondes
✉️ suportecursovba@gmail.com
🔗
Nesta video aula excel vba [ M1 – Aula 75 ], aprenderemos a lidar com Evento WorkSheet_SelectionChange Linha Coluna MsgBox 42, retornando linha coluna ao seleciona
Aqui estão alguns exemplos práticos de procedimentos que utilizam o evento Worksheet_Change:
🎓 Excel VBA – Entendendo o Evento Worksheet_SelectionChange! 🔥
Queridos alunos,
É com imensa gratidão que trago mais uma videoaula incrível, abordando um dos eventos mais úteis e dinâmicos do Excel VBA: 📌 Worksheet_SelectionChange – O evento que detecta quando uma célula é selecionada e retorna informações importantes, como linha e coluna, permitindo interações mais avançadas com o usuário.
Dominar esse conceito abre novas possibilidades na automação de planilhas, tornando suas soluções mais inteligentes e interativas. 🚀
📖 Frases Bíblicas Inspiradoras Para Nossa Jornada no Conhecimento
✝️ “O coração do sábio busca o conhecimento, mas a boca dos tolos se alimenta de insensatez.”
– Provérbios 15:14
✝️ “A sabedoria é a coisa principal; adquire, pois, a sabedoria, e com todos os teus bens adquire o entendimento.”
– Provérbios 4:7
✝️ “O Senhor dá a sabedoria; da sua boca é que vem o conhecimento e o entendimento.”
– Provérbios 2:6
Que estas palavras fortaleçam sua caminhada e revigorem sua força de vontade em buscar mais conhecimento e aperfeiçoamento, pois a sabedoria nos guia para caminhos de honra e sucesso!
✨ A Importância da Lógica na Programação
A lógica é fundamental para resolver problemas de forma clara e estruturada! No mundo atual, quem domina a programação e a lógica está à frente no mercado de trabalho, criando soluções eficientes para empresas e sendo altamente valorizado.
🎯 Aprender VBA permite que você crie soluções automatizadas e seja requisitado no seu trabalho! 💡 Seja reconhecido como um especialista e conquiste oportunidades únicas! 🚀 A lógica e a programação são ferramentas de crescimento humano, profissional e espiritual!
✅ Exemplos de Macros VBA – Evento Worksheet_SelectionChange
📌 Exemplo 1 – Exibir a Linha e a Coluna ao Selecionar
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Você selecionou a linha " & Target.Row & " e a coluna " & Target.Column
End Sub
📌 Exemplo 2 – Destacar a Célula Selecionada
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.Color = RGB(255, 255, 0) ' Amarelo
End Sub
📌 Exemplo 3 – Exibir o Nome da Coluna Selecionada
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Você selecionou a coluna: " & Split(Cells(1, Target.Column).Address, "$")(1)
End Sub
📌 Exemplo 4 – Impedir Seleção de Células Específicas
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:D10")) Is Nothing Then
MsgBox "Você não pode selecionar essa área!"
Application.Undo
End If
End Sub
📌 Exemplo 5 – Exibir Mensagem Somente Para Coluna Específica
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 5 Then
MsgBox "Você selecionou a coluna E!"
End If
End Sub
📌 Exemplo 6 – Colorir Linha Selecionada
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Rows(Target.Row).Interior.Color = RGB(200, 200, 255) ' Azul
End Sub
📌 Exemplo 7 – Registrar Última Célula Selecionada em Outra Célula
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("Z1").Value = "Última seleção: " & Target.Address
End Sub
📌 Exemplo 8 – Impedir Seleção na Coluna A
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
MsgBox "Não é permitido selecionar a Coluna A!"
Application.Undo
End If
End Sub
📌 Exemplo 9 – Exibir Número Total de Células Selecionadas
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Você selecionou " & Target.Cells.Count & " células."
End Sub
📌 Exemplo 10 – Alterar Fonte de Texto ao Selecionar
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Font.Bold = True
End Sub
📌 Exemplo 11 – Exibir Tipo de Dado da Célula
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Tipo de dado: " & TypeName(Target.Value)
End Sub
📌 Exemplo 12 – Enviar Notificação ao Selecionar Célula Específica
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "Você clicou na célula especial A1!"
End If
End Sub
Exemplo 13: Acumular Valores na Range A1:A10
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A10")) Is Nothing Then
Application.EnableEvents = False
Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value
Application.EnableEvents = True
End If
End Sub
Exemplo 14: Acumular Valores na Range B1:B10 com WorksheetFunction.Sum
Private Sub Worksheet_Change(ByVal Target As Range)
🔑 Área de Membros com conteúdo exclusivo
End Sub
Acumular Valores na Range C1:C5 e Somar em C6
Private Sub Worksheet_Change(ByVal Target As Range)
🔑 Área de Membros com conteúdo exclusivo
End Sub
Exemplo 16: Acumular Valores na Range D1:D10 e Atualizar em E1
Private Sub Worksheet_Change(ByVal Target As Range)
If ???? Intersect(T?????, Range(?????)) Is ????? Then
🔑 Área de Membros com conteúdo exclusivo
End If
End Sub
Exemplo 17: Acumular Valores na Range E1:E10 e Registrar Data da Alteração
Private Sub Worksheet_Change(ByVal Target As Range)
🔑 Área de Membros com conteúdo exclusivo End If
End Sub
Exemplo 18: Acumular Valores na Range F1:F5 e Atualizar em G1 com Condição
Private Sub Worksheet_Change(ByVal Target As Range)
If Not ???? thing Then
🔑 Área de Membros com conteúdo exclusivo
End If
End Sub
19: Acumular Valores na Range G1:G10 e Atualizar em H1:H10
Private Sub Worksheet_Change(ByVal Target As Range)
If Not ?????t(??????, ????) Is Nothing Then
Application.EnableEvents = False
🔑 Área de Membros com conteúdo exclusivo
Application.EnableEvents = True
End If
End Sub
20: Acumular Valores na Range H1:H5 e Somar em I1
Private Sub Worksheet_Change(ByVal Target As Range)
If Not ????(???, Range("????")) Is Nothing Then
🔑 Área de Membros com conteúdo exclusivo
End If
End Sub
21: Acumular Valores na Range I1:I10 e Atualizar em J1
Private Sub Worksheet_Change(ByVal Target As Range)
🔑 Área de Membros com conteúdo exclusivo
End Sub
Exemplo 22: Acumular Valores na Range J1:J10 e Adicionar em K1
Private Sub Worksheet_Change(ByVal Target As Range)
If Not ????? Is Nothing Then
🔑 Área de Membros com conteúdo exclusivo
End If
End Sub
🎯 Conclusão – A Sabedoria Nos Guia Para o Sucesso!
Queridos alunos, lembrem-se: o conhecimento adquirido nunca se perde! Cada linha de código, cada lógica compreendida e cada funcionalidade implementada abre um novo horizonte para sua vida e carreira.
✝️ “Porque o Senhor dá a sabedoria; da sua boca é que vem o conhecimento e o entendimento.” – Provérbios 2:6
Mantenham-se firmes nos estudos, pois o esforço de hoje é o sucesso de amanhã! 🙌✨
📌 Prof. Expedito Marcondes
📧 Suporte: suportecursovba@gmail.com
🚀 Que esta aula fortaleça sua jornada rumo ao domínio do Excel VBA e à transformação pessoal e profissional! 🔥 Bons estudos! 📚✨