اظهار اسم الشيت فى خلية

[kinguter1]

اساتذة اكسيل

السلام عليكم ورحمة الله وبركاته

ارجو كتاية دالة فى الخلية A1 فى كل شيت تقوم بكتاية اسم الشيت فى هذة الخلية

 

Book1.rar

[عبدالله باقشير]

السلام عليكم

 

جرب هذه

=MID(CELL("filename");SEARCH("]";CELL("filename"))+1;225)

تحياتي

[ياسر خليل أبو البراء]

جزيت خيرا أستاذنا الكبير عبد الله

إثراء للموضوع هذا ملف به حلين : الأول المعادلة التي تفضل بها أستاذنا الكبير ، والثانية بها دالة معمولة في الفيجوال بيسك أي دالة معرفة

Show Sheet Name In Cell.rar

[إبراهيم ابوليله]

السلام عليكم ورحمة الله وبركاته

استاذنا الكبير عبدالله باقشير

اخى ياسر

اسمحو لى بالمشاركه بكود يوضع فى حدث الورقه

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A4") = ActiveSheet.Name
End Sub

كما يمكن استخدام الكود الاتى ايضا

Private Sub Worksheet_Activate()
Range("A4") = ActiveSheet.Name
End Sub

تقبلو تحياتى

[kinguter1]

الاساتذة الأفاضل

اشكركم على الاهتمام والكرم 

جعله الله فى ميزان حيسناتكم

[ماجدجلال]

شكرا لك استاذ عبدالله

كود جميل جدا  و فعال 

بالتوفيق للجميع

[۩◊۩ أبو حنين ۩◊۩]

جزاكم الله كل الخير