كيفية تحديد ورقة عمل محددة بناءً على قيمة الخلية في ورقة أخرى في Excel؟
لنفترض أن لديك قائمة منسدلة للتحقق من صحة البيانات تحتوي على جميع أسماء أوراق العمل ، وتريد تحديد ورقة العمل المقابلة أو الانتقال إليها تلقائيًا بناءً على اسم الورقة الذي حددته في القائمة المنسدلة ، فماذا يمكنك أن تفعل؟ وماذا عن القفز تلقائيًا إلى ورقة عمل معينة بعد كتابة اسم الورقة في خلية محددة؟ ستوضح لك هذه المقالة عدة طرق لتحقيق ذلك.
حدد ورقة عمل محددة بناءً على تحديد القائمة المنسدلة برمز VBA
حدد ورقة عمل محددة بناءً على قيمة الخلية برمز VBA
قم بإنشاء فهرس الأوراق بسهولة وانتقل إلى ورقة عمل معينة باستخدام Kutools for Excel
حدد ورقة عمل محددة بناءً على تحديد القائمة المنسدلة برمز VBA
على سبيل المثال ، توجد قائمة منسدلة في الخلية A2 من الورقة 8. يمكنك تشغيل رمز VBA أدناه لتحديد ورقة العمل المقابلة أو الانتقال إليها عند تحديد اسم الورقة في القائمة المنسدلة.
1. صحافة قديم + F11 لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات في النافذة ، انقر نقرًا مزدوجًا فوق اسم الورقة (ورقة العمل التي تحتوي على القائمة المنسدلة التي ستحدد أسماء الأوراق منها) في الشريط الأيسر ، ثم انسخ والصق رمز VBA أدناه في نافذة التعليمات البرمجية.
كود فبا: حدد ورقة عمل محددة بناءً على اختيار القائمة المنسدلة
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not (Application.Intersect(Range("A2"), Target) Is Nothing) Then _
ThisWorkbook.Sheets(Target.Value).Activate
End Sub
ملاحظات: يمكنك تغيير "A2" إلى خليتك الخاصة.
3. صحافة قديم + Q مفاتيح في نفس الوقت لإغلاق Microsoft Visual Basic للتطبيقات نافذة.
من الآن فصاعدًا ، عندما تختار اسم ورقة في القائمة المنسدلة لـ Sheet8 ، سيتم تحديد ورقة العمل هذه تلقائيًا.
حدد ورقة عمل محددة بناءً على قيمة الخلية برمز VBA
إذا كنت تريد الانتقال إلى ورقة عمل معينة بعد كتابة اسم الورقة في خلية (الخلية A1 في الورقة 1) ، يمكنك تجربة التعليمات البرمجية لـ VBA التالية.
1. صحافة قديم + F11 لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. في ال ميكروسوفت فيسوال باسيك للتطبيقات في النافذة ، انقر نقرًا مزدوجًا فوق اسم الورقة (ورقة العمل التي ستكتبها في اسم الورقة) في الشريط الأيسر ، ثم انسخ والصق رمز VBA أدناه في نافذة التعليمات البرمجية. انظر لقطة الشاشة:
كود فبا: حدد ورقة عمل محددة على أساس قيمة الخلية
Sub ActivateSheetsByValue()
On Error Resume Next
ThisWorkbook.Sheets(Worksheets("Sheet1").Range("A1").Value).Activate
End Sub
3. ارجع إلى ورقة العمل وأدخل اسم الورقة الذي تريد تحديده في الخلية A1 ، وقم بتنشيط نافذة الكود ، ثم اضغط على مفتاح F5 لتشغيل الكود.
إذا كانت الخلية A1 في الورقة 1 تحتوي على اسم ورقة العمل "Sheet8" ، فبعد تشغيل رمز VBA ، سيتم الانتقال إلى Sheet8 على الفور.
قم بإنشاء فهرس الأوراق بسهولة وانتقل إلى ورقة عمل معينة باستخدام Kutools for Excel
إذا كنت تريد فقط تحديد ورقة عمل معينة أو الانتقال إليها بسرعة ، فيمكنك تجربة ملف قم بإنشاء قائمة بأسماء الأوراق فائدة كوتولس ل إكسيل. باستخدام هذه الأداة ، يمكنك بسهولة إنشاء فهرس ورقة ، ثم الانتقال سريعًا إلى ورقة عمل معينة بالنقر فوق اسم الورقة.
قبل التطبيق كوتولس ل إكسيلالرجاء قم بتنزيله وتثبيته أولاً.
1. انقر كوتولس بلس > ورقة العمل > قم بإنشاء قائمة بأسماء الأوراق. انظر لقطة الشاشة:
2. في ال قم بإنشاء قائمة بأسماء الأوراق مربع الحوار، حدد يحتوي على قائمة بالارتباطات التشعبية الخيار في أنماط فهرس الورقة الجزء؛ اكتب اسمًا لفهرس الورقة في ملف حدد اسم الورقة لفهرس الورقة صندوق؛ أختر قبل كل الأوراق في إدراج فهرس الورقة في القائمة المنسدلة. ثم انقر فوق ملف OK .
ملاحظات: افحص ال يحتوي على أزرار ووحدات ماكرو الخيار ، سوف تحصل على فهرس ورقة مع زر وحدات الماكرو. انظر لقطة الشاشة:
في ورقة عمل الفهرس ، يمكنك النقر فوق اسم ورقة عمل معين للانتقال إلى ورقة العمل تلقائيًا.
إذا كنت ترغب في الحصول على نسخة تجريبية مجانية (30 يومًا) من هذه الأداة المساعدة ، الرجاء الضغط لتنزيلهثم انتقل لتطبيق العملية حسب الخطوات المذكورة أعلاه.
قم بإنشاء فهرس الأوراق بسهولة وانتقل إلى ورقة عمل معينة باستخدام Kutools for Excel
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!