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

    Como Compactar/Reparar um banco de dados aberto no ACCESS 2013, com VBA

    Compartilhe
    avatar
    infosoft
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 251
    Registrado : 09/07/2012

    Como Compactar/Reparar um banco de dados aberto no ACCESS 2013, com VBA

    Mensagem  infosoft em 26/1/2018, 14:56

    Como Compactar/Reparar um banco de dados aberto no ACCESS 2013, com VBA, seguindo este exemplo do JPaulo?

    ------- JPaulo ---------
    Compactar Banco 2007 aberto.

    No evento VBA ao pressionar de um botão...

    Private Sub SeuBotão_Click()
    Dim ws As Object
    Set ws = CreateObject("WScript.shell")
    ws.SendKeys "%AGO"
    Set ws = Nothing
    End Sub
    -----------------------

      Data/hora atual: 20/9/2018, 08:37