[Resolvido]Checagem de Datas

Bom Dia!

Estou com uma duvida em macros para meu formulario

Tenho um formulario com 7 datas:

Estimada Abertura Orcamento Negociacao Aprocavao Prometida Conclusao

Elas informam o momento atual de um contrato.

Gostaria de quando o usuário alterar qualquer uma das datas, o access verificasse em ordem decrecente qual data esta preenchida, e assim mudar um campo Status para o nome do tipo de data.

Exemplo:

Um usuário inseriu a data de negociação de um contrato, assim entro com a logica:

Verificar qual data foi alterada
Se o tipo de data for menor que o Status Atual então:

Realizar somente a atualização

Senão:

Devo alterar o campo Status da tabela "Banco de Dados" com:

Estimada se a data atualizada for Estimada
Abertura se a data atualizada for Abertura
Orçamento se a data atualizada for Orcamento
Negociação se a data atualizada for Negociacao
Aprovacão se a data atualizada for Aprovação
Prometida se a data atualizada for Prometida
Conclusão se a data atualizada for Conclusao

End IF

Obrigado a todos!!!

Boa noite, Nocte

Não percebi como tem a tabela "banco de dados", se o campo status é tipo data ou do tipo texto.

Supondo que tem campo DataStatus(data) e TipoStatus(Texto), coloque em cada campo, adaptando para o nome do campo:
NomeDoCampo_AfterUpdate
If DLookup("DataStatus","Banco de Dados","NContrato=" & TxtNContrato)Currentdb.execute "UPDATE [Banco de Dados] SET DataStatus=#" & Format(TxtDataStatus,"mm-dd-yyyy") & "# WHERE NContrato=" & TxtNContrato & ";"
Else
Currentdb.execute "UPDATE [Banco de Dados] SET DataStatus=#" & Format(TxtDataStatus,"mm-dd-yyyy") & "#, TipoStatus='" & NomeDoCampo & "' WHERE NContrato=" & TxtNContrato & ";"
End If