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

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    avatar
    rafaelsleal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 28/08/2014

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  rafaelsleal em 7/6/2017, 20:17

    Olá amigos do fórum...

    Estou querendo fazer algo que não sei por onde começa tenho uma boa noção de fazer consultas no Access 2010.

    Quem puder ajudar,
    Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias plan1,plan2,plan3 e plan4 em um único arquivo de Excel.

    Agradeço desde já!!!
    avatar
    Phillip_Junior
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 179
    Registrado : 09/12/2016

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  Phillip_Junior em 7/6/2017, 22:47

    Ola amigo



    Me desculpe! Mas não consegui entender o que vc deseja fazer.

    Explique melhor para ver se temos condições de ajudar.

    Aguardo


    .................................................................................
    Phillip_Junior
    Analista de Sistemas
    avatar
    rafaelsleal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 28/08/2014

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  rafaelsleal em 8/6/2017, 14:50

    Bom dia,

    Rs..rs...rs pronto vamos lá eu tenho quatro consultas prontas, e tenho que exportar para Excel todo mês.

    Exemplo: Cons_Acompanha_Aih_Apres_e_Pg – Dou um click com botão direito do mouse e exporto para Excel tenho que fazer isso com as demais consultas, há alguma maneira de criar um comando em que eu possa exportar as quatro consultas em formato Excel em apenas um único arquivo e separado pelas guias do Excel exemplo a Cons_Acompanha_Aih_Apres_e_Pg na Plan1 e as demais. Segue print em anexo

    Obrigado!!!
    tauron
    tauron
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1176
    Registrado : 07/12/2011

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  tauron em 8/6/2017, 17:53

    avatar
    rafaelsleal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 28/08/2014

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  rafaelsleal em 8/6/2017, 19:08

    Boa tarde!

    Como se aplica esses códigos?

    Passo a posso sou iniciante em codificar no vb do access?

    Obrigado pela anteção.
    tauron
    tauron
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1176
    Registrado : 07/12/2011

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  tauron em 9/6/2017, 13:20

    O procedimento de exportacao sera rotineiro ou somente desta vez. Posta seu bd, assim a ajuda ser mais eficaz.
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  JPaulo em 9/6/2017, 17:06

    Ola;

    Rafael, se você quiser testar num novo botão, faça o teste e veja o simples;

    Nota:
    Não altere nada, para você ver o exemplo a criar num excel novo de nome teste.xlsx, as 4 consultas em 4 sheets diferentes.

    Código:
    Private Sub SeuBotão_Click()
    Dim xlApp As Object
    Set xlApp = CreateObject("Excel.Application")

      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="Cons_Acompanha_Aih_Apres_e_Pg", FileName:=CurrentProject.Path & "\" & "teste" & ".xlsx")
      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="Cons_Acompanha_Aihs_Rejeitadas", FileName:=CurrentProject.Path & "\" & "teste" & ".xlsx")
      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="Cons_Acompanha_Aihs_Rejeitadas_Capacidade", FileName:=CurrentProject.Path & "\" & "teste" & ".xlsx")
      Call DoCmd.TransferSpreadsheet(TransferType:=acExport, TableName:="Cons_Acompanha_Aihs_Rejeitadas_Resumo", 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


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Folder_announce_new Instruções SQL como utilizar...
    avatar
    rafaelsleal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 28/08/2014

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  rafaelsleal em 12/6/2017, 12:47

    Bom dia!

    A todos que ajudam muito obrigado deu certo em especial a JPaulo.

    Agora vem outro detalhe seu eu quiser direcionar para um caminho específico exemplo D:\Relatórios em vez de salvar na desktop.

    Grato,
    tauron
    tauron
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1176
    Registrado : 07/12/2011

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  tauron em 12/6/2017, 13:07

    Rafael, vc fez os testes?

    Bom pelo que vi o codigo do JPaulo realiza a exportacao e abre o arquivo em excel o que tambem lhe da a oportunidade de alem de conferir as informações decidir onde deseja salvar atraves do menu do excel.
    JPaulo
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  JPaulo em 12/6/2017, 14:07

    Ola;

    É só você trocar o FileName:=CurrentProject.Path por FileName:="D:\Relatórios"


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Folder_announce_new Instruções SQL como utilizar...
    avatar
    rafaelsleal
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 28/08/2014

    [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel Empty Re: [Resolvido]Gostaria de uma orientação passo a passo de como eu posso exportar 4 consultas e dividi-las nas suas respectivas guias em um único arquivo de Excel

    Mensagem  rafaelsleal em 12/6/2017, 14:15

    Obrigado mais uma vez!!!

      Data/hora atual: 26/5/2020, 21:56