قفل کردن راست کلیک در صفحه اکسل
--------------------------------------------------------------------------------
برای قفل کردن راست کلیک در صفحه اکسل ابتدا صفحه ویژوال اکسل را از طریق Tools-Macro-Visual Bisic Editor باز کرده و در سمت در کادر چپ Project شیت یک را انتخاب و روی آن دبل کلیک کنید تا صفحه ویژوال مربوط به آن باز شود یا رو ی شیتی که می خواهید راست کلیک در
قفل شود راست کلیک کرده وView Code را انتخاب کنید .
در کادر پائین ریز سمت چپ بالای صفحه Worksheet را انتخاب کنیدو در کادر پائین ریز سمت راست گزینه BeforeRightClick را انتخاب کرده و دستور زیر را بین کد بوجود آمده تایپ کنید
حالا صفحه ویژوال را ببندید و در صفحه اکسل شیت ۱ راست کلیک کنید.
کد: Cancel = True
بدین صورت
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "No RightClick"
Cancel = True
End Sub
بدرود :blush:
--------------------------------------------------------------------------------
برای قفل کردن راست کلیک در صفحه اکسل ابتدا صفحه ویژوال اکسل را از طریق Tools-Macro-Visual Bisic Editor باز کرده و در سمت در کادر چپ Project شیت یک را انتخاب و روی آن دبل کلیک کنید تا صفحه ویژوال مربوط به آن باز شود یا رو ی شیتی که می خواهید راست کلیک در
قفل شود راست کلیک کرده وView Code را انتخاب کنید .
در کادر پائین ریز سمت چپ بالای صفحه Worksheet را انتخاب کنیدو در کادر پائین ریز سمت راست گزینه BeforeRightClick را انتخاب کرده و دستور زیر را بین کد بوجود آمده تایپ کنید
حالا صفحه ویژوال را ببندید و در صفحه اکسل شیت ۱ راست کلیک کنید.
کد: Cancel = True
بدین صورت
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox "No RightClick"
Cancel = True
End Sub
بدرود :blush:
کامنت