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


2 participantes

    Enviar Exportações Salvas através de VBA

    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    Enviar Exportações Salvas através de VBA Empty Enviar Exportações Salvas através de VBA

    Mensagem  athenas1200 12/6/2015, 12:17

    Bom Dia,

    Tenho um macro que apenas abre Gerenciar Tarefas de Dados
    Gostaria de SCRIPT em VBA, ao click no botão ele enviar direto para
    C:\exportar\Enviar.csv
    O nome da exportação salvar é Enviar1
    igual a imagem.


    Enviar Exportações Salvas através de VBA Tmp18

    Obrigado
    daniloreiis
    daniloreiis
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 338
    Registrado : 14/02/2011

    Enviar Exportações Salvas através de VBA Empty Enviar Exportações Salvas através de VBA

    Mensagem  daniloreiis 12/6/2015, 14:33



    .................................................................................
    Att, Danilo Reis
    -------------------------------------------------------------------------------------------------------------------------------------------------

    Se alguém não quiser trabalhar, não coma também.
    2 Tessalonicenses 3:10
    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    Enviar Exportações Salvas através de VBA Empty Está dando erro

    Mensagem  athenas1200 12/6/2015, 16:03

    Onde estou errado...

    Private Sub Comando7_Click()
    DoCmd.TransferText acOutputTable, "Qyr_Enviar", acFormatXLSX, "C:\exportar\Enviar.csv"
    End Sub
    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    Enviar Exportações Salvas através de VBA Empty Está dando erro....

    Mensagem  athenas1200 12/6/2015, 16:27

    Está dando erro....

    Alguém me ajude onde estou errado.

    Private Sub Comando7_Click()
    DoCmd.SetWarnings False

    DoCmd.TransferText acExportFixed, "Enviar1", "Qyr_Enviar", "C:\exportar\Enviar.csv"
    DoCmd.SetWarnings True
    MsgBox "Arquivo Enviado para Pasta C:\exportar Favor conferir ", 64, "Atenção"
    End Sub
    avatar
    athenas1200
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 29/03/2011

    Enviar Exportações Salvas através de VBA Empty Resolvido

    Mensagem  athenas1200 12/6/2015, 17:27

    resolvi assim.
    Estava procurando pela função que faltava RunSavedImportExport, pois toda a configuração estava salva e só precisava enviar pelo vba.

    Private Sub Comando7_Click()
    DoCmd.SetWarnings False
    DoCmd.RunSavedImportExport "Enviar1"
    DoCmd.SetWarnings True
    MsgBox "Arquivo exportado com sucesso", 64, "Informação"
    End Sub

    Conteúdo patrocinado


    Enviar Exportações Salvas através de VBA Empty Re: Enviar Exportações Salvas através de VBA

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 23:15