جدول المحتويات
توفر هذه المقالة إجابات لأسئلتك حول كيفية إضافة ورقة باسم في Excel VBA . إذا كنت تبحث عن مثل هذه الأنواع الفريدة من الحيل ، فقد وصلت إلى المكان الصحيح. هنا ، سنناقش 6 سهل & أمبير ؛ طرق مجربة لإضافة ورقة باسم في Excel VBA .
تنزيل Practice Workbook
يمكنك تنزيل مصنف Excel التالي لفهم نفسك وممارستها بشكل أفضل.
إضافة ورقة مع Name.xlsmكود VBA لإضافة ورقة بالاسم
سنستخدم كائن أوراق لإضافة ورقة في Excel. يبدو الرمز الأساسي VBA لإضافة ورقة تحمل الاسم كما هو موضح أدناه.
Sheets.Add ([Before], [After], [Count], [Type]) قبل: إنه اختياري. يضيف ورقة جديدة قبل ورقة معينة.
بعد: إنها اختيارية أيضًا. يضيف ورقة جديدة بعد ورقة محددة.
العدد: إنها أيضًا معلمة اختيارية. يشير إلى عدد الأوراق المراد إضافتها.
النوع: إنه اختياري أيضًا. تحدد نوع الورقة. هنا ، القيمة الافتراضية هي xlWorksheet .
6 طرق مختلفة لإضافة ورقة بالاسم في Excel VBA
في Excel ، يمكننا إضافة ورقة جديدة مع إضافة ⊕ بجوار اسم الورقة. هل فكرت يومًا في أتمتة نفس المهمة في Excel؟ لا تفكر أكثر ، لأن VBA قد غطيت.
هنا لدينا ورقة عمل باسم تقرير المبيعات . يحتوي على المبيعات اليوميةتقرير عن كافيتريا معينة. في الأعمدة B ، C و D ، توجد أسماء مندوبي المبيعات ، العناصر ، و الكمية على التوالي.
هنا ، سنضيف أوراق أخرى في هذا المصنف بمساعدة ماكرو VBA .
هنا ، استخدمنا إصدار Microsoft Excel 365 ، يمكنك استخدام أي إصدار آخر وفقًا لراحتك.
1. إضافة ورقة بالاسم في Excel VBA
في طريقتنا الأولى ، سنضيف ورقة تحمل الاسم من إدخال المستخدم . إذا كنت مهتمًا بالتعلم ، فاتبع هذه الخطوات البسيطة.
📌 الخطوات:
- في البداية ، انتقل إلى علامة التبويب Developer .
- ثانيًا ، حدد Visual Basic في مجموعة Code .
- بدلاً من ذلك ، اضغط على ALT + F11 للقيام بنفس المهمة.
ملاحظة: تأكد من الضغط المفتاح ALT الموجود على يسار SPACEBAR . لن يتم تنفيذ العملية إذا كنت تستخدم مفاتيح أخرى ALT .
- على الفور ، يتم فتح نافذة Microsoft Visual Basic for Applications .
- لاحقًا ، انتقل إلى علامة التبويب إدراج .
- ثم حدد الوحدة النمطية من الخيارات.
- في الوقت الحاضر ، يفتح الرمز الوحدة النمطية .
- بعد ذلك ، اكتب الكود التالي في الوحدة النمطية .
6216
تفصيل الكود
- أولاً ، نحن ندعو الإجراء الفرعي باسم Add_Sheet_with_Name .
- ثم ، نحدد أنواع المتغيرات.
- لاحقًا ، أضفنا العبارة On Error Resume Next . هذا سوف يتجاهل أي أخطاء.
- بعد ذلك ، استخدمنا InputBox للحصول على اسم الورقة من المستخدم. أيضًا ، قمنا بتخزين السلسلة النصية من InputBox في متغير sheet_name .
- بعد ذلك ، إذا كان sheet_name فارغًا ، فإن الكود لن تستمر.
- أخيرًا ، نحن نستخدم طريقة Add.Name لتسمية الورقة المنشأة حديثًا. هنا ، سيكون الاسم هو نفسه المتغير sheet_name .
- في هذه اللحظة ، اضغط على Run (⏵) أيقونة. بدلاً من ذلك ، يمكنك الضغط على F5 على لوحة المفاتيح.
- فجأة ، يفتح مربع إدخال.
- هنا ، أدخل اسم الورقة الجديدة. في هذه الحالة ، كتبنا ربح في المربع
- لاحقًا ، انقر فوق موافق .
- لذلك ، سيتم تنفيذ الكود الخاص بنا ، وسيضيف ورقة باسم ربح .
ملاحظة: لم نذكر أي مكان لورقتنا. بشكل افتراضي ، يتم وضعه قبل الورقة النشطة.
اقرأ المزيد: Excel VBA لإضافة ورقة إلى مصنف آخر (3 أمثلة مفيدة)
2. تطبيق Excel VBA لإضافة ورقة بالاسم قبل ورقة محددة
في طريقتنا الثانية ، سنضيف ورقة تحمل الاسم قبل ورقة معينة. دعونا نستكشف العملية خطوة بخطوةالخطوة.
📌 الخطوات:
- أولاً ، اعرض الكود نافذة الوحدة كما هو موضح في الطريقة 1 .
- ثانيًا ، اكتب الكود التالي في ذلك.
2553
Code Breakdown
- أولاً ، نقوم باستدعاء الإجراء الفرعي كـ Add_Sheet_Before_Specific_Sheet .
- ثم نقوم بتنشيط ورقة تقرير المبيعات . سيؤدي هذا إلى التأكد من تشغيل الكود إذا كنا على ورقة أخرى.
- بعد ذلك ، نستخدم طريقة Add.Name لتسمية الورقة التي تم إنشاؤها حديثًا. سيتم إنشاء هذه الورقة قبل الورقة المسماة الربح من المصنف. علاوة على ذلك ، قمنا بتسمية الورقة باسم الميزانية العمومية .
- بعد ذلك ، قم بتشغيل الكود كما هو موضح في الطريقة 1 .
- وبالتالي ، ستضيف ورقة جديدة الميزانية العمومية قبل الميزانية المسماة الربح .
اقرأ المزيد: Excel VBA لإضافة ورقة مع اسم متغير (5 أمثلة مثالية)
3. استخدام Excel VBA لإضافة ورقة بالاسم بعد الورقة المحددة
في هذه الطريقة ، سنضيف ورقة بعد الورقة المسماة الربح . دعونا نرى العملية بالتفصيل.
📌 الخطوات:
- في البداية ، قم بإحضار الكود الوحدة النمطية نافذة كما هو موضح في الطريقة الأولى .
- بعد ذلك ، اكتب الكود التالي في ذلك.
8932
هذا الرمز يشبه تقريبًا رمز الطريقة 2 . فقط هنا استخدمنا المعلمة بعد بدلاً من ذلكمن قبل . لأننا نريد إضافة ورقة جديدة بعد ورقة معينة.
- بعد ذلك ، قم بتشغيل الكود كما هو موضح في الطريقة 1 .
- وبالتالي ، ستضيف ورقة جديدة مستودع بعد الورقة المسماة ربح .
قراءة المزيد: Excel VBA لإضافة ورقة إذا لم تكن موجودة (بخطوات سريعة)
4. إدراج ورقة بالاسم في بداية المصنف
في هذا القسم ، سنقوم بإدراج ورقة جديدة في بداية المصنف في Excel باستخدام VBA . لذلك ، دون مزيد من التأخير ، دعنا نرى كيف نفعل ذلك.
📌 الخطوات:
- في البداية ، أظهر الكود نافذة الوحدة كما هو موضح في الطريقة الأولى .
- بعد ذلك ، اكتب الكود التالي في ذلك.
6426
هنا ، نضيف ورقة العمل الجديدة قبل الورقة الأولى من المصنف. هذا يعني في بداية المصنف. نتيجة لذلك ، هذه هي الورقة الأولى الآن. أيضًا ، قمنا بتسمية الورقة ملف تعريف الشركة .
- ثم ، قم بتشغيل الكود كما هو موضح في الطريقة 1 .
- ومن ثم ، ستضيف ورقة جديدة ملف تعريف الشركة في بداية المصنف.
قراءة المزيد: Excel Macro: إنشاء ورقة جديدة وإعادة التسمية (3 أمثلة مثالية)
5. استخدام Excel VBA لإضافة ورقة في نهاية المصنف
في هذا القسم ، سنضيف ورقة بعد الورقة الأخيرة من المصنف . اسمح لي أن أوضح العمليةأدناه.
📌 الخطوات:
- بشكل أساسي ، افتح الكود نافذة الوحدة كما هو موضح في الطريقة الأولى .
- ثانيًا ، الصق الكود التالي في ذلك.
7124
Code Breakdown
- أولاً ، نحن ندعو الإجراء الفرعي باسم Sheet_End_Workbook.
- بعد ذلك ، نستخدم طريقة Add.Name لتسمية الورقة المنشأة حديثًا. سننشئ هذه الورقة بعد الورقة الأخيرة من المصنف. يمكننا الحصول على رقم الورقة الأخير من الخاصية Sheets.Count . علاوة على ذلك ، قمنا بتسمية الورقة بيان الدخل .
- بعد ذلك ، قم بتشغيل الكود كما هو موضح في الطريقة 1 .
- ومن ثم ، ستضيف ورقة جديدة بيان الدخل في نهاية المصنف.
قراءة المزيد: إنشاء مصنف جديد وحفظه باستخدام VBA في Excel
6. تقديم أوراق متعددة باستخدام قيمة الخلية بواسطة Excel VBA
بالنسبة للطريقة الأخيرة ، سنضيف أوراق متعددة في المصنف باسم مجموعة من الخلايا باستخدام Excel VBA . علاوة على ذلك ، سنطلب من المستخدم إدخال النطاق لأخذ الاسم. لذلك ، دعونا نلقي نظرة على الخطوات أدناه.
📌 الخطوات:
- في البداية ، افتح الكود نافذة الوحدة النمطية كما هو موضح في الطريقة الأولى .
- بعد ذلك ، انسخ الكود التالي والصقه في ذلك.
3671
Code Breakdown
- أولاً ، نحن نستدعي Subالإجراء مثل Add_Multiple_Sheets_Using_Cell_Value.
- ثم نحدد أنواع المتغيرات.
- بعد ذلك ، نستخدم InputBox للحصول على نطاق البيانات من المستخدم.
- رابعًا ، نقوم بتنشيط الورقة تقرير المبيعات .
- لاحقًا ، نستخدم لكل حلقة تالية للانتقال عبر نطاق الخلايا المحدد واحدًا تلو الآخر.
- بعد ذلك ، نستخدم طريقة Add.Name لتسمية الورقة المنشأة حديثًا. سننشئ هذه الأوراق بعد الورقة النشطة تقرير المبيعات من المصنف.
- الآن ، قم بتشغيل الكود كما هو موضح في الطريقة 1 .
- على الفور ، يفتح مربع الإدخال Exceldemy .
- ثم ، أعط الخلايا الموجودة في B5: B9 النطاق في المربع.
- أخيرًا ، انقر فوق موافق .
- أخيرًا ، سيتم إدراج خمس أوراق مسماة بعد قيم الخلية في النطاق B5: B9 . كلها بعد الورقة تقرير المبيعات .
الخاتمة
توفر هذه المقالة حلولاً سهلة ومختصرة لإضافة الأوراق بأسماء من Excel VBA . لا تنس تنزيل ملف تدريب . شكرا لقراءة هذا المقال ، نأمل أن يكون هذا مفيدًا. يرجى إعلامنا في قسم التعليقات إذا كان لديك أي استفسارات أو اقتراحات. يرجى زيارة موقعنا على شبكة الإنترنت Exceldemy لاستكشاف المزيد.
