>>804
Workbooks.Open "\test.xlsm"
Application.Run "test.xlsm!TestProcesure"