主题：几个关于菜单设计的问题

1、如果已经有一个菜单按钮

RibbonTabs("功能区1")("功能组1")("工具栏1")，其代码比较复杂一些

另有一个菜单按钮，名称：A，其代码准备和上面的菜单按钮代码相同，如果想直接运行上面的按钮，代码怎么样写？这样免得以后改代码的时候要改两个地方。和窗体中某个控件运行另一个控件的意思类似。

2、如果想通过菜单按钮 打开一个网站、一个WORD文档，一个EXCEL文档，代码怎么写？

恳请专家指教！！

谢谢 B in，问题1 解决了

   Dim btn As RibbonMenu.Button = RibbonTabs("录入修改").Groups("在职教职工").Items("查询信息")
   btn.PerformClick()

这样就等同于执行了 菜单按钮 【查询信息】的代码了。

项目的分级太多的时候就不知道怎么写了，我干脆直接写成了下列这样子，也能用

Dim btn As RibbonMenu.Button = RibbonTabs("查询打印")("月度绩效工资报表")("单位报表")("人员档案工资汇总表")
btn.PerformClick()