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]exportar para excel com nome predefinido

    Compartilhe

    edycarlo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 06/03/2014

    [Resolvido]exportar para excel com nome predefinido

    Mensagem  edycarlo em Seg 03 Nov 2014, 23:22

    preciso exportar um relatório para excel com nome predefinido (nº filial_lc_mes_ano), dados estes contidos no relatorio

    estou utilizando o código:
    Private Sub LANÇAMENTO_CONTABIL_Click()
    DoCmd.OutputTo ObjectType:=acOutputReport, objectname:="ARQUIVO_LANÇAMENTO CONTABIL", OutputFormat:="xls"
    End Sub

    alguém pode me ajudar a terminar este código?

    Roberto_1977
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 836
    Registrado : 01/10/2013

    Re: [Resolvido]exportar para excel com nome predefinido

    Mensagem  Roberto_1977 em Ter 04 Nov 2014, 09:40

    Bom dia,

    Veja se serve....
    Este é para PDF

    Private Sub Command378_Click()
    Dim strArquivo As String
    Dim strLocal As String
    strArquivo = "nº filial_lc_mes_ano" & ".pdf" 'Novo nome para seu relatório
    strLocal = CurrentProject.Path & "\" & strArquivo ´local onde relatorio vai ficar guardado
    DoCmd.OutputTo acOutputReport, "SEU RELATÓRIO", acFormatPDF, strLocal, False
    End Sub


    Este é para Excel

    Private Sub Command378_Click()
    Dim strArquivo As String
    Dim strLocal As String
    strArquivo = "nº filial_lc_mes_ano" & ".xlsx"
    strLocal = CurrentProject.Path  & "\" & strArquivo
    DoCmd.OutputTo acOutputTable, "SUA TABELA QUE VAI PASSAR PARA EXCEL", acFormatXLSX, strLocal, False
    End Sub

    Abraço..

    edycarlo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 06/03/2014

    re: exportar para excel com nome predefinido

    Mensagem  edycarlo em Ter 04 Nov 2014, 11:19

    Bom dia, roberto

    obrigado pela atenção

    sua dica serviu muito bem

    mas ainda quero fazer o seguinte: o nome do arquivo (nº filial_lc_mes_ano)
    nº filial, mes, ano, são informações que eu tenho no proprio relatorio e tabelas, gostaria que nomeasse o arquivo conforme essas informações, ex: filial 40, relatorio mes janeiro ano 2014 (40_lc_01_14.xls)

    se puder me ajudar agradeço

    Roberto_1977
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 836
    Registrado : 01/10/2013

    Re: [Resolvido]exportar para excel com nome predefinido

    Mensagem  Roberto_1977 em Ter 04 Nov 2014, 11:25

    bom dia,

    Se bem precebi, essa informação existe na tabela e gostarias que o ficheiro excel ficasse com o nome que gostarias..

    É isso???


    Roberto_1977
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 836
    Registrado : 01/10/2013

    Re: [Resolvido]exportar para excel com nome predefinido

    Mensagem  Roberto_1977 em Ter 04 Nov 2014, 11:37

    Boas outra vez...

    Fiz um exemplo bem rapidito para ver se é isso e se isto pode se adaptar a tua BD.
    A lógica que eu costume utilizar consiste em escrever num ou mais campos o titulo do ficheiro ou então através de uma tabela.


    Caso necessites de ajuda ou não tenhas percebido lógica....avisa.

    Abraço.. Cool
    Anexos
    Database3.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (24 Kb) Baixado 31 vez(es)

    edycarlo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 06/03/2014

    Re: [Resolvido]exportar para excel com nome predefinido

    Mensagem  edycarlo em Ter 04 Nov 2014, 14:02

    Bem o que eu precisava

    Obrigado

    Deus abençoe

    Roberto_1977
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 836
    Registrado : 01/10/2013

    Re: [Resolvido]exportar para excel com nome predefinido

    Mensagem  Roberto_1977 em Ter 04 Nov 2014, 14:05

    Boa tarde,

    Não se esqueça de marcar tópico como [RESOLVIDO] o forum agradece.

    Abraço... Cool

      Data/hora atual: Dom 04 Dez 2016, 20:19