كيفية تحديد ورقة عمل محددة بناءً على قيمة الخلية في ورقة أخرى في 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
أفضل أدوات إنتاجية المكتب
Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪
- إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
- سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
- دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
- حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
- نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
- استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
- سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
- اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
- أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
