Using the DoCmd Object to Run Commands
Sub run() DoCmd.RunMacro "RemoveDuplicates" End Sub Option Compare Database