Skip to content

Instantly share code, notes, and snippets.

@ijd65

ijd65/Compact Databse

Created September 27, 2013 06:27
Show Gist options
  • Save ijd65/6724820 to your computer and use it in GitHub Desktop.
Save ijd65/6724820 to your computer and use it in GitHub Desktop.
Download ZIP
Compact & repair the current Access database
Raw
Compact Databse
Public Sub CompactDB()
CommandBars("Menu Bar"). _
Controls("Tools"). _
Controls("Database utilities"). _
Controls("Compact and repair database..."). _
accDoDefaultAction
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment