Dim btn = RibbonTabs("Table").Groups("Column").Items("AddColumn")Messagebox.show("333" & btn.text & "333") '这里显示的菜单标题为"增加列"
If btn.Text.trim = "增加列" Then Messagebox.show("增加列")Else Messagebox.show("删除列")End If