كيفية إنشاء أوراق متعددة بنفس التنسيق بسرعة في Excel؟
إذا كنت قد قمت بإنشاء ورقة في Excel بتنسيق معين وتحتاج إلى تكرار هذا التنسيق عبر عدة أوراق، فقد تتساءل عن كيفية القيام بذلك بسرعة. ستقودك هذه التعليمات من خلال عدة طرق لإنشاء أوراق متعددة بنفس التنسيق بكفاءة.
إنشاء أوراق عمل بنفس التنسيق باستخدام نقل أو نسخ
إنشاء أوراق عمل بنفس التنسيق باستخدام VBA
إنشاء أوراق عمل بنفس التنسيق باستخدام Kutools لـ Excel
إنشاء أوراق عمل بنفس التنسيق باستخدام نقل أو نسخ
في Excel، يمكنك استخدام أمر النقل أو النسخ لإنشاء ورقة بنفس تنسيق الورقة التي حددتها.
1. انقر على الورقة التي تحتوي على التنسيق الذي تحتاجه في "شريط علامات الأوراق"، ثم انقر بزر الماوس الأيمن واختر "نقل أو نسخ" من قائمة السياق. شاهد لقطة الشاشة:
2. بعد ذلك، في مربع الحوار المنبثق، اختر خيار "إنشاء نسخة". شاهد لقطة الشاشة:
3. انقر "موافق". ستُنشأ ورقة جديدة بنفس التنسيق أمام الورقة المحددة. شاهد لقطة الشاشة:
ملاحظة:
(1) يمكنك أيضًا النقر على "الرئيسية" > "تنسيق" > "نقل أو نسخ الورقة" لتمكين مربع الحوار "نقل أو نسخ".
(2) قد يستغرق هذا الأسلوب وقتًا طويلًا عند الحاجة إلى إنشاء مئات الأوراق بنفس التنسيق.
إنشاء أوراق عمل بنفس التنسيق باستخدام VBA
يوجد كود VBA يمكن أن يساعدك في إنشاء أوراق عمل متعددة بنفس التنسيق دفعة واحدة وبسرعة.
1. اضغط على مفتاحي "Alt" + "F11" لفتح نافذة "Microsoft Visual Basic for Applications"، ثم انقر على "إدراج" > "وحدة"، وقم بنسخ ولصق الكود أدناه في نافذة "الوحدة".
VBA: إنشاء أوراق عمل بنفس التنسيق.
Sub CopyWorkSheets()
'Updateby20150526
Dim xNumber As Integer
Dim xWsName As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
xWsName = Application.InputBox("Copy worksheet name", xTitleId, , Type:=2)
xNumber = Application.InputBox("Copy number", xTitleId, , Type:=1)
For i = 1 To xNumber
Application.ActiveWorkbook.Sheets(xWsName).Copy _
After:=Application.ActiveWorkbook.Sheets(xWsName)
Next
End Sub
2. اضغط على مفتاح "F5" لتشغيل كود VBA، ثم سيظهر مربع حوار ينبثق ليسألك عن اسم الورقة التي تريد نسخ تنسيقها.
3. انقر "موافق"، وحدد عدد النسخ التي تحتاجها في مربع الحوار المنبثق الآخر. شاهد لقطة الشاشة:
4. انقر "موافق". بعد ذلك، سيتم إنشاء ست نسخ من الأوراق بنفس التنسيق.
إنشاء أوراق عمل بنفس التنسيق باستخدام Kutools لـ Excel
إذا كنت لا تحب استخدام VBA، هنا أقدم لك أداة عملية – "Kutools لـ Excel"، يمكنك استخدام أداة "نسخ أوراق العمل" الخاصة بها لإنشاء أوراق بنفس التنسيق بسرعة وسهولة.
1. انقر على "Kutools Plus" > "ورقة العمل" > "نسخ أوراق العمل". شاهد لقطة الشاشة:
2. في مربع الحوار "نسخ أوراق عمل متعددة"، قم بما يلي:
(1) حدد اسم الورقة التي تريد نسخ تنسيقها من مربع القائمة الخاص بـ "نسخ الأوراق المحددة"؛
(2) حدد عدد النسخ؛
(3) حدد المكان الذي تريد وضع النسخ فيه.
3. انقر "موافق"، سيظهر مربع حوار ينبثق ليخبرك بأن النسخ تم إنشاؤها بنجاح. انقر "موافق" لإغلاقه.
الآن يمكنك رؤية العدد المحدد من أوراق العمل قد تم إنشاؤها بنفس التنسيق.
انقر هنا لمعرفة المزيد من التفاصيل حول نسخ أوراق عمل متعددة.
Kutools لـ Excel - قم بتعزيز Excel بأكثر من 300 أدوات أساسية. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! احصل عليه الآن
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!