طرق بسيطة لإعادة تسمية ورقة في Excel

في Microsoft Excel، يمكن أن يساعدك إعادة تسمية ورقة العمل في تنظيم بياناتك وتحديد هويتها بشكل أكثر فعالية. ستقودك هذه الدورة التعليمية عبر طرق مختلفة لإعادة تسمية ورقة عمل واحدة أو إعادة تسمية عدة أوراق عمل في وقت واحد، كما ستزودك بالقواعد الأساسية لتسمية أوراق العمل في Excel.

إعادة تسمية ورقة عمل النقر المزدوج على تبويب الورقة النقر بزر الماوس الأيمن على تبويب الورقة استخدام اختصار لوحة المفاتيح إعادة تسمية أوراق متعددة إعادة تسمية دفعة قابلة للتخصيص لأوراق محددة/جميع الأوراق طريقة VBA لإعادة تسمية جميع الأوراق قواعد تسمية أوراق العمل في Excel

فيديو: إعادة تسمية الأوراق في Excel

إعادة تسمية ورقة عمل في Excel

هناك ثلاث طرق سهلة لإعادة تسمية ورقة في Excel. لنستعرض كل واحدة من هذه الطرق.

إعادة تسمية ورقة عمل بالنقر المزدوج على تبويب الورقة

1. انقر نقرًا مزدوجًا على تبويب ورقة العمل التي تريد إعادة تسميتها لتفعيل وضع تعديل الاسم.
2. أدخل الاسم المطلوب للورقة واضغط على Enter.

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

1. انقر بزر الماوس الأيمن على تبويب ورقة العمل التي تريد إعادة تسميتها.
2. من القائمة المنسدلة التي تظهر، حدد إعادة التسمية لتفعيل وضع تعديل الاسم.
3. اكتب الاسم الجديد واضغط على Enter.
4. 

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

1. حدد تبويب ورقة العمل الذي تريد إعادة تسميته.
2. اضغط على Alt + H + O + R بالتتابع لتفعيل وضع تعديل الاسم.
3. اكتب الاسم الجديد واضغط على Enter.

إعادة تسمية أوراق متعددة في Excel

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

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

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

بعد تثبيت Kutools لـ Excel، انتقل إلى علامة التبويب Kutools Plus، وحدد Worksheet > Rename Worksheets. في مربع الحوار الذي يظهر، اتبع الخطوات التالية:

1. حدد الأوراق التي ترغب في إعادة تسميتها.
2. اختر خيارات إعادة التسمية المرغوبة.
3. حدد مصدر الاسم. إذا اخترت الخيار من مربع الإدخال، يجب عليك إدخال قيمة في مربع الإدخال.
4. 

النتيجة

تمت إعادة تسمية الأوراق المحددة بناءً على خيارات إعادة التسمية التي اخترتها.

إعادة تسمية جميع الأوراق باستخدام VBA (معقد)

في هذا القسم، سنقدم رمزين VBA: أحدهما لإضافة بادئة/لاحقة إلى جميع أسماء الأوراق، والآخر لإعادة تسمية جميع الأوراق بناءً على قيمة خلية محددة في كل ورقة.

الخطوة 1: إنشاء وحدة جديدة

1. اضغط على Alt + F11 لفتح محرر Visual Basic for Applications (VBA).
2. انقر فوق Insert > Module لإنشاء وحدة جديدة.
3. 

الخطوة 2: نسخ رمز VBA إلى نافذة الوحدة

انسخ أحد رموز VBA أدناه والصقه في نافذة الوحدة المفتوحة وفقًا لاحتياجاتك.

• رمز VBA 1: إضافة بادئة/لاحقة إلى جميع أسماء الأوراق

• Sub renameSheetsWithPrefixSuffix()
  'Update by ExtendOffice
      Dim xWs As Worksheet
      Dim xPrefix As String
      Dim xSuffix As String
      xPrefix = "MyPre_" 'Replace "MyPre_" with your desired prefix.
      xSuffix = "_MySuf" 'Replace "_MySuf" with your desired suffix.
      On Error Resume Next
      For Each xWs In Worksheets
          xWs.Name = xPrefix & xWs.Name & xSuffix 'This snippet adds both prefix and suffix to sheet names. Adjust as needed.
      Next xWs
  End Sub

• ملاحظة:

  • في هذا الرمز، لإضافة بادئة ولاحقة إلى جميع أسماء الأوراق، يجب استبدال "MyPre_" و"_MySuf" في السطور السادسة والسابعة بالبادئة واللاحقة المطلوبة على التوالي.
  • لإضافة بادئة فقط، قم بتعديل السطر العاشر من الكود ليكون xWs.Name = xPrefix & xWs.Name.
  • لإضافة لاحقة فقط، قم بتعديل السطر العاشر من الكود ليكون xWs.Name = xWs.Name & xSuffix.
• رمز VBA 2: إعادة تسمية جميع الأوراق بناءً على قيمة خلية محددة في كل ورقة

• Sub renameSheetsBasedOnCellValue()
  'Update by ExtendOffice
      Dim xWs As Worksheet
      Dim xRgAddress As String
      xRgAddress = "A1" 'Replace "A1" with your target cell address.
      On Error Resume Next
      For Each xWs In Worksheets
          xWs.Name = xWs.Range(xRgAddress).Value
      Next xWs
  End Sub

• ملاحظة: في هذا الرمز VBA، تذكر تغيير "A1" في السطر الخامس إلى عنوان الخلية الفعلي الذي يحتوي على الاسم الجديد لكل ورقة عمل. أيضًا، تأكد من أن الخلية المحددة (في هذه الحالة A1) في كل ورقة تحتوي على قيمة. وإلا، فإن تشغيل هذا الرمز VBA سيؤدي إلى خطأ تشغيلي '1004'.

الخطوة 3: تشغيل رمز VBA

في الوحدة النافذة، اضغط F5 أو انقر فوق الزر لتنفيذ الكود الملصق.

النتيجة

• نتيجة رمز VBA 1: تم إضافة “Pre_” و“_Suf” كبادئة ولاحقة على التوالي لجميع أسماء الأوراق.
• 
• نتيجة رمز VBA 2: تم إعادة تسمية جميع الأوراق بناءً على القيمة في الخلية A1 في كل ورقة، وهي “Test1” و“Test2” و“Test3” على التوالي.
• 

قواعد تسمية أوراق العمل في Excel

عند إعادة تسمية أوراق العمل الخاصة بك، هناك بعض القواعد التي تحتاج إلى اتباعها:

• يجب أن تكون أسماء أوراق العمل فريدة داخل المصنف.
• يجب ألا يتجاوز اسم ورقة العمل 31 حرفًا.
• يجب ألا يكون اسم ورقة العمل فارغًا.
• يجب ألا يحتوي اسم ورقة العمل على الأحرف: \ / ? : * [ ].
• يجب ألا يبدأ أو ينتهي اسم ورقة العمل بعلامة اقتباس ('), على الرغم من أنه يمكن استخدامها في منتصف الاسم.
• يجب ألا يكون اسم ورقة العمل History لأنه محجوز للاستخدام الداخلي بواسطة Excel.

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

مقالات ذات صلة

• كيفية نسخ ورقة وإعادة تسميتها تلقائيًا في Excel؟
• في Excel، كيف يمكنك نسخ ورقة عمل وإعادة تسميتها تلقائيًا دون كتابة الاسم كالمعتاد؟ في هذه المقالة، سأتحدث عن كيفية نسخ ورقة واحدة أو عدة مرات ومنحها أسماء محددة مرة واحدة.