Access = Shell("C:\Programmi\Microsoft Office\Office\MSACCESS.EXE Pippo.mdb", 1)

Oppure la mnuAccess() fa apparire una inputbox che chiede il nome del file