Como criar e enviar um relatório de acesso microsoft automática no Microsoft Outlook

Automatize os relatórios no Access.

Microsoft Access fornece funções de relatório para pequenas e grandes empresas. O software de banco de dados Access usa uma versão leve do Visual Basic chamado Visual Basic for Applications (VBA). Esta linguagem proporciona-lhe opções de script, incluindo as funções necessárias para enviar um relatório do Access diretamente para a caixa de entrada do usuário através do Microsoft Outlook. Isso é benéfico quando você tem clientes que exigem um relatório a cada dia, e VBA ajuda a automatizar o processo.

  • Selecione o relatório que deseja enviar para o destinatário. Você seleciona um relatório usando o seguinte código:

    Definir theReport = db.OpenRecordset ( "Select theReport do relatório, onde id = 2")

    O código acima recupera um relatório com um ID de 2.

  • Criar um objeto de e-mail. O objeto de e-mail está definido como um aplicativo do Microsoft Outlook. O código a seguir cria um objeto de e-mail usado para enviar o relatório por meio do Outlook:

    app Set = New Outlook.Application
    Set email = app.CreateItem ()

  • Defina as propriedades de e-mail, incluindo o assunto, corpo e apego relatório do Access. O código a seguir define as propriedades de e-mail visível para o destinatário de e-mail:

    email.subject = "Relatório da manhã para 1/1/2010"
    email.Recipients.Add "[email protected]"
    email.Body = "Por favor, consulte o seu relatório anexo"
    email.Attachments.Add theReport, olByValue, 1, "Relatório da manhã"

  • Enviar e-mail e fechar os objetos. Fechando objetos libera recursos do computador, incluindo o espaço de memória. A seguir finaliza o seu código de relatório do Access:

    email.Send
    Set-mail = Nothing
    app Set = Nothing

De esta maneira? Compartilhar em redes sociais:

LiveInternet