不行么?
RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Visible = FalseRibbonTabs("Other").Groups("Execute").Items("Command").visible = False