الشهابي قام بنشر فبراير 26, 2012 مشاركة قام بنشر فبراير 26, 2012 السلام عليكم ورحمة الله وبركاته هل توجد معادلة من خلالها يتم وضع اسم الورقة في خلية معينة تلقائيا بحيث لو تغير اسم الورقة يتغير تبعه النص في الخلية حسب اسم الورقة الجديد هذا وجزكم الله خير اخوكم الشهابي رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر فبراير 26, 2012 مشاركة قام بنشر فبراير 26, 2012 السلام عليكم ورحمة الله وبركاته اخي الفاضل الشهابي الدالة CELL مع الوسيطة filename ترجع مسار واسم الملف و اسم الورق ثم بعد ذلك يتم استخدام معادلات اخرى لاستخلاص اسم الورقة جرب المعادلة التالية =REPLACE(CELL("filename";A1);1;FIND("]";CELL("filename";A1));"") او المعادلة =RIGHT(CELL("filename";A1);LEN(CELL("filename";A1))-SEARCH("]";CELL("filename";A1))) في أمان الله رابط هذا التعليق شارك More sharing options...
دغيدى قام بنشر فبراير 26, 2012 مشاركة قام بنشر فبراير 26, 2012 (معدل) =MID(CELL("filename");FIND("]";CELL("filename"))+1;LEN(CELL("filename"))) اثراءً للموضوع لاظهار اسم الورقة فى خلية معينة تم تعديل فبراير 26, 2012 بواسطه دغيدى رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر فبراير 26, 2012 الكاتب مشاركة قام بنشر فبراير 26, 2012 الأستاذيين الكريمين الخالدي ودغيدي جزاكم الله خير على سرعة الرد بارك الله فيكم وزادكم الله علما ورفعة رابط هذا التعليق شارك More sharing options...
دغيدى قام بنشر فبراير 26, 2012 مشاركة قام بنشر فبراير 26, 2012 (معدل) Private Sub Worksheet_SelectionChange(ByVal Target As Range) ActiveSheet.Name = Cells(1, 1) End Sub أخى الفاضل .. يمكن وضع هذا الكود فى حدث الورقة ليعطى نتيجة عكسية بمعنى ان يكون اسم الورقة كما هو مكتوب فى الخلية الأولى A1 تم تعديل فبراير 26, 2012 بواسطه دغيدى رابط هذا التعليق شارك More sharing options...
دغيدى قام بنشر فبراير 27, 2012 مشاركة قام بنشر فبراير 27, 2012 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim i As Integer For i = 1 To Worksheets.Count Sheets(1).Cells(i, 1).Value = Worksheets(i).Name Next i End Sub يمكن وضع هذا الكود لإدراج اسماء جميع الأوراق رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.