Problema com o botão da macro. Como faze validação no botao??

Alguem ai sabe um comando de validação... por exemplo... O BOTAO QUE EXECUTA A MACRO SOMENTE DEVE ATIVA SE... CELULAS COM DADOS.. COMO ENDEREÇO, NOME ... ESTIVEREM PREENCHIDAS.

Pra que se a pessoa nao preencheu os campos nao possa. Lança os dados..

Se puderem me ajuda agradeço

Boa noite!!!

Seja mais claro....poste sua planilha...

Tente assim...

Código:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    Dim rngToCheck As Range
    Set rngToCheck = Range("A2:G10")
    If Intersect(Target, rngToCheck) Then
        If Target.Value < Date Then MsgBox "Houve erro"
    End If
End Sub