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

كيفية إدراج أسماء الأوراق بسرعة في الخلايا في إكسيل؟

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

أدخل اسم الورقة الحالية بسرعة في خلية بها وظائف

أدخل جميع أسماء الأوراق بسرعة في الخلايا باستخدام VBA

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

أدخل جميع أسماء الأوراق بسرعة مع ارتباطات تشعبية في الخلايا كفهرس فكرة جيدة 3


السهم الأزرق الحق فقاعة أدخل اسم الورقة الحالية بسرعة في خلية بها وظائف

فقط أدخل صيغة = RIGHT (CELL ("filename"، D2)، LEN (CELL ("filename"، D2)) - FIND ("]"، CELL ("filename"، D2))) في أي خلية واضغط أدخل المفتاح ، فإنه يعرض اسم ورقة العمل الحالية في الخلية.
doc-insert-sheet-name-in-cell1

هذه الصيغة قادرة فقط على إظهار اسم ورقة العمل الحالية ، وليس اسم ورقة العمل الأخرى.


السهم الأزرق الحق فقاعة أدخل جميع أسماء الأوراق بسرعة في الخلايا باستخدام VBA

إذا كنت تريد إدراج كافة أسماء الأوراق في الخلايا ، فإن ماكرو VBA يعد اختيارًا جيدًا.

الخطوة شنومكس: اضغط باستمرار قديم + F11 في Excel ، ويفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

الخطوة شنومك: انقر إدراج > وحدة، ولصق الماكرو التالي في نافذة الوحدة النمطية.

VBA لإدراج جميع أسماء أوراق العمل في الخلايا:

الأسماء الفرعية للورق ()
الأعمدة (1)
بالنسبة إلى i = 1 إلى الأوراق
الخلايا (i ، 1) = Sheets (i). Name
أنا القادم
نهاية الفرعية

الخطوة شنومك: اضغط على F5 مفتاح لتشغيل هذا الماكرو. بعد ذلك ، سيتم سرد جميع أسماء أوراق العمل في العمود A من ورقة العمل الحالية. انظر لقطة الشاشة:
doc-insert-sheet-name-in-cell2

ملاحظات: في رمز VBA ، يمكنك تغيير الخلايا (ط ، 1) إلى مرجع آخر لإدراج أسماء الأوراق تبدأ من الخلايا الأخرى. على سبيل المثال ، أدخل أسماء الأوراق تبدأ من C3 ، وقم بتغييرها إلى الخلايا (i + 2، 3).


السهم الأزرق الحق فقاعة أدخل اسم الورقة النشطة بسرعة باستخدام Kutools for Excel

إذا كنت ترغب في إدراج معلومات الورقة النشطة بما في ذلك اسم الورقة واسم المصنف ومسار الملف وما إلى ذلك في خلية أو رأس / تذييل ، فيمكنك استخدام كوتولس ل إكسيلالصورة أدخل معلومات المصنف.

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

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

1. حدد خلية أو نطاقًا لوضع اسم الورقة ، وانقر كوتولس بلس > مصنف > أدخل معلومات المصنف.إدراج معلومات ورقة العمل 1

2. ثم حدد معلومات المصنف التي تريد إدراجها من معلومات ، وحدد الموقع الذي تريد وضع المعلومات منه أدخل في الجزء. ثم اضغط OK.

دوك شنومك

يمكنك النقر هنا لمعرفة المزيد حول إدراج معلومات المصنف.

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


السهم الأزرق الحق فقاعة أدخل جميع أسماء الأوراق بسرعة مع ارتباطات تشعبية في الخلايا كفهرس

كوتولس ل إكسيل's قم بإنشاء قائمة بأسماء الورقة لا تقوم الأداة المساعدة بإدراج جميع أسماء الأوراق في الخلايا فحسب ، بل تقوم أيضًا بإدراج الارتباطات التشعبية للأوراق المقابلة أيضًا.

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

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

الخطوة شنومك: انقر فوق كوتولس بلس > ورقة العمل > قم بإنشاء قائمة بأسماء الأوراق.
doc-insert-sheet-name-in-cell3

الخطوة 2: في ملف قم بإنشاء قائمة بأسماء الأوراق مربع الحوار ، حدد الإعدادات وفقًا لاحتياجاتك ، وانقر فوق OK.
doc-insert-sheet-name-in-cell4

ثم سترى جميع أسماء الأوراق مدرجة في ورقة عمل جديدة ، وكل اسم ورقة يرتبط بورقة العمل المقابلة. انظر لقطات الشاشة التالية:

أسماء أوراق العمل ذات الارتباطات التشعبية
أسماء أوراق العمل مع أزرار الماكرو
doc-insert-sheet-name-in-cell5
doc-insert-sheet-name-in-cell6

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

السهم الأزرق الحق فقاعة سرد كافة أسماء الأوراق مع الارتباطات التشعبية



Kutools for Excel: 300 + وظائف يجب أن تكون لديك في Excel ، نسخة تجريبية مجانية لمدة 30 يومًا من هنا

ادمج بسهولة أوراق / مصنف متعدد في ورقة واحدة أو مصنف واحد

قد يكون دمج الأوراق المتعددة أو المصنفات في ورقة واحدة أو مصنف واحد أمرًا صعبًا في Excel ، ولكن مع ملحق دمج في Kutools for Excel ، يمكنك دمج عشرات الأوراق / المصنفات في ورقة واحدة أو مصنف واحد ، كما يمكنك دمج الأوراق في واحدة بعدة نقرات فقط.  انقر للحصول على نسخة تجريبية مجانية كاملة المواصفات لمدة 30 يومًا!
الجمع بين الأوراق
 
Kutools for Excel: مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30

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

🤖 مساعد 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 (32)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to find the sheet name (section name ) when you type employee no. in a cell? A workbook has 15 sheets named as per sections of the department.In each section has 100 employees in range A2:A101with unique employee no. I have a list of 50 employee nos in different sections. In a new work sheet how to find the section name which corresponds to the employee no.
This comment was minimized by the moderator on the site
Hello, Ashley Pereira, please visit this: https://www.extendoffice.com/documents/excel/5335-excel-vlookup-return-sheet-name.html this article may help you.
This comment was minimized by the moderator on the site
How do you get this formula to copy the tabnames into consecutive columns. In other words not vertically but horizontally.
This comment was minimized by the moderator on the site
Change the following:

Cells(i, 1) = Sheets(i).Name
to
Cells(1, i) = Sheets(i).Name

This causes to step columns in same row.
This comment was minimized by the moderator on the site
you can copy the data entered, then paste Transpose, this converts Cols to Rows, and Rows to Cols.
This comment was minimized by the moderator on the site
Just tried now the macro for inserting all the sheet's name in one sheet. Awesome! Thank you very much
This comment was minimized by the moderator on the site
How do you get the VBA to start in a specific cell instead of A1?
This comment was minimized by the moderator on the site
Just add to i like I did below. If you add to i you can start on any row you would like.

Sub GetNames()

For i = 1 To Sheets.Count

Cells(i + 6, 1) = Sheets(i).Name

Next i
End Sub
This comment was minimized by the moderator on the site
Thank u for your supplement.
This comment was minimized by the moderator on the site
You can change the number in Cells(i, 1) = Sheets(i).Name to other to insert the sheet names in other column, for instance, insert start from C1,change Cells(i, 1) = Sheets(i) to Cells(i, 3) = Sheets(i), but this VBA only can insert the sheet names start from the row 1.
This comment was minimized by the moderator on the site
Thanks!! this was was a great help.
This comment was minimized by the moderator on the site
Hi Kindly i want VBA code to insert file name in specific cell. Thanks
This comment was minimized by the moderator on the site
Great site was very helpful. I have different tab names and I get the names in one sheet using your code, but it gives names of all the tab names, is there anyway we can add code to select from certain tab number or something like that.
This comment was minimized by the moderator on the site
I have multiple project sheets database with different tab name and this name is shown in master sheet table. which formula can i give that when i insert new tab it should automatically updated in master table.
This comment was minimized by the moderator on the site
Can anyone help me with this: Create a macro that creates 10 sheets and name them Sheet1 to Sheet10 but using a loop
This comment was minimized by the moderator on the site
Hello, Can you please help me with the simple VBA code. I have a list of Names in Column A. Specific Range - (A2:A251) - Now I need to create new spreadsheets with these names. The names are driven from a different sheet, thus they keep changing. So in short, if I have 10 names today, they might not appear tomorrow. So on the click of button all older spreadsheets (except 1) should be deleted first and then from the names on the column, new ones should get created. Please advice if this is possible to do? Thanks, Manish Gupta
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations