Boa tarde Valdabr,
Pelo que entendi a macro do Botão Saída não pode ser executada se a célula D8 possuir algum valor.
Basta acrescentar um IF similar ao que você já fez para a célula D12. Exemplo:
If Sheets("MOVIMENTO DE CAIXA").Range("D8").Value <> Empty Then
MsgBox "A célula D8 está preenchida"
Exit Sub
End If
O IF diz, se a célula D8 é diferente de vazio, então... mensagem e exit sub.
Veja se ajuda e de retorno.
att,
Postado : 13/01/2017 11:59 am