***

مارأي اخي الكريم في هذه المشاركة التي يوكد انها من واقع بطاقته

الله يسامحك ويرزقك ب....
المفروض انك تكتبها هذا العدد الكثير

جزاكم الله خيرا وبارك فيكم

كود الغربية 16 وكفر الشيخ 15

جزاك الله كل خير
محافظتي موجود كودها وليس بها اختلاف

محافظة سوهاج26

معلومات مفيدة شكرا لك
كفرالشيخ 15

الاخ ساركوز

اليكم ملف نفذته ينفع ش الطلبة ويسهل العمل وانا جمعت فيه كل ما يلزم ش الطلبة لعمل سجل للطالب

معلومات ممتازة
مشكور ياغالى

انا اعلم انك كنز للمنتدى يا باشمهندس منير
شكرا لملفك الرائع

المنوفية (17)

بارك الله فيك

دمياط ( 11 )

كود الأسكندرية
 

كود محافظة الأسكندرية ( 02 )
شكرا لمجهودك أخى الفاضل

Function Governorate(strID As Variant) As String
If Len(strID) = 14 Then
Select Case Mid(strID, 8, 2)
Case "01": Governorate = "القاهرة"
Case "02": Governorate = "الإسكندرية"
Case "03": Governorate = ""
Case "04": Governorate = ""
Case "05": Governorate = ""
Case "06": Governorate = ""
Case "07": Governorate = ""
Case "08": Governorate = ""
Case "09": Governorate = ""
Case "10": Governorate = ""
Case "11": Governorate = ""
Case "12": Governorate = "الدقهلية"
Case "13": Governorate = "الشرقية"
Case "14": Governorate = "القليوبية"
Case "15": Governorate = "كفرالشيخ"
Case "16": Governorate = "الغربية"
Case "17": Governorate = "المنوفية"
Case "18": Governorate = "البحيرة"
Case "19": Governorate = "الإسماعيلية"
Case "20": Governorate = ""
Case "21": Governorate = "الجيزة"
Case "22": Governorate = "بنى سويف"
Case "23": Governorate = "الفيوم"
Case "24": Governorate = "المنيا"
Case "25": Governorate = "أسيوط"
Case "26": Governorate = "سوهاج"
Case "27": Governorate = "قنا"
Case "28": Governorate = "أسوان"
Case "29": Governorate = "الأقصر"
Case "30": Governorate = ""
Case "31": Governorate = ""
Case "32": Governorate = ""
Case "33": Governorate = "مطروح"
Case "34": Governorate = "شمال سيناء "
Case "35": Governorate = ""
Case "36": Governorate = ""
Case "37": Governorate = ""
Case "38": Governorate = ""
Case "39": Governorate = ""
Case "40": Governorate = ""
Case "41": Governorate = ""
Case "42": Governorate = ""
Case "43": Governorate = ""
Case "44": Governorate = ""
Case "45": Governorate = ""
Case "46": Governorate = ""
Case "47": Governorate = ""
Case "48": Governorate = ""
Case "49": Governorate = ""
Case "50": Governorate = ""
Case "51": Governorate = ""
Case "52": Governorate = ""
Case "53": Governorate = ""
Case "54": Governorate = ""
Case "55": Governorate = ""
Case "56": Governorate = ""
Case Else: Governorate = ""
End Select
End If
End Function

موضوع رائع جدا و جهد مشكور

بارك الله فيكم

أود فقط ان الفت نظركم لشئ هام

هو ان كود المحافظة للرقم القومى هو لمحافظة محل الميلاد و ليس محل السكن الحالى


ردى هذا لأوضح للسادة الذين يستغربون كود المحافظة مختلف عن اقامتهم


و لكم جزبل الشكر و التقدير

انا من اسكندرية وكود المحافظة 03

دالة جديدة لاستخراج اسم المحافظة وتاريخ الميلاد والنوع من الرقم القومي المصري
 

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

معلومة مفيدة جدا بنى سويف 22

محافظة المنيا 24

مشكووووووووووووووووووووووووووور

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

الفايده إيه من ده كله؟؟؟؟

:028ja7::028ja7:خيراً

الاسكندرية 03

الاسكندرية 02

القاهرة 01

كود كفر الشيخ
 

كود كفر الشيخ هو 15 بالنسبة للرقم القومى

ممكن اعرف دمياط كام من فضلكو

مشكككككككككككككككككووووووووووووورررررررررررر
ومعلومات في غاية الأهمية

الرقم الى تحت النسر يفيد بحالة المواطن الأمنية
اى رقم 2 يعنى انه مسجل خطر
اما رقم 1 شخصى عادى غير مشتبه به
ففى عملية التأمين فى لجان التحرير عندما يرى بطاقتك ليتأكد من الرقم اللى تحت النسر فلو كان رقم 2 لايتم دخولة الى الميدان

شمال سيناء 34

اسوان 28
و قنا 27

كود المنوفية 17