[Resolvido]Como adicionar 30 dias a uma data VBA

Tenho uma tabela com um campo de data, que é preenchido por comando VBA de um formulário. Basicamente ela insere a data de hoje (do dia que o usuário abriu o formulário e clicou no botão "cadastrar"). Meu objetivo agora é que ele insira em um novo campo a data que foi inserida anteriormente + 30 dias, ou seja, como se fosse um comando (agora() + 30) porém em VBA. Segue o código VBA usado.

Private Sub Comando31_Click()
SQL = "INSERT INTO tb_ignorar(CLIENTE_NOME,Data_ignorada,CLIENTE_TELEFONE,CLIENTE_CONTATO,Média_ultimos_4_meses,Observação,CLIENTE_CNPJ_CPF,Data_novo_contato) VALUES ('" & Me.CLIENTE_NOME.Value & "','" & Now() & "','" & Me.CLIENTE_TELEFONE.Value & "','" & Me.CLIENTE_CONTATO.Value & "','" & Me.Média_ultimos_4_meses.Value & "','" & Me.Observação.Value & "','" & Me.CLIENTE_CNPJ_CPF.Value & "','" & Now() + 30 & "')"

CurrentDb.Execute SQL

Call limpaCampos

End Sub

Obrigado

Bom dia

Troque o Now() por Date()

Aguardo

deu certo
obrigado!!