كيفية إنشاء قائمة منسدلة تحتوي على ارتباطات تشعبية لكل ورقة في Excel؟
ربما تكون قد أنشأت قائمة منسدلة من قبل ، ولكن هل سبق لك إنشاء قائمة منسدلة تحتوي على ارتباطات تشعبية لكل ورقة في Excel كما هو موضح أدناه؟
قم بإنشاء قائمة منسدلة بالارتباطات التشعبية للورقة
قم بإنشاء قائمة بالأوراق ذات الارتباطات التشعبية
إنشاء قائمة منسدلة مع ورقة ارتباط تشعبي
لا يوجد سوى رمز VBA يمكنه التعامل مع المهمة في Excel.
1. انقر المطور > إدراج > صندوق التحرير والسرد (عناصر تحكم ActiveX).
ملاحظة: إذا لم تظهر علامة التبويب المطور في الشريط ، فالرجاء النقر فوق قم بتقديم > مزيد من الخيارات > تخصيص الشريط، ثم تحقق من المطور الخيار في المربع الأيمن. انظر لقطة الشاشة:
2. ثم ارسم مربع التحرير والسرد في أي مكان تريد.
3. انقر بزر الماوس الأيمن على الورقة التي رسمت بها مربع التحرير والسرد الآن ، ثم انقر عرض الرمز من قائمة السياق.
4. انسخ الكود أدناه والصقه في البرنامج النصي الفارغ ، ثم احفظه للعودة إلى الورقة.
فبا: إنشاء قائمة منسدلة مع روابط الأوراق
Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
Me.ComboBox1.Style = fmStyleDropDownList
If Me.ComboBox1.ListCount <> Sheets.Count Then
Me.ComboBox1.Clear
For I = 1 To ActiveWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
End If
Me.ComboBox1.DropDown
End Sub
5. انقر المطور > وضع التصميم للخروج من وضع التصميم.
الآن تم إدراج جميع الأوراق في القائمة المنسدلة، وسوف تنتقل إلى الورقة أثناء النقر على اسم الورقة.
قم بإنشاء قائمة بالأوراق ذات الارتباطات التشعبية
إذا كنت تريد فقط إنشاء قائمة بأسماء الأوراق القابلة للنقر عليها كما هو موضح أدناه في لقطة الشاشة، فيمكنك التقديم Kutools for Excelالصورة Create List of Sheet Names الميزة التي يمكنها إنشاء قائمة من الارتباطات التشعبية حول أسماء الأوراق أو قائمة أزرار الماكرو حول أسماء الأوراق.
كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. |
بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي:(تنزيل مجاني Kutools for Excel الآن!)
1. انقر كوتولس بلس > ورقة العمل > Create List of Sheet Names.
2. في ال Create List of Sheet Names الحوار ، افعل على النحو التالي:
(1). يفحص Contains a list of hyperlinks< لإنشاء قائمة بأسماء الأوراق القابلة للنقر عليها، أو تحقق منها Contains buttons and macros لإنشاء أزرار ترتبط بكل ورقة.
(2). قم بإعطاء الورقة الجديدة التي ستضع الارتباطات التشعبية فيها بالاسم.
(3). حدد موقع الورقة الجديدة.
(4). حدد روابط الأوراق المعروضة بعدد الأعمدة.
3. انقر فوق "موافق"، الآن تم عرض أسماء الأوراق القابلة للنقر عليها في ورقة جديدة.
تجربة
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!