انتقل إلى المحتوى الرئيسي
 

كيفية إنشاء قائمة ديناميكية بأسماء أوراق العمل في إكسيل؟

الكاتب : شمس آخر تعديل: 2024-09-25

إذا كان لديك أوراق متعددة في مصنف ، وتريد إنشاء قائمة ديناميكية لجميع أسماء الأوراق في ورقة جديدة في المصنف ، كيف يمكنك القيام بذلك؟ يقدم هذا البرنامج التعليمي الآن بعض الحيل لإكمال هذه المهمة بسرعة في Excel.

قم بإنشاء قائمة ديناميكية بأسماء أوراق العمل باستخدام تعريف الاسم والصيغة

قم بإنشاء قائمة ديناميكية بأسماء أوراق العمل برمز VBA

قم بإنشاء قائمة ديناميكية بأسماء أوراق العمل باستخدام Kutools for Excel فكرة جيدة 3

عرض قائمة ديناميكية بأسماء أوراق العمل مع كوتولس ل إكسيل فكرة جيدة 3


قم بإنشاء قائمة ديناميكية بأسماء أوراق العمل باستخدام تعريف الاسم والصيغة

1. حدد خلية في ورقة فارغة ، وهنا أحدد A1 ، ثم انقر الصيغ > حدد الاسم. انظر لقطة الشاشة:
زر تحديد الاسم على الشريط

2. ثم في اسم جديد الحوار، نوع أوراق داخل ال الاسم مربع نص (يمكنك التغيير حسب حاجتك) ، واكتب هذه الصيغة = الاستبدال (GET.WORKBOOK (1)، "[" & GET.WORKBOOK (16) & "]"، "") في مربع نص يشير إلى. انظر لقطة الشاشة:
حوار الاسم الجديد

3. انقر OK. انتقل إلى الخلية المحددة (A1) واكتب هذه الصيغة = INDEX (جداول البيانات ، الصفوف ($ A $ 1: $ A1)) (A1 هي الخلية التي تكتب هذه الصيغة ، "جداول البيانات" هو الاسم الذي حددته في الخطوة 2) بداخلها ، ثم اسحب مقبض الملء التلقائي لأسفل حتى #REF! يبدو.
تم إدخال الصيغة في الخلايا وظهور #REF!

معلومه- سرية:إذا كانت هناك أوراق عمل تمت إزالتها أو إضافتها، فيجب عليك الانتقال إلى A1 والضغط على مفتاح الإدخال ثم سحب مقبض التعبئة التلقائية مرة أخرى.
تم إدخال الصيغة مرة أخرى في الخلايا وظهرت #REF!


قم بإنشاء قائمة ديناميكية بأسماء أوراق العمل برمز VBA

إذا كنت تريد إنشاء قائمة ديناميكية بأسماء أوراق العمل التي يمكن ربطها بكل ورقة ، يمكنك استخدام التعليمات البرمجية لـ VBA.

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

خيار إعادة التسمية في قائمة النقر بزر الماوس الأيمن       تمت إعادة تسمية ورقة العمل إلى الفهرس

2. انقر بزر الماوس الأيمن فوق اسم ورقة الفهرس ، وحدد عرض الرمز من قائمة السياق. انظر لقطة الشاشة:
خيار عرض الكود في قائمة السياق

3. في النافذة المنبثقة ، انسخ والصق رمز VBA أدناه.

VBA: إنشاء قائمة ديناميكية بأسماء أوراق العمل.

Private Sub Worksheet_Activate()
	'Updateby20150305
	Dim xSheet As Worksheet
	Dim xRow As Integer
	Dim calcState As Long
	Dim scrUpdateState As Long
	Application.ScreenUpdating = False
	xRow                       = 1
	With Me
		.Columns(1).ClearContents
		.Cells(1, 1) = "INDEX"
		.Cells(1, 1).Name = "Index"
	End With
	For Each xSheet In Application.Worksheets
		If xSheet.Name <> Me.Name Then
			xRow                     = xRow + 1
			With xSheet
				.Range("A1").Name = "Start_" & xSheet.Index
				.Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _
				SubAddress:             = "Index", TextToDisplay: = "Back to Index"
			End With
			Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _
			SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name
		End If
	Next
	Application.ScreenUpdating = True
End Sub

4. انقر يجري or F5 لتشغيل VBA ، يتم الآن إنشاء قائمة ديناميكية بأسماء أوراق العمل.
يتم إنشاء قائمة ديناميكية لأسماء أوراق العمل

تلميح:

1. عند حذف ورقة العمل الخاصة بالمصنف أو إدراجها ، ستتغير قائمة أسماء أوراق العمل تلقائيًا.

2. يمكنك النقر فوق اسم الورقة لقائمة الأسماء للانتقال إلى الورقة.

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


قم بإنشاء قائمة ديناميكية بأسماء أوراق العمل باستخدام Kutools for Excel

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

كوتولس ل إكسيل يقدم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة وتعزيز الإبداع والكفاءة. معزز بقدرات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة. معلومات تفصيلية عن Kutools لـ Excel...         تجربة مجانية...

بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:

1. انقر كوتولس بلس > ورقة العمل > قم بإنشاء قائمة بأسماء الأوراق. انظر لقطة الشاشة:

خيار إنشاء قائمة بأسماء الأوراق في علامة التبويب Kutools Plus على الشريط

2. في ال قم بإنشاء قائمة بأسماء الأوراق الحوار:

 مربع حوار إنشاء قائمة بأسماء الأوراق
(1) تحقق من نمط الفهرس الذي تريده أنماط فهرس الورقة قسم.
(2) قم بتسمية فهرس الصور الجديد بكتابة البيانات فيه حدد اسم الورقة لفهرس الورقة مربع الكتابة؛
(3) حدد الموقع الذي ستضع فيه فهرس الصور المضافة في أدخل فهرس الورقة في قائمة؛
(4) إذا كنت تريد عرض أسماء الأوراق في قائمة واحدة ، فحدد عمودًا واحدًا في عرض فهرس الورقة في قائمة.

3. انقر Ok. الآن يمكنك رؤية أسماء الأوراق مدرجة.
تم إنشاء قائمة أسماء الأوراق

نصيحة:

1. يمكنك النقر فوق اسم الورقة للانتقال بسرعة إلى الورقة الأصلية.

2. لا يمكن تغيير أسماء القائمة أو الورقة ديناميكيًا مع إدراج الأوراق أو حذفها.

3. في الواقع، يمكنك أيضًا إنشاء قائمة من الأزرار للربط بالأوراق النسبية، ما عليك سوى التحقق يحتوي على أزرار ووحدات ماكرو في الحوار. انظر screeshshot:
تم إنشاء قائمة بالأزرار للربط بالأوراق النسبية

انقر هنا لمعرفة المزيد حول إنشاء قائمة بأسماء الأوراق.

  أنشئ قائمة بأسماء الأوراق قابلة للنقر

كوتولس ل إكسيل:أكثر من 300 أداة مفيدة في متناول يدك! استمتع بميزات الذكاء الاصطناعي المجانية بشكل دائم! تحميل الآن!

عرض قائمة ديناميكية بأسماء أوراق العمل مع كوتولس ل إكسيل

إذا كنت مع كوتولس ل إكسيل، يمكنك أيضًا استخدام ملف قائمة الإختيارات لعرض أسماء أوراق العمل القابلة للربط في جزء

بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:

1. انقر كوتولس > قائمة الإختيارات. انقر مصنف وورقة لإظهار المصنف وورقة العمل ، ويمكنك تحديد مصنف ، ثم سيتم عرض أوراق العمل الخاصة به في ملف قائمة الإختيارات جزء. انظر لقطة الشاشة:
جزء المصنف والورقة   

تلميح:

عندما تكون هناك أوراق عمل محذوفة أو مضافة ، يمكنك النقر فوق زر التحديث زر التحديث في ال الملاحة وتحديدجزء n لتحديث أسماء أوراق العمل.

انقر هنا لمزيد من المعلومات حول التنقل.

  جزء التنقل - قائمة الأوراق

كوتولس ل إكسيل:أكثر من 300 أداة مفيدة في متناول يدك! استمتع بميزات الذكاء الاصطناعي المجانية بشكل دائم! تحميل الآن!

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

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