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]Macro VBA para Salvar Como ACCESS

    Compartilhe

    Luciclaudio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 04/05/2016

    [Resolvido]Macro VBA para Salvar Como ACCESS

    Mensagem  Luciclaudio em Qua 04 Maio 2016, 17:23

    Caros,

    Necessito da ajuda de você, onde preciso de uma macro no vba do bd.accdb que na minha área de trabalho e toda vez que atualizo tenho que copiar e colar o mesmo em um caminho na rede.
    Gostaria que após finalizar todo o processo ele salve na área de trabalho e salve como em um caminho da rede.

    alguém conhece algum código que possa me ajudar?

    Obrigado a todos!

    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 532
    Registrado : 09/11/2012

    Re: [Resolvido]Macro VBA para Salvar Como ACCESS

    Mensagem  =>Nois em Ter 17 Maio 2016, 23:42

    crie uma bat com o bloco de notas, existem vários exemplos na net


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo reflita nessa frase: "Huguinho", "Zezinho" & "Luizinho"

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Re: [Resolvido]Macro VBA para Salvar Como ACCESS

    Mensagem  ahteixeira em Ter 28 Jun 2016, 17:38

    Olá LUCICLAUDIO,
    Como ficou a situação?
    Os utilizadores do fórum merecem e agradecem o retorno.
    Abraço

    Luciclaudio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 04/05/2016

    Re: [Resolvido]Macro VBA para Salvar Como ACCESS

    Mensagem  Luciclaudio em Sex 15 Jul 2016, 19:24

    Galera,

    Ficou assim, coloquei esse código no vba do access e mandei a macro chamar

    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    Option Compare Database

    Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVallpExistingFileName _
    As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
    Function BackBD()

    Dim CopiaSegura As Object
    Dim Caminho As String
    Caminho = "C:\Users" 'Nome da pasta e nome de inicio para o banco de backup
    Set CopiaSegura = CreateObject("Scripting.FileSystemObject")
    CopiaSegura.CopyFile CurrentProject.Path & "\Acquirer Boarding.accdb", "\\10.70.168.43\usr\SECTOR\ADQUIRENCIA\MIS\Acquiring\Base de Dados\Base Boarding\Acquirer Boarding.accdb"
    End Function
    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Re: [Resolvido]Macro VBA para Salvar Como ACCESS

    Mensagem  ahteixeira em Ter 02 Ago 2016, 17:53

    Olá,
    Obrigado pelo retorno.
    Abraço

      Data/hora atual: Sex 09 Dez 2016, 03:50