كيفية تعطيل قائمة النقر بزر الماوس الأيمن في ورقة العمل المحددة أو المصنف بأكمله في Excel؟

هل تعرف كيفية تعطيل قائمة النقر بزر الماوس الأيمن في Excel؟ ستوضح لك هذه المقالة طرقًا لتعطيل قائمة النقر بزر الماوس الأيمن ، ليس فقط في ورقة العمل المحددة ولكن أيضًا في المصنف بأكمله.

قم بتعطيل قائمة النقر بزر الماوس الأيمن في ورقة العمل المحددة برمز VBA
قم بتعطيل قائمة النقر بزر الماوس الأيمن في المصنف بأكمله برمز VBA

---

قم بتعطيل قائمة النقر بزر الماوس الأيمن في ورقة العمل المحددة برمز VBA

يتحدث هذا القسم عن تعطيل قائمة النقر بزر الماوس الأيمن في ورقة العمل المحددة باستخدام طريقة VBA. الرجاء القيام بما يلي.

1. افتح ورقة العمل التي تريد تعطيل قائمة النقر بزر الماوس الأيمن فوقها ، وانقر بزر الماوس الأيمن فوق علامة تبويب الورقة ثم انقر فوق عرض الرمز من قائمة السياق.

2. ثم ميكروسوفت فيسوال باسيك للتطبيقات نافذة للملوثات العضوية الثابتة. يرجى نسخ البرنامج النصي أدناه ولصقه في نافذة التعليمات البرمجية.

كود فبا: قم بتعطيل قائمة النقر بزر الماوس الأيمن في ورقة العمل المحددة في إكسيل

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    MsgBox ("Sorry Right Click is Disbaled for this Worksheet"), _
    vbInformation, "Kutools for Excel"
End Sub

3. اضغط على قديم + Q مفاتيح للخروج من ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

من الآن فصاعدًا ، عندما تحاول النقر بزر الماوس الأيمن فوق أي خلية في ورقة العمل هذه ، ستحصل على مربع حوار Kutools for Excel كما هو موضح أدناه.

---

قم بتعطيل قائمة النقر بزر الماوس الأيمن في المصنف بأكمله برمز VBA

يمكنك أيضًا تعطيل قائمة النقر بزر الماوس الأيمن في المصنف بأكمله باستخدام رمز VBA التالي.

1. في المصنف تحتاج إلى تعطيل قائمة النقر بزر الماوس الأيمن ، يرجى الضغط على قديم + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، الرجاء النقر المزدوج ThisWorkbook في اليسار قسم المشاريع جزء ، ثم انسخ والصق رمز فبا أدناه في ملف ThisWorkbook (كود) نافذة او شباك. انظر لقطة الشاشة:

كود فبا: تعطيل قائمة النقر بزر الماوس الأيمن في المصنف بأكمله في إكسيل

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
    Cancel = True
    MsgBox ("Sorry Right Click is Disbaled for this Workbook"), _
    vbInformation, "Kutools for Excel"
End Sub

3. اضغط على قديم + Q مفاتيح للخروج من ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

من الآن فصاعدًا ، عندما تحاول النقر بزر الماوس الأيمن فوق أي خلية في المصنف ، سيظهر مربع حوار Kutools for Excel لتذكيرك بقائمة النقر بزر الماوس الأيمن قد تم تعطيلها. انظر لقطة الشاشة:

---

مقالات ذات صلة:

• كيفية تعطيل وظائف القص والنسخ واللصق في إكسيل؟
• كيفية تعطيل النقر بزر الماوس الأيمن على علامة تبويب الورقة في إكسيل؟
• كيفية منع أو تعطيل وضع التحرير عن طريق النقر المزدوج على خلية في إكسيل؟