(تمت الاجابة) ارتباط تشعبي بين خلية غير ثابتة القيمة مع خلية مساوية لها في القيمة

[ابو تميم]

أسعد الله أوقاتكم

لدي سؤال في الاكسل

عندي في المرفقات ملف اكسل يحتوي على جدول فيه بيانات ويحتوي هذا الجدول على عمود اسمه رقم التسلسل

المطلوب في هذا الملف هو عندما أضع في المربع الأحمر المبين في الملف رقم معين وأقوم بالضغط على عبارة ( اضغط هنا للذهاب الى رقم التسلسل المطلوب ) يقوم مباشرة بتحديد الخلية التي تساوي رقم التسلسل الذي أدخلته في المربع الأحمر

ومثالنا هنا على اعتبار أني كتبت في المربع الأحمر رقم 4 وبعد الضغط على عبارة اضغط هنا ينتقل بي التحديد إلى الخلية رقم 4 في رقم التسلسل

ارتباط تشعبي بين خلية غير ثابته مع خلية مساوية لها في القيمة.rar

[عبدالله المجرب]

ضع هذا الكود في حدث الصفحة

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, [D3]) Is Nothing Then

For Each cl In [A5:A24]

If cl.Value = Target Then cl.Select

Next

End If

End Sub

[ابو تميم]

جزاك الله خيرا أخي اا عبدالله المجرب اا

نجحت الطريقة وتمت الاجابة على السؤال

انتهى السؤال

شكرا أخي عبد الله المجرب

أتم الله عليك وافر الصحة والعافية

تم تعديل فبراير 11, 2012 بواسطه saad.abu

[الخالدي]

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

بارك الله بالأخ الفاضل عبدالله المجرب

لإثراء الموضوع - حل باستخدام المعادلات

ادخل المعادلة في الخلية A3

=HYPERLINK("#"&CELL("address";INDEX(A6:A24;MATCH(D3;A6:A24;0)));"اضغط هنا للذهاب إلى التسلسل المطلوب")

في أمان الله

ارتباط تشعبي بين خلية غير ثابته مع خلية مساوية لها في القيمة.rar

[الشهابي]

ماشاء الله عليك ألأستاذ الخالدي

حل بالمعادلات روعة