请问怎么在outlook里，添加右键菜单？

效果是这样的，
当打开一个邮件时，点右键，右键里加一个按钮“RUN”，点击RUN按钮执行一段VBA代码
要执行的代码我已经做好了，就是不会添加右键菜单

大家帮帮我啊 --------------------编程问答-------------------- Commandbar 

Type:=msoControlPopup --------------------编程问答-------------------- 有没有详细一点的代码啊，我不太会

是不是要写在thisOutlookSession里面？

补充：VB ,  VBA