كيف تُنشئ أسماء أوراق بناءً على قائمة في Excel؟
لديك هنا قائمة بيانات، وترغب الآن في إنشاء ورقة عمل جديدة تكون أوراقها مسماة وفقًا لهذه البيانات. إذا كانت القائمة تحتوي على بضع عناصر فقط، يمكنك ببساطة إنشاء ملف العمل ثم إعادة تسمية الأوراق يدويًّا واحدة تلو الأخرى. لكن ماذا لو احتوت القائمة على مئات العناصر؟ سأعرض لك الآن بعض الحيل الذكية التي تتيح لك إنشاء أسماء أوراق العمل تلقائيًّا بناءً على قائمة البيانات في Excel.
إنشاء أسماء أوراق من قائمة باستخدام VBA
إنشاء ورقة عمل جديدة بأسماء أوراق من قائمة بواسطة Kutools لـ Excel ![]()
إنشاء أسماء أوراق من قائمة باستخدام VBA
في Excel، لا توجد طريقة لإنجاز هذه المهمة سوى باستخدام كود VBA.
1. اضغط علىAlt + F11 لفتح نافذةMicrosoft Visual Basic for Applications.
2. انقر علىإدراج > وحدة نمطية (Module)، ثم الصق كود VBA أدناه في نافذة الوحدة النمطية الجديدة.
VBA: إنشاء أسماء أوراق من قائمة
Sub CreateSheetsFromAList()
'UpdatebyKutoolsforExcel20150916
Dim Rg As Range
Dim Rg1 As Range
Dim xAddress As String
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Select a range:", "Kutools for Excel", , , , , , 8)
If Rg Is Nothing Then Exit Sub
For Each Rg1 In Rg
If Rg1 <> "" Then
Call Sheets.Add(, Sheets(Sheets.Count))
Sheets(Sheets.Count).Name = Rg1.Value
End If
Next
End Sub 3. انقر علىتشغيل (Run)أو اضغط علىF5، ثم تظهر نافذة حوارية لـKutools لـ Excelلتذكيرك باختيار الخلايا التي تريد إنشاء أسماء الأوراق بناءً عليها.

4. انقر علىموافق (OK). الآن تم إنشاء مجموعة من الأوراق في نهاية المصنف الحالي.

إذا كنت ترغب في إنشاء ورقة عمل جديدة بأسماء أوراق من قائمة معطاة في المصنف الحالي، يمكنك استخدام أداةKutools لـ Excelالخاصة بـإنشاء ورقة عمل متتابعة.
إنشاء ورقة عمل جديدة بأسماء أوراق من قائمة بواسطة Kutools لـ Excel
باستخدامKutools لـ Excel، يمكنك استخدام أداةإنشاء ورقة عمل متتابعةلإنشاء أوراق عمل متتابعة بسرعة استنادًا إلى قائمة القيم الموجودة في ورقة عمل جديدة.
بعدتثبيت الإصدار المجانيمن Kutools لـ Excel، يُرجى اتباع الخطوات التالية:
1. حدد القائمة المطلوبة، ثم انقر علىKUTOOLS PLUS > ورقة العمل > إنشاء ورقة عمل متتابعة. راجع لقطة الشاشة:

2. في مربع الحوار الظاهر، اخترورقة عمل فارغةمن القائمة الموجودة أسفلبناءً على ورقة العمل، وفعّل الخيارالبيانات داخل التحديدالموجود ضمن قسماسم ورقة العمل بناءً على، وتأكد من أن النطاق محدد في مربع النص. راجع لقطة الشاشة:

3. انقر علىموافق (Ok)، ليتم إنشاء ورقة عمل جديدة بأسماء أوراق محددة.

تلميح:إذا كنت ترغب في إنشاء أوراق متعددة بنفس تنسيق ورقة معيّنة، فما عليك سوى تحديد اسم تلك الورقة من قائمةبناءً على ورقة العمل، ثم تحديد أسماء الأوراق التي تريدها في مربع الحوار.

أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في Excel باستخدام Kutools لـ Excel، وعايش الكفاءة كما لم تفعل من قبل.يقدّم Kutools لـ Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية ووقت الحفظ.انقر هنا للحصول على الميزة التي تحتاجها أكثر من غيرها...
يجلب Office Tab واجهة ذات علامات تبويب إلى Office، ويجعل عملك أسهل بكثير
- تمكّن من التحرير والقراءة باستخدام علامات التبويب في Word وExcel وPowerPoint، وPublisher وAccess وVisio وProject.
- افتح وأنشئ مستندات متعددة في علامات تبويب جديدة داخل النافذة نفسها، بدلاً من فتح نوافذ جديدة.
- يزيد إنتاجيتك بنسبة 50% ويوفّر لك مئات نقرات الفأرة كل يوم!
جميع الإضافات من Kutools في برنامج تثبيت واحد!
Kutools for Office حزمةٌ تحتوي على إضافاتٍ مخصصة لتطبيقات Excel وWord وOutlook وPowerPoint، إلى جانب Office Tab Pro، مما يجعلها الخيار المثالي للفِرق التي تعمل عبر تطبيقات Office.
- حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
- برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
- يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
- تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل