MaximoAccess

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

Obrigado

Administração do MaximoAccess

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  castrogm em Qua 26 Jun 2019, 4:58 pm

    Boa Noite.
    Tenho uma consulta dinâmica que preciso exportar para excel.
    Consigo exportar minha consulta já pronta, mas não consigo exportar a consulta dinâmica.

    São 20 consultas que preciso exportar para um arquivo excel e os dados das consultas mudam várias vezes por dia.

    Preciso exportar umas 6 vezes ao dia.

    Uso o comando abaixo.

    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, MinhaConsulta, arq(Excel)

    Se eu conseguisse exportar a consulta dinâmica, ficaria bem mais fácil pra mim.

    Agradeço a atenção.

    Obrigado
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  renpv em Qua 26 Jun 2019, 6:27 pm

    Cria um formulário com os campos que você precisa alterar. Na consulta você referencia os campos desse formulário.

    Se não tiver entendido manda uma parte da tabela e a consulta (mesmo que seja com dados fictícios) que a gente ajusta pra ti.
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  castrogm em Qua 26 Jun 2019, 6:43 pm

    Obrigado pela resposta.
    Na verdade, minhas consultas são formadas com dados que extraio de um sistema aqui na empresa, apenas trato os dados e salvo em um arquivo excel em sheets específicas.
    Os dados mudam a cada hora.
    Minha dificuldade seria exportar para o excel as consultas criadas dinamicamente.
    Assim eu ganharia um tempo absurdo.
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  renpv em Qua 26 Jun 2019, 6:46 pm

    E eu tô me propondo a resolver seu problema. Mas pra isso eu iria precisar de uma tabela com esses dados (mesmo que fosse fictício) e a consulta pronta pra que eu possa implementar os filtros.
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  castrogm em Sex 28 Jun 2019, 8:21 am

    Bom Dia.
    Estava em viagem.
    Hoje que pude verificar sua resposta.
    Segue anexo o arquivo que uso e no modulo "m_excel" escrevi o que preciso.

    Como vai verificar, hoje eu crio as tabelas para depois exportar para o excel

    O que preciso, é exportar para o excel a consulta dinâmica (ADODB.Recordset).

    Se não fui claro, por favor me fala.

    Obrigado pela atenção.
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  castrogm em Sex 28 Jun 2019, 8:22 am

    Segue arquivo
    Anexos
    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel AttachmentTransfer.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (47 Kb) Baixado 11 vez(es)
    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  castrogm em Dom 30 Jun 2019, 5:55 pm

    Alguém pode ajudar a resolver esse tópico?
    avatar
    renpv
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 323
    Registrado : 12/01/2015

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  renpv em Dom 30 Jun 2019, 8:39 pm

    Amigo, eu mandei uma mensagem privada. Não chegou?
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6905
    Registrado : 15/03/2013

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  ahteixeira em Qui 01 Ago 2019, 5:53 am

    avatar
    castrogm
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 17/09/2014

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  castrogm em Qui 01 Ago 2019, 6:42 pm

    ahteixeira consegui resolver criando uma consulta dinâmica no formato e ordem que eu preciso, depois fiz a conexão com o excel e transferi linha por linha da consulta para o excel. Funcionou perfeitamente.
    Obrigado por me informar sobre esse tópico.

    valeu
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6905
    Registrado : 15/03/2013

    [Resolvido]Enviar Consulta Dinamica para um arquivo Excel Empty Re: [Resolvido]Enviar Consulta Dinamica para um arquivo Excel

    Mensagem  ahteixeira em Qui 01 Ago 2019, 6:49 pm

    Olá Marcos,

    Se poder partilhar exemplo do código que utilizou o fórum agradece.
    A sua dúvida pode ser útil a outro membro.

    Abraço

      Data/hora atual: Ter 20 Out 2020, 4:22 pm