MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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


3 participantes

    relatorio do access para o excel

    neo
    neo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 06/12/2010

    relatorio do access para o excel Empty relatorio do access para o excel

    Mensagem  neo 25/9/2013, 14:35

    Criei um relatorio no access e atraves de um botão de comando eu exporto esse relatorio para o excel. Mas quando vou abri-lo no excel ele fica desconfigurado, ou seja os nomes da colunas ficam diferentes do nome que coloquei no relatorio no access. Gostaria de saber se tem como deixar o relatorio coinfigurado no excell igual ao do access.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    relatorio do access para o excel Empty Re: relatorio do access para o excel

    Mensagem  criquio 25/9/2013, 14:37

    Exemplifique para entendermos melhor. Tambem poste o código completo para ajudar no entendimento.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    Gilberto Rocha
    Gilberto Rocha
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1027
    Registrado : 21/01/2010

    relatorio do access para o excel Empty Re: relatorio do access para o excel

    Mensagem  Gilberto Rocha 25/9/2013, 15:02

    Prepare o arquivo xls com a formatação que deseja e depois exporte.
    Código do JPaulo

    Dim strArq as String
    Dim strSql as String

    Set xls = CreateObject("Excel.Application")
    strArq = "C:\SeuArquivoXlsx.xlsx"
    xls.Workbooks.Open (strArq)
    xls.Visible = False
    xls.Worksheets("Plan1").Activate

    strSql = "SELECT * From SuaTabela;"

    Set rst = CurrentDb.OpenRecordset(strSql, dbOpenDynaset)
    xls.ActiveSheet.Range("A5:F200").select
    xls.selection.ClearContents
    xls.ActiveSheet.Range("A5").select
    'Apaga da linha 5 em diante
    xls.ActiveSheet.Range("A5:AZ65000").Delete
    xls.ActiveCell.CopyFromRecordset rst

    xls.selection.CurrentRegion.select

    xls.ActiveWorkbook.Save
    xls.Application.Quit
    Set xls = Nothing


    .................................................................................
    Resolveu? Clique em resolvido!
    Sistema para administração de Igrejas e Ministérios Evangélicos Congrega Fácil Online.
    Seja um representante em sua cidade!
    Código de cliente para testes: congregafacil

    SisFAT Cursos Online
    www.congregafacil.com

    Analista de BI SR
    neo
    neo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 06/12/2010

    relatorio do access para o excel Empty Re: relatorio do access para o excel

    Mensagem  neo 25/9/2013, 20:00

    Explicando melhor: Quando criamos um relatório no access na opção "Modo Design" conseguimos alterar o cabeçalho da página tirando os nomes dos campos da tabela e colocando os nomes que quisermos por exemplo:

    "NomCli" para "Nome Cliente". Só que mandando para o excel o titulo, ou a primeira linha da tabela fica com os nomes dos campos e não os nomes do cabeçalho da pagina no relatorio.

    Conteúdo patrocinado


    relatorio do access para o excel Empty Re: relatorio do access para o excel

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 06:04