| ○ActiveSheetや他のシートに、切り取りやコピー後の貼付けをできないようにします 例1：Sheet1のDeactivateイベント（アクティブでなくなった） にApplication.CutCopyMode = Falseを記述 Private Sub Worksheet_Deactivate() Application.CutCopyMode = False End Sub 例2：Sheet1のSelectionChangeイベント（選択範囲変更） に記述 Private Sub Worksheet_SelectionChange(ByVal _ Target As Excel.Range) Application.CutCopyMode = False End Sub |