MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Copiar um Relatorio em formato TXT para Area de Transferência

    Compartilhe

    claudiogsantos
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 30/10/2016

    Copiar um Relatorio em formato TXT para Area de Transferência

    Mensagem  claudiogsantos em Dom 10 Jun 2018, 23:35

    Bom dia a todos.

    Tenho um programa que já exporta os dados de um relatório pra um arquivo txt usando o comando

       DoCmd.OutputTo acOutputReport, "Relatorio5", acFormatTXT, "C:\TEMP\DADOS.TXT",

    E preciso colar o texto exportado no email.
    Tenho sempre que abrir, selecionar tudo, ctrl+c e depois ctrl+v

    Será que teria algum outro procedimento de, ao simples clique do botão,
    o RELATORIO seja copiado para a Area de Transferência???
    Já pesquisei bastante mas acredito que ninguem precisou disto ainda.
    Tem o comando

    DoCmd.RunCommand acCmdCopy

    Mas só funciona pra objetos do formulario, com o comando Me.SetFocus.

    Obrigado.
    Claudio.
    avatar
    Maicon
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 119
    Registrado : 07/09/2012

    Re: Copiar um Relatorio em formato TXT para Area de Transferência

    Mensagem  Maicon em Ter 12 Jun 2018, 03:36

    Já usos a opção exportar do Access tem opção enviar por e-mail , arquivo de texto.Não tenho Outlook instalado mas acredito que funcione. O depois de fazer exportação uma vez pode salvar a exportação e depois chamá-la via macro ou código.

    [Você precisa estar registrado e conectado para ver esta imagem.]
    [Você precisa estar registrado e conectado para ver esta imagem.]


    .................................................................................
    "Uma pessoa que nunca cometeu um erro, nunca tentou nada novo."
    Albert Einstein

    Bons Estudos.

    claudiogsantos
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 30/10/2016

    Re: Copiar um Relatorio em formato TXT para Area de Transferência

    Mensagem  claudiogsantos em Qua 13 Jun 2018, 18:08

    Muito obrigado por responder Maicon. Consegui fazer. Valeu mesmo.
    avatar
    Maicon
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 119
    Registrado : 07/09/2012

    Re: Copiar um Relatorio em formato TXT para Area de Transferência

    Mensagem  Maicon em Qui 14 Jun 2018, 02:58

    Ok o Fórum agradece. favor marcar o tópico como resolvido.


    .................................................................................
    "Uma pessoa que nunca cometeu um erro, nunca tentou nada novo."
    Albert Einstein

    Bons Estudos.

      Data/hora atual: Ter 20 Nov 2018, 15:18