عدم اجراي کد استفاده از آبجکت Assistant در اکسس

[ARData]

سلام دوستان :
کد زير که از فايل هاي کمکي خود اکسس مي باشد کار نمي کند يعني نمي تونم با Assitant اکسس کار کنم استادان محترم علتشو اگه بفرمايند ممنون ميشم :
With Assistant .On = True .FileName = "Rocky.acs" .Animation = msoAnimationBeginSpeaking .AssistWithHelp = True .GuessHelp = True .FeatureTips = False .Visible = True End With