كيفية النقر أو النقر المزدوج على الخلية لفتح نموذج مستخدم محدد في Excel؟
من السهل فتح نموذج مستخدم محدد بالنقر أو النقر المزدوج على خلية في Excel. ولكن كيف يمكنك تحقيق ذلك؟ يقدم لك هذا المقال طريقة للمساعدة.
انقر أو انقر مزدوجاً على خلية لفتح نموذج مستخدم محدد باستخدام كود VBA
انقر أو انقر مزدوجاً على خلية لفتح نموذج مستخدم محدد باستخدام كود VBA
اتبع هذه الخطوات لتمكين النقر أو النقر المزدوج على خلية لفتح نموذج مستخدم محدد في Excel.
1. افتح ورقة العمل التي تحتوي على الخلايا التي تريد النقر عليها أو النقر المزدوج عليها لفتح نموذج المستخدم.
2. انقر بزر الماوس الأيمن على تبويب الورقة ثم انقر على عرض الكود من قائمة السياق. انظر لقطة الشاشة:
3. في نافذة Microsoft Visual Basic for Applications التي ستفتح، يرجى نسخ ولصق الكود التالي VBA في نافذة الكود.
كود VBA: انقر على خلية لفتح نموذج مستخدم محدد في Excel:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby20171226
If Not Application.Intersect(Target, Range("A1:B9")) Is Nothing Then
UserForm1.Show
End If
End Sub
كود VBA: انقر مزدوجاً على خلية لفتح نموذج مستخدم محدد في Excel:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
If Not Application.Intersect(Target, Range("A1:B9")) Is Nothing Then
Cancel = True
UserForm1.Show
End If
End Sub
ملاحظة: في الكود، A1:B9 هو نطاق الخلايا الذي ستفتح عليه نموذج المستخدم. وUserForm1 هو اسم نموذج المستخدم الذي ستفتحه بالنقر أو النقر المزدوج على الخلايا. يرجى تغييره حسب حاجتك.
4. اضغط على مفتاحي Alt + Q لإغلاق نافذة Microsoft Visual Basic for Applications.
من الآن فصاعدًا، عند النقر أو النقر المزدوج على أي خلية في النطاق المحدد، سيتم فتح نموذج المستخدم المخصص فورًا، كما هو موضح في لقطة الشاشة أدناه.
مقالات ذات صلة:
- كيفية النقر المزدوج على خلية لفتح ورقة عمل محددة في Excel؟
- كيفية إضافة علامة اختيار في خلية بالنقر المزدوج في Excel؟
- كيفية إضافة/إدخال التاريخ/الوقت الحالي تلقائيًا في خلية بالنقر المزدوج في Excel؟
- كيفية النقر المزدوج على خلية وإضافة 1 إلى قيمة تلك الخلية في Excel؟
- كيفية ظهور تقويم عند النقر على خلية معينة في Excel؟
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!