أريد طريقة عند ادخال رقم الهوية الوطنية، يتم إظهار الشيت المخفي المسمى برقم الهوية.

[القول المأثور]

السلام عليكم أخواني

ارجوا التكرم إفادتي بطريقة، لدي بيانات وأريدها تكون محمية وأوراق العمل مخفية، بحيث يتم ادخال رقم الهوية الوطنية، واظهار الشيت المسمى برقم الهوية الوطنية، مع العلم بأن عدد أوراق العمل قد تزيد عن 100  إلى 200 ورقة. مرفق ملف الاكسل للتوضيح أكثر.  مع الشكر الجزيل.

طالما ان طلبك لا يمكن تنفيذه الا بالأكواد .. فكان عليك لزاماً رفع الملف بإمتداد يقبل إضافة الأكواد XLSM ..تــم إعادة رفع الملف بهذا الإمتداد

data.xlsm

[ابراهيم الحداد]

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

ضع هذا الكود فى حدث الورقة data

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$3" Then Exit Sub
Sheets(Target.Text).Activate
End Sub

 

[محمد هشام.]

 

أخي ضع الكود في حدث شيت data

تم تعديل أكتوبر 17, 2022 بواسطه Mohamed Hicham

[القول المأثور]

جزاكم الله خيراً، نتعلم منكم، ووضحت الفكرة الآن ويعم الكود حسب المطلوب ..جزيل الشكر للأخوان إبراهيم الحداد ، ومحمد هشام على التوضيح