كيفية نسخ الورقة وإعادة تسميتها بناءً على قيمة الخلية في إكسيل؟
عادة ، يمكنك تطبيق نقل أو نسخ ميزة لنسخ ورقة عمل ، ثم اكتب اسمًا جديدًا للنسخة يدويًا حسب حاجتك. ولكن ، هل سبق لك أن حاولت إعادة تسمية الورقة بناءً على قيمة الخلية بعد نسخ ورقة العمل؟ في هذه المقالة ، سأتحدث عن كيفية إعادة تسمية ورقة العمل بناءً على قيمة الخلية تلقائيًا عند إنشاء نسخة.
انسخ ورقة عمل وأعد تسميتها بناءً على قيمة الخلية برمز 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
أفضل أدوات إنتاجية المكتب
Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪
- إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
- سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
- دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
- حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
- نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
- استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
- سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
- اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
- أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
