كيفية نسخ الورقة وإعادة تسميتها بناءً على قيمة الخلية في إكسيل؟
عادة ، يمكنك تطبيق نقل أو نسخ ميزة لنسخ ورقة عمل ، ثم اكتب اسمًا جديدًا للنسخة يدويًا حسب حاجتك. ولكن ، هل سبق لك أن حاولت إعادة تسمية الورقة بناءً على قيمة الخلية بعد نسخ ورقة العمل؟ في هذه المقالة ، سأتحدث عن كيفية إعادة تسمية ورقة العمل بناءً على قيمة الخلية تلقائيًا عند إنشاء نسخة.
انسخ ورقة عمل وأعد تسميتها بناءً على قيمة الخلية برمز VBA
انسخ ورقة عمل عدة مرات وأعد تسميتها بناءً على قيم الخلية باستخدام Kutools for Excel
انسخ ورقة عمل وأعد تسميتها بناءً على قيمة الخلية برمز VBA
يمكن أن يساعدك رمز VBA التالي على نسخ ورقة عمل وإعادة تسميتها بقيمة خلية محددة تلقائيًا ، يرجى القيام بذلك على النحو التالي:
1. قم بتنشيط ورقة العمل التي تريد نسخها ، ثم اضغط باستمرار على ملف ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.
كود فبا: انسخ ورقة عمل وأعد تسميتها بقيمة خلية:
Sub Copyrenameworksheet()
'Updateby Extendoffice
Dim ws As Worksheet
Set wh = Worksheets(ActiveSheet.Name)
ActiveSheet.Copy After:=Worksheets(Sheets.Count)
If wh.Range("A1").Value <> "" Then
ActiveSheet.Name = wh.Range("A1").Value
End If
wh.Activate
End Sub
3. ثم اضغط F5 المفتاح لتشغيل هذا الرمز ، وتم نسخ ورقة العمل الحالية في المصنف الحالي بعد كل أوراق العمل ، وتمت إعادة تسميتها بقيمة الخلية التي حددتها ، انظر لقطة الشاشة:
ملاحظات: في الكود أعلاه ، مرجع الخلية A1 هي قيمة الخلية التي تريد إعادة تسميتها للورقة المنسوخة الجديدة ، يمكنك تغييرها حسب حاجتك.
انسخ ورقة عمل عدة مرات وأعد تسميتها بناءً على قيم الخلية باستخدام Kutools for Excel
لا يمكن إعادة تسمية الكود أعلاه إلا بقيمة خلية واحدة ، إذا كنت بحاجة إلى نسخ الورقة عدة مرات وإعادة تسميتها بناءً على قائمة قيم الخلية ، كوتولس ل إكسيلالصورة قم بإنشاء ورقة عمل التسلسل قد تساعدك على إنهاء هذه المهمة بأسرع ما يمكن.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. انقر كوتولس بلس > ورقة العمل > إنشاء أوراق عمل التسلسل، انظر لقطة الشاشة:
2. في قم بإنشاء ورقة عمل التسلسل في مربع الحوار ، قم بالعمليات التالية:
(1.) حدد اسم ورقة العمل التي تريد نسخها من ملف ورقة العمل الأساسية قائمة منسدلة؛
(2.) حدد خيار البيانات في النطاق ضمن تستند أسماء الأوراق على ، ثم انقر لتحديد قيم الخلايا التي تريد إعادة تسمية أوراق العمل المنسوخة بناءً عليها.
3. ثم اضغط Ok زر ، وتم نسخ ورقة العمل المحددة عدة مرات وإعادة تسميتها بقيم الخلية التي حددتها في مصنف جديد ، انظر لقطة الشاشة:
قم بتنزيل Kutools for Excel والإصدار التجريبي المجاني الآن!
عرض توضيحي: انسخ ورقة عمل عدة مرات وأعد تسميتها بناءً على قيم الخلية باستخدام Kutools for Excel
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!