كيفية إضافة ورقة عمل جديدة باسم محدد في Excel؟

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

إضافة تلقائية لورقة عمل جديدة باسم محدد في المصنف الحالي باستخدام كود VBA
إضافة تلقائية لورقة عمل جديدة باسم محدد في مصنف جديد باستخدام Kutools لـ Excel

إضافة تلقائية لورقة عمل جديدة باسم محدد في المصنف الحالي باستخدام كود VBA

يمكنك إضافة ورقة عمل جديدة باسم معين في نهاية المصنف الحالي باستخدام كود VBA التالي.

1. اضغط على مفتاحي Alt + F11 معًا لفتح نافذة Microsoft Visual Basic for Applications.

2. في نافذة Microsoft Visual Basic for Applications، انقر فوق إدراج > وحدة.

3. انسخ والصق كود VBA أدناه في نافذة الوحدة.

كود VBA: إضافة ورقة عمل جديدة باسم محدد في نهاية المصنف الحالي

Sub CreateSheet()
'Updated by ExtendOffice 20181009
    Dim xName As String
    Dim xSht As Object
    On Error Resume Next
    xName = InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
    If xName = "" Then Exit Sub
        Set xSht = Sheets(xName)
        If Not xSht Is Nothing Then
            MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
            Exit Sub
            End If
            Sheets.Add(, Sheets(Sheets.count)).Name = xName
        End Sub

4. اضغط على مفتاح F5 لتشغيل الكود. في مربع الحوار المنبثق Kutools لـ Excel، يرجى إدخال اسم لهذه الورقة، ثم انقر فوق زر موافق. انظر لقطة الشاشة:

ثم يتم إنشاء ورقة عمل جديدة باسم محدد وتوضع في نهاية المصنف الحالي.

إضافة تلقائية لورقة عمل جديدة باسم محدد في مصنف جديد باستخدام Kutools لـ Excel

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

1. لإضافة ورقة عمل جديدة باسم محدد، تحتاج إلى كتابة هذا الاسم في خلية مسبقًا. وبعد ذلك انقر فوق Kutools Plus > ورقة العمل > إنشاء أوراق عمل متتابعة.

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

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

ملاحظات: