انتقل إلى المحتوى الرئيسي

كيفية إنشاء أوراق متعددة بسرعة بنفس التنسيق في Excel؟

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

قم بإنشاء أوراق بنفس التنسيق عن طريق النقل أو النسخ

قم بإنشاء أوراق بنفس التنسيق بواسطة VBA

قم بإنشاء أوراق بنفس التنسيق عن طريق نسخ أوراق عمل متعددة من Kutools for Excel فكرة جيدة 3


قم بإنشاء أوراق بنفس التنسيق عن طريق النقل أو النسخ

في Excel ، يمكنك استخدام أمر النقل أو النسخ لإنشاء ورقة بنفس تنسيق الورقة التي تحددها.

1. انقر على الورقة ذات التنسيق الذي تريده على ملف شريط علامة تبويب الورقة، وانقر بزر الماوس الأيمن للتحديد نقل أو نسخ من قائمة السياق. انظر لقطة الشاشة:

ورقة وثيقة بنفس التنسيق 1

2. ثم في مربع حوار الفرقعة ، تحقق قم بإنشاء نسخة اختيار. انظر لقطة الشاشة:

ورقة وثيقة بنفس التنسيق 2

3. انقر OK. يتم إنشاء ورقة جديدة بنفس التنسيق في مقدمة الورقة المحددة. انظر لقطة الشاشة:

ورقة وثيقة بنفس التنسيق 3

ملاحظات:

(1) يمكنك أيضًا النقر فوق الصفحة الرئيسية > شكل > نقل أو نسخ الورقة لتمكين نقل أو نسخ الحوار.

(2) ستستغرق هذه الطريقة وقتًا طويلاً عندما تحتاج إلى إنشاء مئات الأوراق بنفس التنسيق.


قم بإنشاء أوراق بنفس التنسيق بواسطة VBA

يمكن أن يساعدك رمز VBA في إنشاء أوراق متعددة بسرعة بنفس التنسيق مرة واحدة.

1. صحافة ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، ثم انقر فوق إدراج > وحدة، انسخ والصق الكود أدناه إلى وحدة نافذة.

فبا: إنشاء أوراق بنفس التنسيق.

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 مفتاح لتشغيل رمز فبا ، ثم ينبثق مربع حوار لكتابة اسم ورقة العمل التي تحتاجها لنسخ تنسيقها.

ورقة وثيقة بنفس التنسيق 4

3. انقر OK، وحدد عدد النسخ التي تريدها في مربع حوار يظهر. انظر لقطة الشاشة:

ورقة وثيقة بنفس التنسيق 5

4. انقر OK. ثم هناك ست نسخ من أوراق العمل بنفس التنسيق الذي تم إنشاؤه.


قم بإنشاء أوراق بنفس التنسيق عن طريق نسخ أوراق عمل متعددة من Kutools for Excel

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

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

بعد تركيب مجاني Kutools for Excel ، يرجى القيام بما يلي:

1. انقر كوتولس بلس > ورقة العمل > نسخ أوراق العمل. انظر لقطة الشاشة:

doc انسخ ورقة عمل متعددة 1

2. في ال نسخ أوراق عمل متعددة الحوار ، افعل على النحو التالي:

(شنومكس) حدد اسم ورقة العمل التي تريد نسخ تنسيقها من مربع القائمة انسخ أوراق العمل المحددة;

(2) تحديد عدد النسخ ؛

(3) حدد المكان الذي تريد وضع النسخ فيه.

ورقة وثيقة بنفس التنسيق 7

3. انقر Ok، ينبثق مربع حوار لتذكيرك بأنه تم إنشاء النسخ بنجاح. انقر OK لإغلاقه.

ورقة وثيقة بنفس التنسيق 8

يمكنك الآن رؤية العدد المحدد من الأوراق التي تم إنشاؤها بنفس التنسيق.
doc kutools نسخ أوراق العمل 4

انقر هنا لمعرفة المزيد من التفاصيل حول نسخ أوراق عمل متعددة

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Are you able to add in code to the VBA by automatically changing the sheet name? instead of doing that manually?
This comment was minimized by the moderator on the site
Thank you SO MUCH! I've always created multiple sheets, then copy/paste the data, but that doesn't copy over the "print gridlines" formatting, which I often forget to select. The actual copy/ paste bit doesn't save me that much in actual min:sec, but it saves me so much in aggravation. I love this! I've copied your instructions and will use them every month from now on. Thank you, again!
This comment was minimized by the moderator on the site
I created a file that contains 12 sheets, one for each month. Each month should have the same page format. I finished decorating my page but when I look at each sheet, I realize that only January, March, July, and September were modified. Why did this happen? How do I fix it?
This comment was minimized by the moderator on the site
Which method you use? Both of above methods, you need to format a sheet first, then apply the methods.
This comment was minimized by the moderator on the site
I need multiple copies of the entire WORKBOOK with multiple sheets in each book.
This comment was minimized by the moderator on the site
Directly copy the workbooks and paste them in several copies with different names?
This comment was minimized by the moderator on the site
I NEED TO CREATE TIMESHEETS FOR 25 WORKERS EVERY MONTH USING 1 TIMESHEET FORMAT, HOW DO I CHANGE THE NAMES ONCE SO THAT IT PRINTS ALL 25 TIMSHEETS WITH EACH WORKERS NAME
This comment was minimized by the moderator on the site
You can use Kutools for Excel's Create Sequence Worksheet utility to solve your problem. For more details, you can refer to this site:https://www.extendoffice.com/product/kutools-for-excel/create-sequence-worksheets.html
This comment was minimized by the moderator on the site
I was hoping to do something similar, but wayyy more complicated. Do you have tips?

----
I have to create 79 tabs in excel using a standard template [see below], but that references sequential values in a separate worksheet. We will call the template worksheet "Template" and the worksheet that contains the reference values "Reference". I need help creating a macro to do the following:

1) Copy the template 79 times.


2) Name each new worksheet according to the sequential rows in column F of "Reference" (so the first copy of "Template" would have a name defined in F3 in the "Reference" sheet. the second copy of "Template" would have a name defined by F4, etc. etc. etc).


3) Set the values of cells in the new worksheets (i.e. the copies of "Template") equal to sequential rows in Column A, B, C, D, E of the worksheet "Reference", such that copy 1 of the "Template" references cells A3, B3, C3, D3 and E3; copy 2 of the "Template" references cells A4, B4, C4, D4, E4; etc.
This comment was minimized by the moderator on the site
Firstly, you can use the Split Data utility function of Kutools to split each row or the range to a separate sheet in a new workbook, then copy the column or "reference" which use to name the sheet to one of the sheet in the new workbook, and apply Rename Multiple Worksheet and check From specific range to select the cells you have copied to rename the sheets. Then remove the reference cells.
This comment was minimized by the moderator on the site
I do not why one file is missing after reply~here are the complicated screenshots, 1,3,4,5,6.
This comment was minimized by the moderator on the site
THANK YOU!! I needed 15 copies of a worksheet and it would've taken me ages to do without this. Thanks a million.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations