VB制作COM加载项，设计器如何调用模块代码

学好VBA啊

有几个疑问，希望大神能够指点一下！1、设计器如何调用模块代码，或者是类模块的代码。
2、如何给DLL里面的过程添加快捷方式，我只会给模板文件里面的宏添加快捷方式，代码如下：

1. CustomizationContext = NormalTemplate '该键盘自定义方案保存在“Normal”模板中。
   
2.     KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, wdKeyNumeric0), KeyCategory:=wdKeyCategoryMacro, Command:="ConvertToTextHigh"
   
3.     KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, wdKeyNumeric1), KeyCategory:=wdKeyCategoryMacro, Command:="ConvertToField"
   
4.     KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, wdKeyNumeric2), KeyCategory:=wdKeyCategoryMacro, Command:="ConvertToFieldHigh"
   
5.     KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyControl, wdKeyNumeric4), KeyCategory:=wdKeyCategoryMacro, Command:="DeleteDocText"

复制代码