Subtração de Datas

Caros mestres do fórum, bom dia! Estou com um problema. Tenho um campo onde preencho a data do contrato, ai nesse campo tenho um evento que soma + 5 anos a essa data e joga num outro campo. Agora estou tentando criar um novo campo, que utilize esse segundo campo (acrescido dos 5 anos) - 90 dias, para criar um alerta de e-mail 90 dias antes do vencimento, mas não está dando certo. Ja tentei o DateAdd("m", -3, [meucampo]), já tentei DateAdd("yyyy", 4.8, [meucampo]), também não deu certo, já tentei utilizar os códigos em ambos os campos, e não da certo. Alguém pode me dar uma dica. Forte abraço à todos do Fórum...

O campo está no formato de data? Ao invés de diminuir 3 meses, diminua 90 dias, pois tem meses de mais e menos dias, o que você não sair nos 90 dias que você quer:

= DateAdd("d", -90, Me.CampoData)

Tentei, mas veja que estranho... O campo DtConTxt que traz a data do contrato é: 10/02/2008 + 5 anos, atualiza o campo RenovTxt com a data de renovação: 10/02/2013 com esse código:

Private Sub DtContTxt_AfterUpdate()
Me.RenovTxt = DateAdd("yyyy", 5, [DtContTxt])
End Sub

Agora o campo com - 90 dias PxRenov, utilizando o código abaixo no campo RenovTxt, retornou a data de: 17/04/2017

Private Sub Texto3533_AfterUpdate()
Me.PxRenov = DateAdd("d", -90, Me.Texto3533)
End Sub

Aguardo contatos...

Criquio, bom dia...

descobri o problema, o que estava acontecendo é que os campos estavam bloqueados, desbloquiei os campos e agora a formula funciona, contudo, necessito que não se possa editar o campo depois que seja adicionada a data, ou seja, após a fórmula calcular a data tem como travar a informação no campo para que não seja editada ?

Grato, no aguardo...

Private Sub Texto3533_AfterUpdate()
Me.PxRenov = DateAdd("d", -90, Me.Texto3533)
Me.PxRenov.Enabled = False
End Sub