Notifications
Clear all

EVENTOS OU MACRO PARA VALIDAR ALTERAÇÃO DE DADOS

6 Posts
3 Usuários
0 Reactions
1,270 Visualizações
(@ericsson)
Posts: 54
Trusted Member
Topic starter
 

Pessoal bom dia!

Estou fazendo uma planilha com campo para alteração de dados!!

Neste ponto eu quero criar uma macro ou evento que realize a seguinte ação:

Quando o usuário selecionar uma célula o valor desta célula seja armazenado e quando o usuário deixar a seleção atual o evento ou macro
verifique se houve alteração de dados, comparando o valor armazenado no início com o valor da célula após deixar de ser selecionada!!

Alguém pode me ajudar!?

 
Postado : 28/09/2015 7:38 am
(@nelson-s)
Posts: 96
Trusted Member
 

Caso o valor contido na célula tenha sido alterado, o que a macro faria?

 
Postado : 28/09/2015 8:53 am
(@ericsson)
Posts: 54
Trusted Member
Topic starter
 

Caso o valor inicial contido na célula tenha sido alterado, a macro salvaria a alteração na tabela origem do banco de dados.

Assim eu precisaria saber como comparar o valor da célula inicial com o valor final. / Valor antes do eventos duploclik ou change com o valor após o usuário deixar a célula selecionada.

 
Postado : 28/09/2015 9:21 am
(@nelson-s)
Posts: 96
Trusted Member
 

Tente isto aqui:

Option Explicit

Private mvarValor As Variant
Private mstrRef As String


Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Cells(1, 1).Value <> mvarValor Then
        Range(mstrRef).Select
        MsgBox "[Rotina de atualização de banco de dados vai aqui]"
    End If
    
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    mvarValor = Target.Cells(1, 1)
    mstrRef = Target.Cells(1, 1).Address

End Sub
 
Postado : 28/09/2015 9:54 am
(@ericsson)
Posts: 54
Trusted Member
Topic starter
 

Nelson, é isso mesmo que eu estava precisando!!

Funcionou certinho, vou estudar melhor como funciona este código para aprender!

Vlw!

 
Postado : 28/09/2015 10:09 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Erickson

Você se esqueceu de clicar na mãozinha para agradecer ao Nelson.

Leia:
viewtopic.php?f=7&t=16757

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 28/09/2015 10:11 am