Avisar antes de deletar

[frata]

Prezados colegas:

Desenvolvi uma planilha que é bastante sofisticada, com várias

Macros, etc. Bem, acontece que eu a uso como banco de dados,

onde estão cadastrados todos os clientes da empresa.

Gostaria de saber como colocar uma proteção na qual me avisasse

antes de deletar alguma informação na planilha, como acontece

quando se vai mover uma célula. Imagino que seria apenas abrir

uma mensagem pedindo confirmação para depois deletar alguma

informação de alguma célula.

Será que alguém sabe como faço isso..???

Obrigado a todos. Frata

[zinhovba]

Boa noite!!

Veja se te ajuda...

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    With Target
        If .Cells.Count = 1 Then
            If .Value = vbNullString Then
                If MsgBox("Delete OK?", vbOKCancel) = vbCancel Then
                    Application.Undo
                End If
            End If
             
        End If
    End With
End Sub

[frata]

Ajudou muito, obrigado. Já estou usando.!!!

Mas não funciona com grupo de células só individualmente.

Outra coisa, será que haveria algo parecdo para no caso

de se digitar - equivocadamente - em cima de uma célula

já preenchida, tipo avisar sobre uma substituição..???

Grande abraço. Frata