Excel VBA Evento WorkSheet_DuploClick Confere Pagamento – M1 – Aula 82 – 49

Marcondes — Thu, 06 Nov 2025 12:14:18 +0000

Curso Planilha Excel VBA com Tutoriais de Aprendizado usando Video Aulas e Exercicios de Planilha como Fixação também, com isso aprenderemos como forma de treinamento como fazer o uso profissional de Eventos de Planilha WorkSheet_DuploClick Confere Pagamento 49 com Excel VBA Macros.

Faça o Download do Exemplo de Planilha Excel Evento WorkSheet_DuploClick Confere Pagamento
Excel VBA Evento WorkSheet_DuploClick Confere Pagamento – M1 – Aula 82 – 49

Curso Excel VBA – Aula 82 (Parte 49): O Evento Worksheet_BeforeDoubleClick Aplicado à Conferência de Pagamentos

Contudo , nesta aula do Curso Completo de Excel VBA será demonstrado como o evento Worksheet_BeforeDoubleClick utilizaremos para que pagamentos sejam conferidos automaticamente em planilhas do Excel. Com essa técnica é aplicada em sistemas de controle financeiro, relatórios de cobrança e planilhas de auditoria, em que a validação de dados de prática e rápida.

Objetivo da Aula

O objetivo desta aula é mostrar como o evento Worksheet_BeforeDoubleClick pode ser configurado para que pagamentos sejam conferidos automaticamente assim sendo, podemos dar um duplo clique em células específicas também.

também usamos evento Worksheet_BeforeDoubleClick para Conferência de Pagamentos

Também o Worksheet_BeforeDoubleClick é disparado também é sempre que uma célula sofre um duplo clique.
Assim sendo, configurando também a validação de pagamentos, o processo de conferência é automático e imediata, com isso ganhamos em produtividade e eficacia.

Dessa forma, a planilha torna-se mais inteligente e adaptável às necessidades do usuário.

Portanto poderá fazer Download da Planilha Exemplo

No Entanto, uma planilha modelo para que os exemplos desta aula estudados passo a passo.

Arquivo:
Planilha Worksheet_BeforeDoubleClick Confere Pagamento – M1 – Aula
Área de Membros com conteúdo exclusivo

Contudo, Aprenderemos nesta aula:

Com isso o funcionamento do evento Worksheet_BeforeDoubleClick no Excel VBA.
Lembrando que também a configuração de conferência automática de pagamentos, enfim tem que estudar para aprender.
Todavia, a aplicação de lógica condicional para validar registros, portanto há de se emprenhar nos estudos.
A criação de planilhas dinâmicas que se ajustam ao usuário com isso, é notorio que tem que estudar muito.
com isso, A prevenção de erros manuais com validação automática, por isso é importante criar códigos profissionais.
O desenvolvimento de sistemas de auditoria e relatórios organizados contudo, ganhamos tempo
A integração do evento com outras macros para soluções completas, portanto há um ganho de Produtividade.
O uso de técnicas de formatação junto à conferência de pagamentos, com isso podemos nos elevar profissionalmente

Exemplo prático com código VBA

Todavia, Conferência de pagamentos com duplo clique

vba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 🔑 Área de Membros com conteúdo exclusivo
End Sub

O intervalo C2:C100 monitorando celulas todas as vezes que em uma célula clicada duas vezes nesse intervalo, o valor da celula estiver escrito a palavra Pago

Video aula explicativa

Com isso, o aluno pode acompanhar, replicar e adaptar os exemplos para suas próprias planilhas.

O evento Worksheet_BeforeDoubleClick aplicado à conferência de pagamentos é uma ferramenta poderosa para quem deseja criar planilhas organizadas e automatizadas.

Agradecimento

Cada código aprendido representa um passo em direção à excelência em automação com Excel VBA.

Prof. Expedito Marcondes
suportecursovba@gmail.com

Evento WorkSheet_DoubleClick Confere Pagamento 49, na planillha do Excel, insere um tickado ao clicar ótimo para que quando corrigirmos algo inserir um Tickado já conferido

Queridos Alunos,

Lembrando que o conhecimento é uma luz sagrada e translúcida que guia o ser humano para a sabedoria. Embora esse caminho exija esforço, vale a pena cada passo. Estudar programação e melhorar a lógica não apenas aprimora suas habilidades técnicas, mas também desenvolve a resiliência necessária para enfrentar os desafios da vida. Através do estudo e da dedicação, vocês terão a capacidade de encontrar a melhor solução para qualquer problema que enfrentarem.

Cada linha de código que vocês escrevem, cada lógica que vocês resolvem, é uma escada que leva ao sucesso profissional e pessoal. Com esforço e determinação, vocês podem alcançar uma carreira bem remunerada, fazer novos amigos e construir uma vida social incrível.

Explorando o Evento WorkSheet_DoubleClick no Excel VBA

Assim sendo, vamos colocar isso em prática com exemplos do Evento WorkSheet_DoubleClick no Excel VBA, utilizando a fonte Wingdings para marcar a diferença na planilha!

1 – Por isso aprenderemos a Alterar para Wingdings e Inserir Ícone de Checkmark um `✔ Tickado` na celula na folha de planilha

vba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
🔑 Área de Membros com conteúdo exclusivo 
End Sub

2 – Adicionar Ícone Tickado ao Dobro Clique em B1:B10

vba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)  
   If ?? ??(??, Range(???)) Is ?? Then 
        Target.??? = "?????"
        T???? = ????? ' ✔ Tickado 
    End If 
End Sub

3 – Inserir Marcação com Wingdings em C1:C10

vba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
  🔑 Área de Membros com conteúdo exclusivo
    If ?? ???????x(t.valuex, ??????) ???? ???? Then 
   
        ?????.Name = "????"   
 
        ??? = ??? ' ✔ Tickado   
 
    End If   
 
End Sub

4 – Alterar Fonte e Inserir Check no Intervalo D1:D10

vba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
 🔑 Área de Membros com conteúdo exclusivo  
End Sub

5 – Destacar Com Ícone de Confirmação ao Clicar em E1:E10

vba

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)  
🔑 Área de Membros com conteúdo exclusivo 
End

6 – Além de Destacar Com Ícone de Confirmação ao Clicar em j1:j10, vamos aprender também lógica de programação durante os exercicios.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
🔑 Área de Membros com conteúdo exclusivo
End Sub

7 – Usando a Instrução For Next para inserir um Tickado Tickado ao verificar se Item já foi “Pago” na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
🔑 Área de Membros com conteúdo exclusivo
End Sub

8 – Contudo, usando a Instrução For Next para inserir um Tickado ao verificar se Item já foi “Pago” na coluna(B) Usando Step 2

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
🔑 Área de Membros com conteúdo exclusivo
End Sub

9 – Veja bem, usando a Instrução Do While para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick
🔑 Área de Membros com conteúdo exclusivo
End Sub

10 – Usando a Instrução Do Until para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
D🔑 Área de Membros com conteúdo exclusivo
End Sub

11 – Usando a Instrução For Each para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
🔑 Área de Membros com conteúdo exclusivo
End Sub

12 – Por conseguinte vamos usar a Instrução For Next com Saida Antecipada para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
🔑 Área de Membros com conteúdo exclusivo
End Sub

13 – Usando a Instrução Do While com Condição Interna para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
🔑 Área de Membros com conteúdo exclusivo
End Sub

14 – Usando a Instrução For Each com Saida Antecipada para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
🔑 Área de Membros com conteúdo exclusivo
End Sub

Exemplo 9: For Next com Condição Inversa

15 – Também Usando a Instrução For Next com Condição Inversa para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
🔑 Área de Membros com conteúdo exclusivo
End Sub

16 – Por finalidade, usamos a Instrução Do Until com Saida Antecipada para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
i = 1
Do Until i = 10
🔑 Área de Membros com conteúdo exclusivo
Loop
End Sub

17 – Usando a Instrução o For Each em Intervalo Maior para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim cel As Range
For Each ? In ????(“A1:A20”)
🔑 Área de Membros com conteúdo exclusivo
Next cel
End Sub

18 – Usando a Instrução For Next com Verficação Multiplas com VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
For i = 1 To 10
🔑 Área de Membros com conteúdo exclusivo
Next i
End Sub

19 – Usando a Instrução For Next com Verficação Multiplas com VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
i = 1
Do While i = Cells(???, 1).End(xlUp).Row
🔑 Área de Membros com conteúdo exclusivo
i = i + 1
Loop
End Sub

20 – Além de Usarmos a Instrução For Next com Verficação Multiplas com VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B) , vamos aprender também logica de programação programando e aprendendo.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim cel As ???For Each ??? n Range(“????s”)x
If cel.Value = “Pago” Then
🔑 Área de Membros com conteúdo exclusivo
End If
Next cel
End Sub

Exemplo 20 – Usando a Instrução For Next com Condição Combinada VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
For i = 1 To 10
If Cells(i, x).Value = “Pago” ??? Cells(i, ?) = “Confirmado” Then
🔑 Área de Membros com conteúdo exclusivo
Next i
End Sub

20 Do Until com Intervalo Variável

21 – Usando a Instrução Do Until com Intervalo Variável VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
🔑 Área de Membros com conteúdo exclusivo
i = 1
Do Until IsEmpty(Cells(i, 1))
If Cells(i, x).Value = “Pago” Then
Cells(i, 2).????.Name = ??????
Cells(i, 2).Value = ???????’ Tickado
End If
i = i + 1
Loop
End Sub

22- Usando a Instrução Do Until com Intervalo Variável VBA para inserir um Tickado ao verificar se Item se contém a palavra que diz que foi Pago na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim cel As Range
For Each ??? In Range(“???”)
🔑 Área de Membros com conteúdo exclusivo
If cel.Value = “Pago” ?? cel.???? = “Confirmado” Then
cel.?????.???? = “Wingdings”
????? .Value = ChrW(&H2713) ‘ Tickado
End If
Next cel
End Sub

23 – Usando a Instrução For Next com Intervalo Dinâmico VBA para inserir um Tickado ao verificar se Item caso Contenha a palavra “Pago” na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
For i = 1 To ?????? End(xlUp).Row
🔑 Área de Membros com conteúdo exclusivo
If ???????? = “Pago” Then
Cells(i, 2).Font.???? = “?????”
Cells(i, 2).Value = ?????? ‘ Tickado
End If
Next i
End Sub

24 – Usando a Instrução Do While VBA para inserir um Tickado ao verificar se Item já foi caso exista a palavra “Pago” na célula na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Integer
🔑 Área de Membros com conteúdo exclusivo
i = 1
Do While i = ??????
If Cells(i, 1).Value = “Pago” Then
Cells(i, 2).??????? = “????”
Cells(i, 2).Value =??????? ‘ Tickado
End If
i = i + 1
Loop
End Sub

24 – Usaremos a Instrução For Each com Verificação de VAzio VBA para inserir um Tickado quando for verificar se Item se contiver a palavra ‘Pago‘ na coluna(B)

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim zcel As Range
🔑 Área de Membros com conteúdo exclusivo
For Each xcel In Range(“?????”)
If ?????.Value = “Pago” And c??????.Value = “” Then
cel.Offset(0, 1).????? = “???????”
cel.?????.Value = Chr(?????) ‘ Tickado
End If
Next cel
End Sub

Vamos juntos em busca do conhecimento e da sabedoria!
Espero que este texto motive seus alunos a estudar com dedicação e a alcançar grandes conquistas! Se precisar de mais alguma coisa, estarei aqui para ajudar.

A programação VBA permite personalizar suas planilhas de forma interativa e eficiente!

Aproveitem cada aprendizado e coloquem em prática esses conceitos!

Conclusão

Queridos alunos, cada passo que vocês dão no aprendizado de VBA é um investimento no seu futuro profissional e pessoal. Persistam, pratiquem e explorem novas possibilidades, pois isso abrirá portas incríveis para vocês no mercado de trabalho!

Com dedicação, vocês alcançarão grandes conquistas!

Prof. Expedito Marcondes
suportecursovba@gmail.com

Bons estudos!
Que esta aula fortaleça seu aprendizado e traga novas perspectivas para sua carreira! Conte comigo sempre!

O post Excel VBA Evento WorkSheet_DuploClick Confere Pagamento – M1 – Aula 82 – 49 apareceu primeiro em Excel - Curso VBA - Aprender Programação.

Arquivo de conferir pagamento excel - Excel - Curso VBA - Aprender Programação

Excel VBA Evento WorkSheet_DuploClick Confere Pagamento – M1 – Aula 82 – 49

Curso Planilha Excel VBA com Tutoriais de Aprendizado usando Video Aulas e Exercicios de Planilha como Fixação também, com isso aprenderemos como forma de treinamento como fazer o uso profissional de Eventos de Planilha WorkSheet_DuploClick Confere Pagamento 49 com Excel VBA Macros.

Curso Excel VBA – Aula 82 (Parte 49): O Evento Worksheet_BeforeDoubleClick Aplicado à Conferência de Pagamentos

Objetivo da Aula

Portanto poderá fazer Download da Planilha Exemplo

Contudo, Aprenderemos nesta aula:

Exemplo prático com código VBA

Todavia, Conferência de pagamentos com duplo clique

Video aula explicativa

Agradecimento

Explorando o Evento WorkSheet_DoubleClick no Excel VBA

1 – Por isso aprenderemos a Alterar para Wingdings e Inserir Ícone de Checkmark um ✔ Tickado na celula na folha de planilha

2 – Adicionar Ícone Tickado ao Dobro Clique em B1:B10

3 – Inserir Marcação com Wingdings em C1:C10

4 – Alterar Fonte e Inserir Check no Intervalo D1:D10

5 – Destacar Com Ícone de Confirmação ao Clicar em E1:E10

6 – Além de Destacar Com Ícone de Confirmação ao Clicar em j1:j10, vamos aprender também lógica de programação durante os exercicios.

7 – Usando a Instrução For Next para inserir um Tickado Tickado ao verificar se Item já foi “Pago” na coluna(B)

8 – Contudo, usando a Instrução For Next para inserir um Tickado ao verificar se Item já foi “Pago” na coluna(B) Usando Step 2

9 – Veja bem, usando a Instrução Do While para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

10 – Usando a Instrução Do Until para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

11 – Usando a Instrução For Each para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

12 – Por conseguinte vamos usar a Instrução For Next com Saida Antecipada para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

13 – Usando a Instrução Do While com Condição Interna para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

14 – Usando a Instrução For Each com Saida Antecipada para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

15 – Também Usando a Instrução For Next com Condição Inversa para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

16 – Por finalidade, usamos a Instrução Do Until com Saida Antecipada para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

17 – Usando a Instrução o For Each em Intervalo Maior para inserir um Tickado ao verificar se Item já foi ‘Pago’ na coluna(B)

18 – Usando a Instrução For Next com Verficação Multiplas com VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

19 – Usando a Instrução For Next com Verficação Multiplas com VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

20 – Além de Usarmos a Instrução For Next com Verficação Multiplas com VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B) , vamos aprender também logica de programação programando e aprendendo.

Exemplo 20 – Usando a Instrução For Next com Condição Combinada VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

21 – Usando a Instrução Do Until com Intervalo Variável VBA para inserir um Tickado ao verificar se Item já foi ‘Pago‘ na coluna(B)

22- Usando a Instrução Do Until com Intervalo Variável VBA para inserir um Tickado ao verificar se Item se contém a palavra que diz que foi Pago na coluna(B)

23 – Usando a Instrução For Next com Intervalo Dinâmico VBA para inserir um Tickado ao verificar se Item caso Contenha a palavra “Pago” na coluna(B)

24 – Usando a Instrução Do While VBA para inserir um Tickado ao verificar se Item já foi caso exista a palavra “Pago” na célula na coluna(B)

24 – Usaremos a Instrução For Each com Verificação de VAzio VBA para inserir um Tickado quando for verificar se Item se contiver a palavra ‘Pago‘ na coluna(B)

Conclusão

1 – Por isso aprenderemos a Alterar para Wingdings e Inserir Ícone de Checkmark um `✔ Tickado` na celula na folha de planilha