摘要： '=================================================Sub DisableRightClick() ' 禁止右键菜单'================================================= Dim cd As CommandBar For Each cd In Application.CommandBars If cd.Type = msoBarTypePopup Then '判断菜单的类型 cd.Enabled = False End If N... 阅读全文