MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Ajuda com exportação para excel

    Compartilhe

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    [Resolvido]Ajuda com exportação para excel

    Mensagem  serbarbosaportugal em Qua 04 Fev 2015, 23:58

    Boa noite


    Estive a ver tópicos relacionados com a minha dificuldade, mas não consigo encontrar nenhum.
    O mais parecido foi este do mestre JPaulo cujos ensinamentos me tem ajudado imenso:

    [Você precisa estar registrado e conectado para ver este link.]


    Eu tenho numa base de dados varias consultas. A minha duvida e dificuldade prende se com querer expor ta las todas e junta las num único livro de excel, composto em cada pagina por cada uma destas....


    Ideias? Ajuda..???

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    Registrado : 05/11/2009

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  Alexandre Neves em Qui 05 Fev 2015, 10:52

    Bom dia,
    Movi a sua dúvida para esta sala
    A sala de repositório serve para colocar exemplos de demonstração, não para tirar dúvidas.


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  serbarbosaportugal em Qui 05 Fev 2015, 12:33

    Obrigado pela mudança de sala.

    Resoluções???Propostas??

    Pina
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 345
    Registrado : 19/02/2011

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  Pina em Qui 05 Fev 2015, 12:53

    Bom dia
    Porque não faz uma só consulta?
    Pina

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  JPaulo em Qui 05 Fev 2015, 14:57

    Ola Sergio;

    O meu exemplo faz isso mesmo que pretende, tudo num unico livro, separado por cada folha.

    O que na realidade pretende ?


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

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

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  serbarbosaportugal em Qui 05 Fev 2015, 17:06

    Boa tarde JPaulo.

    Desde já dou os meus parabéns pela prestação no site, que se tem revelado cada mais uma ótima ferramenta.

    Em relação ao meu caso e ao exemplo que disponibilizou:

    O JPaulo tem a fazer a consulta (Uma só) com base numa só tabela, que origina os diferentes separadores com base no campo "Estado".

    Eu tenho 4 consultas, baseadas em diferentes tabelas. o que pretendo, é, através de um único botao no formulário, fazer a exportação destas de uma vez só para um único livro de excel composto, nos respetivos separadores, pelos dados de cada consulta.....

    Acha que será possível?

    Em relação ao que o colega Pina disse, com base em outras tabelas, visando a união de vários dados de forma a criar um único workbook com um único separador, criei uma consulta UNION que serve esse propósito, mas para esta situação, precisava que fossem diferenciadas os separadores por cada consulta... tipo o que está neste exemplo, com a diferença de ser exportar as consultas para um único workbook.

    [Você precisa estar registrado e conectado para ver este link.]

    Obrigado, mais uma vez, pela inestimável ajuda!!

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  serbarbosaportugal em Qua 11 Fev 2015, 18:25

    Ninguém tem uma ideia para ajudar a fazer isto??

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  JPaulo em Sex 13 Fev 2015, 12:17

    Olá Sergio desculpe a demora;

    Veja o simples;

    [Você precisa estar registrado e conectado para ver este link.]





    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

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

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  serbarbosaportugal em Sex 13 Fev 2015, 22:15

    Olá JPaulo


    Não tem de pedir desculpa!!

    É mesmo isto que precisava!
    Só preciso colocar uma questão: Por defeito, tem de existir um documento em excel no local determinado no VBA C:\teste.xls....
    Como adaptar para a rotina criar o documento em excel, na mesma path da base de dados, sem que este exista??

    Mais uma vez, obrigado!!

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  JPaulo em Seg 16 Fev 2015, 09:25

    Olá;

    Novamente simples;

    Teste e retorne por favor;

    Código:
    Private Sub cmdExporta_Click()
    Dim xlApp As Excel.Application
    Set xlApp = CreateObject("Excel.Application")

      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="qryExporta_I", fileName:=CurrentProject.Path & "\" & "teste" & ".xlsx")
      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="qryExporta_II", fileName:=CurrentProject.Path & "\" & "teste" & ".xlsx")
      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="qryExporta_III", fileName:=CurrentProject.Path & "\" & "teste" & ".xlsx")

    xlApp.Visible = True

    xlApp.Workbooks.Open CurrentProject.Path & "\" & "teste" & ".xlsx", True, False
    Debug.Print xlApp.Version
    Set xlApp = Nothing
    End Sub


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

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

    serbarbosaportugal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 47
    Registrado : 25/06/2014

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  serbarbosaportugal em Seg 16 Fev 2015, 22:16

    Boas JPaulo!!|


    Funcionou perfeitamente.
    O meu muito obrigado!!

    Abraço!!

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: [Resolvido]Ajuda com exportação para excel

    Mensagem  JPaulo em Qua 18 Fev 2015, 10:05

    Obrigado pelo retorno o forum agradece.


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

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

      Data/hora atual: Qua 07 Dez 2016, 20:07