allysson1511

Olá Boa Tarde, Criei rapidamente um sistema desta maneira. https://drive.google.com/open?id=1EC8W83JvZ405HM8iT4_J_O23-drByW4Y Espero que tenha ajudado. vlw

Olá Boa tarde, A solução é bem simples. seimed([servico]="Reclamação" or "Sincor";Mês([data de finalização]);seimed([servico]="procon" or "Redes Sociais" or "Ouvidoria";Mês([Data de conclusao]);"")) em uma coluna vazia você coloca primeiro o nome que você quer que fique o campo seguido de dois pontos e depois coloque o código verificando se o nome dos campos que coloquei estão corretos. qualquer dúvida, estamos aqui. Lembrando que a função "SE" do Excel dentro de uma consulta do access é "SEIMED" e dentro do VBA ACCESS é "IF".

Olá Boa Tarde, Você pode ultilizar o comando if soma(([txtDataPriHab]+1825)+1) <= date() then msgbox"Sua mensagem", vbinformation, "Atenção!" else end if você pode inserir esse código após atualizar algum campo, ou no evento "no Atual".