كيف يمكن إنشاء فهرس أوراق ارتباط تشعبي في المصنف؟
في عملنا اليومي ، قد تكون هناك أوراق عمل متعددة في ملف مصنف ، كيف يمكنك إنشاء فهرس لعلامات تبويب الأوراق في ورقة عمل وإنشاء ارتباط تشعبي لكل علامة تبويب؟ في هذه المقالة سوف أتحدث عن بعض الحيل السريعة للتعامل مع هذه المهمة في Excel.
قم بإنشاء فهرس أوراق مرتبط تشعبيًا برمز VBA
قم بإنشاء فهرس أوراق مرتبط تشعبيًا باستخدام إنشاء قائمة بأسماء أوراق Kutools for Excel
قم بإنشاء فهرس أوراق مرتبط تشعبيًا باستخدام Navigation of Kutools for Excel
قم بإنشاء فهرس أوراق مرتبط تشعبيًا برمز VBA
قد يساعدك رمز VBA التالي على إنشاء فهارس لأسماء الأوراق في ورقة عمل جديدة أمام أوراق العمل الأخرى. الرجاء القيام بما يلي:
1. اضغط باستمرار على ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.
كود فبا: إنشاء فهرس من الأوراق ذات الارتباط التشعبي
Sub CreateIndex()
'updateby Extendoffice
Dim xAlerts As Boolean
Dim I As Long
Dim xShtIndex As Worksheet
Dim xSht As Variant
xAlerts = Application.DisplayAlerts
Application.DisplayAlerts = False
On Error Resume Next
Sheets("Index").Delete
On Error GoTo 0
Set xShtIndex = Sheets.Add(Sheets(1))
xShtIndex.Name = "Index"
I = 1
Cells(1, 1).Value = "INDEX"
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> "Index" Then
I = I + 1
xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
End If
Next
Application.DisplayAlerts = xAlerts
End Sub
3. ثم اضغط F5 مفتاح لتنفيذ هذا الرمز ، وورقة عمل جديدة باسم "فهرس"في المصنف قبل كافة الأوراق التي تتضمن أسماء الأوراق ذات الارتباطات التشعبية. انظر لقطة الشاشة:
قم بإنشاء فهرس أوراق مرتبط تشعبيًا باستخدام إنشاء قائمة بأسماء أوراق Kutools for Excel
باستثناء رمز VBA أعلاه ، يمكنك أيضًا إنهاء هذه المهمة باستخدام أداة مفيدة- كوتولس ل إكسيل، بما لديها قم بإنشاء قائمة بأسماء الأوراق، يمكنك إنشاء فهرس بأسماء الأوراق بسرعة باستخدام ارتباطات تشعبية أو أزرار.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيل، برجاء اتباع الخطوات التالية:
1. انقر كوتولس بلس > ورقة العمل > قم بإنشاء قائمة بأسماء الأوراق، انظر لقطة الشاشة:
2. في قم بإنشاء قائمة بأسماء الأوراق مربع الحوار ، يرجى القيام بالخيارات التالية:
- اختر نمط فهرس واحد يمكنك استخدامه وصلات or أزرار لفهرس أسماء الأوراق ;
- حدد اسمًا للورقة التي ستدرج فهرس الورقة حسب حاجتك ؛
- حدد الموقع حيث يتم وضع فهرس الورقة ؛
- حدد عدد الأعمدة التي تريد وضعها في قائمة أسماء الأوراق.
3. بعد الانتهاء من الإعدادات ، انقر فوق Ok زر ، تم إنشاء ورقة عمل جديدة مع فهرس اسم الورقة على النحو التالي:
أسماء الأوراق ذات الارتباطات التشعبية | أسماء الأوراق باستخدام الأزرار |
انقر لمعرفة المزيد من التفاصيل حول ميزة إنشاء قائمة بأسماء الأوراق ...
تحميل مجاني Kutools لبرنامج Excel الآن
قم بإنشاء فهرس أوراق مرتبط تشعبيًا باستخدام Navigation of Kutools for Excel
كوتولس ل إكسيلالصورة قائمة الإختيارات يمكن أن تساعدك الأداة المساعدة أيضًا في سرد جميع أسماء الأوراق في الجزء الأيمن ، ويمكنك النقر فوق أي اسم ورقة للانتقال إلى ورقة العمل.
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. انقر كوتولس > قائمة الإختيارات، انظر لقطة الشاشة:
2. ثم اضغط مصنف وورقة رمز لتوسيع جزء التنقل:
1. يتم سرد كافة المصنفات المفتوحة هنا. | |
2. يتم سرد أوراق العمل المرئية داخل المصنف الحالي في ما يلي في مربع القائمة ، يمكنك الانتقال إلى الورقة المحددة بالنقر فوقها من الجزء. |
انقر لمعرفة المزيد حول جزء التنقل هذا ...
تحميل مجاني Kutools لبرنامج Excel الآن
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!