Access - Compactar y reparar base de datos

Hola

Tengo una base de datos en access y necesito habilitar un botón que al pulsarlo compacte y repare la base de datos de manera similar a la opción "compactar y reparar base de datos" del menú herramientas.

Utilizo el siguiente código para realizar dicha función:

DoCmd.RunCommand acCmdCompactDatabase
DoCmd.RunCommand acCmdRepairDatabase

Sin embargo, me dice que no puede hacerlo mientras está mientras se ejecuta una macro o código de Visual Basic. ¿Cómo puedo hacerlo?.

Muchas gracias.

El problema que tienes es que una base de datos abierta no se puede compactar, en las opciones del access tienes una que pone compactar al salir, igual asi solucionas el problema. Si no debes crear una base de datos aparte y desde alli compactarla.
Un saludo
Skakeo®