أبو سجده

الاستاذ الفاضل // محمد رزق السلام عليكم بارك الله فيكم وجزاكم خيرا وافر تقديرى

اخى العزيز الفاضل الاستاذ // احمد ابو زيزو السلام عليكم معلومة سليمة 100% بعد الاستفسار عنها من بعض الزملاء المتخصصين وتأكيدا فأبناء شقيقتى يحملون نفس الرقم وهم مواليد " ليبيا " وعذرا لعدم الرد فى حينه نظرا لانشغالى فى اعمال الامتحانات الجارية حاليا جزاكم الله خيرا وبارك فيكم

اخى العزيز الفاضل // هشام بركات بارك الله فيكم وجزاكم الله خيرا

اخى العزيز الفاضل // ناصر سعيد بارك الله فيكم وجزاكم الله خيرا

اخى العزيز الفاضل // مصطفى كمال بارك الله فيكم وجزاكم الله خيرا

الاخ الكريم الفاضل // ؟؟؟؟؟؟؟؟؟؟؟؟؟ as22_122 بداية جزاكم الله خيرا وبارك فيكم نرجو قبول دعوتى لتغير اسم الكريم من لوحة التحكم الخاصة بسيادتكم حتى يكون هناك تواصلا لما فيه الخير تماشيا لسياسة الموقع ..... تقبل وافر احترامى وتقديرى

اخى العزيز الفاضل // اكرامى رمضان بارك الله فيكم وجزاكم الله خيرا

بسم الله الرحمن الرحيم وبه نستعين السلام عليكم ورحمته الله وبركاته استكمالا لموضوع التنقل السريع بين صفحات العمل من خلال فوروم يشرفنى ان أقدم لحضراتكم هذة الاضافة الا وهى شاشة دخول شيت كنترول برقم سرى على ذات المرفق بالرابط التالى http://www.officena.net/ib/index.php?showtopic=53505&hl= كلمة المرور salma الرقم السرى 5050 ارجو من الله تعالى ان يكون فيه النفع لجميع الساده الزملاء والبقية تأتى بحول الله تعالى تقبلوا وافر تقديرى وجزاكم الله خيرا

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

الاستاذ الحبيب أبو سلمى سعيد بيرم هذا الامر مستحيل!!!! اخى العزيز الاستاذ // ابو براء المحترم السلام عليكم ورحمته الله وبركاته لاتتعجب إنها إرادة الله ليس هناك مستحيلا فقد أنعم الله تعالى علىّ بفكرة يسيرة جدا جدا فمعلوم أن هناك صفحة يدون بها مواد التخصص يمكنك من خلالها تنفيذ تلك الفكرة اليسيره وهى اختيار اسم المرحلة المراد العمل عليها وقد تمت التجربة العملية والحمد لله النتيجة ميت فل و14 دون أية عوامل من شأنها عدم استيعابه ويبقى على تنفيذ تلك الفكرةالاجابة على تنفيذ الاستفسار المشار اليه عاليه حتى يكون للساده الزملاء الافاضل بصمة بنائة فى انجاز هذا العمل وافر تقديرى واحترامى وجزاكم الله خيرا

الاساتذه الافاضل رجب جاويش ابراهيم ابوليله محمود الشريف طارق زكريا السلام عليكم ورحمته الله وبركاته بداية جزاكم الله خيرا وبارك فيكم جميعا أود أطرح سؤلا على حضراتكم وارجو من الله تعالى ان يوفق الجميع لامكانية تنفيذ ذلك فرضا لوهناك شيت كنترول مشترك بين المرحلة الابتدائية والاعدادية والثانويه وبالطبع تختلف عدد مواد كل مرحله وكذا القرارت الوزاريه الخاصة بكل مرحلة فعلى سبيل المثال عدد مواد الابتدائى وليكن 8 مواد وعدد مواد الاعدادى وليكن 12 ماده وعدد مواد الثانوى وليكن 16 ماده فكيف يمكن استدعاء المرحلة المراد العمل عليها فقط وبعدد المواد الخاصة بها مع اخفاء باقى المراحل وفى ذات الوقت إظهار المادة المراد الترصيد بها مع إخفاء باقى المواد وفقكم الله تعالى لصالح الاعمال تقبلوا وافر احترامى وجزاكم الله خيرا

الاستاذ الفاضل // محمد طاهر السلام عليكم ورحمته الله وبركاته يحدث أحيانا اكتشاف خطأ ما بأحد المرفقات دون قصد لاسباب عديده منها " ضعف البصر" الامر الذى يتطلب تصويبها واعادة رفعها مرة أخرى وخاصة المرفقات المتعلقه بالنواحى الماليه ولكن مع نفاذ عدد مرات تعديل المشاركات لايستطيع صاحب الموضوع اجراء اية تعديلات والسبيل الوحيد أمامه هو رفع الموضوع مرة أخرى مع تغييرعنوان الموضوع حتى لايكون مكرر لذا اقترح على سيادتكم ترك خيار التعديل مفتوحا لصاحب الموضوع الاصلى دون غيره شاكرلسيادتكم سعة صدررك تقبل وافر احترامى وتقديرى .... وجزاكم الله خيرا

اخى العزيز الاستاذ الفاضل // احمد ابو زيزو السلام عليكم بما أننا أبناء عمومه فى مجال عمل واحد فأدركت المطلوب مع توضيحكم المشار اليه عاليه وفقكم الله تعالى وسدد على طريق الخير خطاكم تقبل وافر احترامى وتقديرى وجزاكم الله خيرا

الاستاذ العزيز الفاضل // احمد ابو زيزو السلام عليكم ورحمته الله وبركاته بداية ... أسأل الله تعالى أن تكون بكامل الصحة ثانيا .... نرجو الافاده والتجربه أولاً يجب على سيادتكم تحديد أسم الملف الذي تريد تثبيت أسمه في اول الكود كما بالمثال "zizo_Xl" تقبل وافر احترامى وتقديرى وجزاكم الله خيرا Private Const Nm_Fil As String = "zizo_Xl" Option Explicit '====================================================== Private Const Nm_Fil As String = "zizo_Xl" Sub auto_open() Dim NewName As String, MyBook As String, MyPath As String, MyTyp As String, MyName As String '============================ On Error GoTo Err_kh_Name '============================ If Nm_Fil <> ThisWorkbook.Name Then '============================ With ThisWorkbook MyBook = .Name MyPath = .Path & Application.PathSeparator End With MyTyp = Mid$(MyBook, InStrRev(MyBook, ".")) MyName = Replace(MyBook, MyTyp, "") '============================ NewName = MyPath & Nm_Fil & MyTyp If Dir(NewName, vbDirectory) = vbNullString Then ThisWorkbook.SaveAs Filename:=NewName Kill MyPath & MyBook MsgBox "تم إسترجاع اسم الملف", vbOKOnly, "الحمدلله" End If '============================ Err_kh_Name: If Err Then MsgBox "Err.Number : " & Err.Number Err.Clear End If End If End Sub

اخى فى الله الاستاذ // محمود الشريف قدر الانسان برفعة أخلاقه وتواضعه رفع الله قدرك فى الدنيا والاخره بارك الله فيكم وجزاكم خيرا

أخى العزيز الفاضل // ابو البراء تمام الله ينور ...... دائما سباق جزاكم الله خيرا

اخى العزيز الاستاذ الفاضل // ابو البراء السلام عليكم بشرك الله بالخير والبقية تأتى بحول الله أطمع فى ملف يحتوى على مجموعة ارقام قومية لمجموعة من الطلبة دون ذكر اسماء لهم وخاصة من السادة مدرسى مدارس الابتدائى وهذا طلب عام من الساده الزملاء بالموقع جزاكم الله خيرا

اخى العزيز الفاضل الاستاذ // احمد ابو زيزو السلام عليكم ورحمته الله وبركاته بارك الله فيكم وجزاكم الله خيرا ارجو من الله تعالى أن يفى هذا المرفق طلب سيادتكم NO COPY NO PASTE NO SAVE AS وافر تقديرى واحترامى لسيادتكم

أخى العزيز الاستاذ الفاضل / ابو البراء أختى العزيزة الأستاذة الفاضلة / ام عبدالله عفوا الحكاية جت فى زيرو زياده تم تعديل المرفق لكل مائة عام نرجو التماس العذر وجزاكم الله خيرا

الاستاذ القدير // محمود الشريف بارك الله فيكم وجزاكم الله خيرا تقبل وافر احترامى وتقديرى

تم اعادة رفع الملف بالمشاركة رقم 1 نرجو الافاده ببيان عملى حسب ماتم تعديله وجزاكم الله خيرا

السلام عليكم الاستاذ الفاضل // ابو البراء الاستاذة الفاضلة // أم عبدالله نرجو الافاده ببيان عملى وجزاكم الله خيرا

الاخت الفاضلة الاستاذه // ام عبدالله السلام عليكم ليس الامر كذلك فالرقم الرابع عشردلالة على القرن وتم وضع ارقام قومية صحيحة مع اختلاف الرقم الرابع عشر مابين 2 و 3 و 4 وهكذا للتأكد من تاريخ الميلاد نرجو المراجعه والافاده فربما هناك ماأسهوعنه جزاكم الله خيرا وبارك فيكم

يمكن للساده الزملاء الافاضل التفضل بمتابعة الرابط التالى http://www.officena.net/ib/index.php?showtopic=53576 حساب سن الطالب فى اول اكتوبر من كل عام اعتبارا من عام 2000 وحتى 2199 - سعيد بيرم وجارى تعديل عنوان الموضوع للأصوب عفوا " النظرعلى الآد " وجزاكم الله خيرا

بسم الله الرحمن الرحيم وبه نستعين الساده الزملاء السلام عليكم ورحمته الله وبركاته بناءا على طلب الاستاذ الفاضل أخى // الدهشورى باستخراج تاريخ الميلاد والسن والنوع من الرقم القومى فى الالفيه الجديدة http://www.officena.net/ib/index.php?showtopic=53559 وبناءا على رد السيدة الفاضلة الاستاذة الست // أم عبدالله أمد الله فى عمرها وبارك فيها اتشرف بعرض الموضوع التالى حساب سن الطالب فى اول أكتوبرمن كل عام اعتبار من مواليد 2000 وحتى مواليد 2199 أعطانا الله واياكم الصحة والعافية وطول العمر وعلى الاجيال القادمه التعديل الى ماشاء الله من القرون تقبلوا وافراحترامى وتقديرى وجزاكم الله خيرا