من داشتم يک سري کد را در فايلهايم امتحان مي کردم که کلا" راست کليک روي سلها و شيت هايم غير ممکن شده، توي کل اکسل! حالا چکارکنم؟
کدهايي که روش کار مي کردم اينها بود: (سه تا کد)
کدهايي که روش کار مي کردم اينها بود: (سه تا کد)
کد:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) MsgBox "No RightClick" Cancel = True End Sub --------------------------------- Private Sub Workbook_Open() Application.CommandBars("cell").Enabled = False End Sub --------------------------------- Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.CommandBars("cell").Enabled = True End Sub
کامنت