كيفية إدراج أسماء الأوراق بسرعة في الخلايا في Excel؟

هل هناك طريقة سهلة لإدراج اسم ورقة العمل الحالية في خلية واحدة؟ وكيفية إدراج أسماء جميع الأوراق في الخلايا؟ سيقدم لك هذا المقال طرقًا مبتكرة لحل هذه المشكلات.

إدراج اسم الورقة الحالية في خلية باستخدام الدوال

إدراج سريع لاسم الورقة النشطة مع Kutools لـ Excel

إدراج أسماء جميع الأوراق في الخلايا باستخدام VBA

إدراج سريع لأسماء جميع الأوراق مع روابط تشعبية في الخلايا كفهرس

إدراج سريع لاسم الورقة الحالية في خلية باستخدام الدوال

ما عليك سوى إدخال الصيغة التالية: =RIGHT(CELL("filename",D2),LEN(CELL("filename",D2))-FIND("]",CELL("filename",D2))) في أي خلية ثم اضغط على Enter المفتاح، وسيظهر اسم ورقة العمل الحالية في الخلية.

هذه الصيغة قادرة فقط على عرض اسم ورقة العمل الحالية، وليس أسماء الأوراق الأخرى.

إدراج سريع لاسم الورقة النشطة مع Kutools لـ Excel

إذا كنت تريد إدراج معلومات الورقة النشطة بما في ذلك اسم الورقة، اسم المصنف، مسار الملف وما إلى ذلك في خلية أو في رأس/تذييل الصفحة، يمكنك استخدام إدراج معلومات المصنف من Kutools لـ Excel.

بعد تنزيل وتثبيت Kutools لـ Excel مجانًا، يرجى القيام بما يلي:

1. حدد خلية أو نطاق لوضع اسم الورقة، وانقر فوق Kutools Plus > Workbook > إدراج معلومات المصنف.

2. ثم حدد المعلومات التي تحتاج إلى إدراجها من معلومات القسم، وحدد الموقع الذي تريد وضع المعلومات فيه من موضع الإدراج القسم. ثم انقر فوق موافق.

يمكنك النقر هنا لمعرفة المزيد حول إدراج معلومات المصنف.

إدراج سريع لأسماء جميع الأوراق في الخلايا باستخدام VBA

إذا كنت تريد إدراج أسماء جميع الأوراق في الخلايا، فإن ماكرو VBA هو خيار جيد.

الخطوة 1: اضغط باستمرار على مفاتيح Alt + F11 في Excel، وستفتح نافذة Microsoft Visual Basic for Applications.

الخطوة 2: انقر فوق إدراج > وحدة، والصق الماكرو التالي في نافذة الوحدة.

VBA لإدراج أسماء جميع الأوراق في الخلايا:

Sub SheetNames()
Columns(1).Insert
For i = 1 To Sheets.Count
Cells(i, 1) = Sheets(i).Name
Next i
End Sub

الخطوة 3: اضغط على F5 لتشغيل هذا الماكرو. بعد ذلك سترى أن أسماء جميع الأوراق مدرجة في العمود A من ورقة العمل الحالية. شاهد لقطة الشاشة:

ملاحظة: في كود VBA، يمكنك تغيير Cells(i, 1) إلى مرجع آخر لإدراج أسماء الأوراق بدءًا من خلايا أخرى. على سبيل المثال، إدراج أسماء الأوراق بدءًا من C3، غيّره إلى Cells(i+2, 3).

إدراج سريع لأسماء جميع الأوراق مع روابط تشعبية في الخلايا كفهرس

أداة إنشاء قائمة بأسماء الأوراق من Kutools لـ Excel لا تقوم فقط بإدراج أسماء جميع الأوراق في الخلايا، بل تقوم أيضًا بإدراج روابط تشعبية للأوراق المقابلة.

بعد تنزيل وتثبيت Kutools لـ Excel مجانًا، يرجى القيام بما يلي:

الخطوة 1: انقر فوق Kutools Plus > ورقة العمل> إنشاء قائمة بأسماء الأوراق.

الخطوة 2: في إنشاء قائمة بأسماء الأوراق مربع الحوار، حدد الإعدادات وفقًا لاحتياجاتك، ثم انقر فوق موافق.

بعد ذلك سترى أن أسماء جميع الأوراق قد تم إدراجها في ورقة عمل جديدة، وكل اسم ورقة مرتبط بالورقة المقابلة. شاهد لقطات الشاشة التالية:

تساعد أداة إنشاء قائمة بأسماء الأوراق في إنشاء قائمة بجميع أسماء الأوراق الخاصة بالمصنف الحالي في ورقة عمل جديدة، والتي تحتوي على روابط تشعبية أو أزرار ماكرو للتنقل السريع إلى الأوراق الأخرى. انقر لمعرفة المزيد عن هذه الأداة.