セルでの右クリックを無効にする（その２）
ブック単位でセルでの右クリックを制御するには、Workbook_SheetBeforeRightClickイベントで宣言されている「(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)」を利用します。
Shはイベントが発生した時のシート名で、Targetはイベントが発生した時のセルで、Cancelは既存の右クリックメニューが表示されるのを中止します。
ブックモジュールに以下の様に入力します。
'Sheet1とSheet3の時だけ、右クリックを全て無効にする
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Sh.Name = "Sheet1" Or Sh.Name = "Sheet3" Then
Cancel = True
End If
End Sub