نجوم المشاركات

بس للعلم ، كود تغيير الاسم فيه شئ جميل للنظر فيه ، فالسؤال هو : اذا فتحت ملف اكسس مثلا ، فهل تستطيع ان تغير اسمه وهو مفتوح؟ الجواب لا ، فهنا انا ، غيرت اختيار الصورة (يعني كأنّي كبست على صورة ثانية) 'select another file in the listbox, so that this file is no longer in-use عندها ، طلبت من الاكسس ان لا يسمح لك ان ترى ما يحدث (يعني لما اكبس الزر لرؤية صورة اخرى ، فالمفروض ترى صورة اخرى في النموذج ، مما قد يربك المستخدم) ، وذلك بعدم تغيير آخر شكل للنموذج ، والامر هو Me.Painting = False ، وعندها عملت التغييرات ، ولما خلصت ، طلبت من اكسس ان يعرض الشكل الصحيح للنموذج Me.Painting = True للعلم جعفر

=LEN(TRIM(A1))-LEN(SUBSTITUTE(TRIM(A1)," ",""))+1 لمعرفة عدد الكلمات هذه المعادلة لمعرفة عدد الفراغات هذه الثانية =LEN(TRIM(A1))-LEN(SUBSTITUTE(TRIM(A1)," ",""))

أخي الحبيب ياسر العربي بردو رميت الملف من غير ما تقول عملت ايه ..؟؟! عموماً جزاكم الله خير الجزاء على هذه المساعدات القيمة والتي أرجو دائماً أن تتوج بالشرح لما قمت بعمله ، ولو فيه وقت شرح لأسطر الكود التي تم التعامل معها أخي الكريم حماده سعد الله الحمد لله أن تم المطلوب على خير بس يا ريت تجرب الملف مرة تانية وتالتة عشان موضوع العفاريت دا بدأ يقلقني .. وبعدين ولا يهمك إذا كان الملف فيه عفاريت فمعانا العربي بيحضرهم ويصرفهم (كله تحت الطلب) تقبلوا وافر تقديري واحترامي

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

أبي الحبيب أبو يوسف حاشا لله أن تكون مقصوص الجناح ولديك إخوان في كل مكان ..فنحن لك أجنحة حلق بها إلى حيث تشاء إليك الملف فيه المثال المذكور مرتين مرة بدون مسافات قبل وبعد الاسم ومرة بمسافة قبل وبعد الاسم .. والمعادلات تعطي نفس النتيجة أي لا تتأثر المعادلة بالمسافات قبل وبعد إذا أردت أن تكون النتائج بشكل مختلف أخبرنا في الحال تقبل تحياتي Test.rar

أخى الفاضل أولا : يرجى تغيير اسم الظهور الى اللغة العربية لسهولة التواصل ثانيا : استخدم المعادلة الآتية فى الخلية B2 ثم اسحبها الى بقية الخلايا =MID($A2;COLUMNS($B2:B2);1)

العنوان الموضوع من قبل كلمة واحدة فقط "سؤال" وكما تعلم "السؤال لغير الله مذلة" .. طبعاً إلا السؤال لطلب العلم فهو أمر محبوب تقبل تحياتي

بارك الله فيك أخي الغالي سليم وجزاكم الله خيراً ما بال الدالة المعرفة التي تقوم بالأمر دون تحديد إذا ما كان الاسم مركب أو غير مركب ..فمن غير المنطقى أنه إذا كان لدي 1000 اسم أن أقوم بتحليل الاسم لتحديد ما إذا كان الاسم مركب أم لا ..

اسف خطأ متوقع ركزت ع الترتيب فقط لم تاتي فكرة لعلاج المشكلة بطريقة احترافية المهم عدلت بفكرة بسيطة كدا تقوم باللازم لعلها تناسبك وبعدين يامعلم حمادة متقولشي كدا براحتك احنا معاك لو ظهر الف مشكلة وسعت مني صح خليهم ميت مشكلة كويس كدا وشكرا نتيجة بالدرجات.rar

السلام عليكم ورحمة الله وبركاته باب بيان أنه لا يدخل الجنة إلا المؤمنون وأن محبة المؤمنين من الإيمان وأن إفشاء السلام سببا لحصولها 54 حدثنا أبو بكر بن أبي شيبة حدثنا أبو معاوية ووكيع عنالأعمش عن أبي صالح عن أبي هريرة قال قال رسول الله صلى الله عليه وسلم لا تدخلون الجنة حتى تؤمنوا ولا تؤمنوا حتى تحابوا أولا أدلكم على شيء إذا فعلتموه تحاببتم أفشوا السلام بينكم وحدثني زهير بن حرب أنبأنا جرير عن الأعمش بهذا الإسناد قال قال رسول الله صلى الله عليه وسلم والذي نفسي بيده لا تدخلون الجنة حتى تؤمنوا بمثل حديث أبي معاوية ووكيع قوله - صلى الله عليه وسلم - : ( لا تدخلون الجنة حتى تؤمنوا ، ولا تؤمنوا حتى تحابوا أولا أدلكم على شيء إذا فعلتموه تحاببتم : أفشوا السلام بينكم ) وفي الرواية الأخرى : ( والذي نفسي بيده لا تدخلون الجنة حتى تؤمنوا ) هكذا هو في جميع الأصول والروايات ولا تؤمنوا بحذف النون من آخره وهي لغة معروفة صحيحة . وأما معنى الحديث فقوله - صلى الله عليه وسلم - : ولا تؤمنوا حتى تحابوا معناه لا يكمل إيمانكم ولا يصلح حالكم في الإيمان إلا بالتحاب . وأما قوله - صلى الله عليه وسلم - : لا تدخلون الجنة حتى تؤمنوا فهو على ظاهره وإطلاقه فلا يدخل الجنة إلا من مات مؤمنا وإن لم يكن كامل الإيمان ، فهذا هو الظاهر من الحديث . وقال الشيخ أبو عمرو - رحمه [ ص: 228 ] الله - . معنى الحديث لا يكمل إيمانكم إلا بالتحاب . ولا تدخلون الجنة عند دخول أهلها إذا لم تكونوا كذلك . وهذا الذي قاله محتمل . والله أعلم . وأما قوله : ( أفشوا السلام بينكم ) فهو بقطع الهمزة المفتوحة . وفيه الحث العظيم على إفشاء السلام وبذله للمسلمين كلهم ;من عرفت ، ومن لم تعرف ، كما تقدم في الحديث الآخر .والسلام أول أسباب التألف ، ومفتاح استجلاب المودة . وفي إفشائه تمكن ألفة المسلمين بعضهم لبعض ، وإظهار شعارهم المميز لهم من غيرهم من أهل الملل ، مع ما فيه من رياضة النفس ، ولزوم التواضع ، وإعظام حرمات المسلمين وقد ذكرالبخاري - رحمه الله - في صحيحه عن عمار بن ياسر - رضي الله عنه - أنه قال : ( ثلاث من جمعهن فقد جمع الإيمان : الإنصاف من نفسك ، وبذل السلام للعالم ، والإنفاق من الإقتار. روى غير البخاري هذا الكلام مرفوعا إلى النبي - صلى الله عليه وسلم - . وبذل السلام للعالم ، والسلام على من عرفت ومن لم تعرف ، وإفشاء السلام كلها بمعنى واحد . وفيها لطيفة أخرى وهي أنها تتضمن رفع التقاطع والتهاجر والشحناء وفساد ذات البين التي هي الحالقة ، وأن سلامه لله لا يتبع فيه هواه ، ولا يخص أصحابه وأحبابه به . والله سبحانه وتعالى أعلم بالصواب .

أخي الكريم سامي الحميدي جرب الكود التالي عله يفي بالغرض Sub LoopThroughSheets() Dim Ws As Worksheet, Sh As Worksheet, I As Long, Cell As Range Set Ws = Sheet1 For Each Sh In ThisWorkbook.Worksheets For Each Cell In Sh.Range("E7:E" & Sh.Cells(Rows.Count, "B").End(xlUp).Row) If Not IsEmpty(Cell) And IsDate(Cell) And CLng(Date) - CLng(Cell) >= 30 Then Ws.Cells(I + 6, 1).Value = I + 1 Ws.Cells(I + 6, 2).Value = Sh.Name Ws.Cells(I + 6, 3).Value = Cell.Offset(, -3).Value Ws.Cells(I + 6, 4).Value = Cell.Value I = I + 1 End If Next Cell Next Sh End Sub تقبل تحياتي Loop Through Sheets & Check Date Condition YasserKhalil.rar

بسم الله الرحمن الرحيم يا فتّاح يا عليم يا رزّاق يا كريم

انا لسة بتعلم علشان محدش يتريق عندي جدول لدرجات الموظفين و حصل الموظف علي اكثر من درجة ازاي اطلع اخر درجة حصل عليها الموظف

السلام عليكم اخى الكريم .. لم تضع تصور للفورم المطلوب ..ووضعت ملف به اسماء المعلمين من خلال قائمة منسدلة محذوف مرجعها .. عموما اليك الملف التالى .. جربة وابدى ملاحظاتك.. اما ان لم يظهر معك نتائج احد الاسماء فى احد الايام او كل الايام .. اعد كتابة الاسم بجدوا الحصص او تجعل للقائمة المنسدلة مرجع Book1_3.zip

بالنسبة للأسماء المركبة سيكون الأمر بنسبة كبيرة ولكن لن تكون بنسبة 100% ... فكرتك جميلة ولكن مرهقة في أنك ستضظر إلى كتابة 1 أو 2 لكل اسم ...فهل هذا منطقى؟

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

السلام عليكم ماشاء الله البيت امتلأ علينا بالحبايب منور اخي ياسر منور أخى أحمد تشجيعكم لنا رجعنى 40 سنة لزمان لما كان عندى 11 سنة أنا قطعتها علشان ماحدش يحسبها إنما لو ليها معادلة أو كود ماشى !! نورتونا ياحبايب بالمناسبة ياأخ ياسر لو تكرمت وشاركت فى ملف التدرج هل يمكن كتابة 7/1 من كل عامفى صفوف متتالية وعند إدخال أى تاريخ مابينهمافى صفحة الإدخال يدخل فى موقعة عن طريق إدراج الصفوف وربنا يوفقك للخير دائماً

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

موضوع الكتاب موضوع طويل ومحتاج لوقت كبير ..بس الأول نفهم إزاي الأمور بتتم باحترافية عشان لما أبدأ أبدأ صح الموضوع سيستغرق وقت طويل جداً .. أعانني الله وإياكم ووفقني الله وإياكم

أخي الكريم سامي أهلاً بك في المنتدى ونورت بين إخوانك يرجى تغيير اسم الظهور للغة العربية كما يرجى توضيح المطلوب أكثر ..هل الأرقام التي سيتم معها أرقام ثابتة في الطول (7 أرقام لكل رقم)؟ .. هل هناك بيانات أخرى غير رقمية ضمن النطاق ؟ .. هل تريد توزيع الأرقام في الأعمدة المجاورة وفقط ؟ أم أنك تريد توزيعها بشروط ؟؟ وإذا كانت الشروط كما ذكرت أن الأرقام لابد أن تحتوي على 0 أو 2 أو 5 أو 8 ..فماذا لو لم ينطبق الشرط؟

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

قم بضغط ملفك ثم قم برفع الملف لتتضح صورة طلبك وتجد استجابة من إخوانك بالمنتدى

حاشا لله أن يعاندني الحق ..أخي الغالي أحمد عاندك حق !!! ومن أنا حتى أقف في وجه الحق .. وفقني الله وإياكم لما فيه الخير والصلاح تقبل هزاري

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

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

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

ما شاء الله تبارك الله قلت لك انك ساحر .. ما شاء الله تبارك الله Private Sub cmd_Rename_Click() newpathANDname1 = InputBox("Please insert a new name") If Len(newpathANDname1 & "") = 0 Then Exit Sub newpathANDname = Me.lst_Files.Tag & newpathANDname1 & ".jpg" oldpathANDname = Me.lst_Files.Tag & Me.lst_Files.ItemData(Me.lst_Files.ListIndex) 'make a copy of the fie, with the new name FileCopy oldpathANDname, newpathANDname 'select another file in the listbox, so that this file is no longer in-use For i = 0 To lst_Files.ListCount - 1 If lst_Files.Column(0, i) <> newpathANDname1 Then Me.lst_Files.Selected(i) = True Exit For End If Next i 'now delete the old file name Kill oldpathANDname 'don't refresh the Form Me.Painting = False 'read the folder files Call Form_Current 'select the same file name For i = 0 To lst_Files.ListCount - 1 If lst_Files.Column(0, i) = newpathANDname1 Then Me.lst_Files.Selected(i) = True Exit For End If Next i 'refresh the Form Me.Painting = True End Sub كود عبقري يدرس ..

السلام عليكم أخى ياسر حصلت ألف بركة نشكركم على تشريفكم بمروركم ومتابعتكم أنتم العلماء أما نحن كما يقال بندأدأ لكم وافر احترامى وتقديرى

1- مستحيل احد يتريق عليك ... لاننا كلنا هنا لنتعلم .... 2- لو ترفق مثال بسيط ليتمكن الاخوة و الاساتذة الافاضل من مساعدتك ...

استاذي جعفر .. هل تذكر هذا البرنامج ( الصورة المرفقة )

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

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

السلام عليكم لاثراء الموضوع جرب أخى هذه المعادلة =INDEX($A$1:$A$18;SMALL(IF(ISNUMBER($A$1:$A$18);ROW($A$1:$A$18));ROWS($G$2:G2))) New Microsoft Excel Worksheet.rar

أستاذنا الكبير رجب جاويش بعد التحية الرجاء إعادة النظر فى مجموع الطالب بعد إمتحان مواد الدور الثانى حيث يفترض التالى فى حالة نجاح الطالب فى الدور الثانى مهما كانت الدرجة التى يحصل عليها الطالب فى إمتحان الدور الثانى فهى ترصد كما هى فى الشيت ولكن لا يحتسب منها فى المجموع الا 50 % فقط كحد أقصى بحيث إذا كان مجموع الطالب الكلى فى الدور الأول أقل من 50 % فمهما كانت درجته فى الدور الثانى فى المادة أو المواد التى إمتحنها فى الدور الثانى فمجموعه الكلى يكون فقط 50 % من النهاية الكبرى لدرجة المجموع الكلى أما لو كان مجموعه فى الدور الأول أكثر من أو يساوى 50 % من النهاية الكبرى للمجموع الكلى ففى هذه الحالة يضاف على مجموعه الكلى الأصلى فقط ما يكمل الـ 50 % فقط فى كل مادة من مواد الدور الثانى أتعشم أن تكون وجهة نظرى وصلت لحضرتك و منكم نستفيد يا أستاذنا القدير

أخي الكريم أبو خالد يرجى تغيير اسم الظهور للغة العربية إليك حل بالأكواد إثراءً للموضوع Sub Test() Dim I As Long, FirstName As String, FatherName As String, Str As String For I = 2 To Cells(Rows.Count, 1).End(xlUp).Row FirstName = Kh_Names(Cells(I, 1), 1) FatherName = Cells(I, 2) Str = Mid(Cells(I, 1), Len(FirstName) + 1) Cells(I, 4).Value = FirstName & " " & FatherName & Str Next I End Sub Function Kh_Names(FullName As String, ParamArray iNdex1()) As String Dim I As Integer Dim Kh_Split, MyArray, Ar Dim Kh_String As String, SN As String, RE As String On Error GoTo Err_Kh_Names MyArray = Array("عبد ", "أبو ", "ابو ", "آل ", " الله", " الدين", " الإسلام", " الاسلام", " الحق", " النصر", " العهد", " النور", " بالله") SN = Application.WorksheetFunction.Trim(FullName) For Each Ar In MyArray RE = Replace(Ar, " ", "^") SN = Replace(SN, Ar, RE) Next Kh_Split = Split(SN, " ", , vbTextCompare) On Error Resume Next For I = 0 To UBound(iNdex1) Kh_String = Kh_String & " " & Kh_Split(iNdex1(I) - 1) Next On Error GoTo 0 Kh_String = Replace(Trim(Kh_String), "^", " ") Kh_Names = Kh_String Exit Function Err_Kh_Names: Kh_Names = "" End Function تقبل تحياتي

السلام عليكم ورحمة الله وبركاته دعوة للتمعن بآيات الله إخوتي الكرام آيتين كريمتين الأولى: أَفَحَسِبْتُمْ أَنَّمَا خَلَقْنَاكُمْ عَبَثًا وَأَنَّكُمْ إِلَيْنَا لَا تُرْجَعُونَ (115) سورة المؤمنون: قوله تعالى : أفحسبتم أنما خلقناكم عبثا وأنكم إلينا لا ترجعون قوله تعالى : أفحسبتم أنما خلقناكم عبثا أي مهملين كما خلقت البهائم لا ثواب لها ولا عقاب عليها ؛ مثل قوله تعالى : أيحسب الإنسان أن يترك سدى يريد كالبهائم مهملا لغير فائدة . قال الترمذي الحكيم أبو عبد الله محمد بن علي : إن الله تعالى خلق الخلق عبيدا ليعبدوه ، فيثيبهم على العبادة ويعاقبهم على تركها ، فإن عبدوه فهم اليوم له عبيد أحرار كرام من رق الدنيا ، ملوك في دار الإسلام ؛ وإن رفضوا العبودية فهم اليوم عبيد أباق سقاط لئام ، وغدا أعداء في السجون بين أطباق النيران . و ( عبثا ) نصب على الحال عند سيبويه وقطرب . وقال أبو عبيدة : هو نصب على المصدر أو لأنه مفعول له . وأنكم إلينا لا ترجعون فتجازون بأعمالكم . قرأ حمزة ، والكسائي ترجعون بفتح التاء وكسر الجيم من الرجوع . الثانية: أَيَحْسَبُ الْإِنسَانُ أَن يُتْرَكَ سُدًى (36)سورة القيامة: قوله تعالى : أيحسب الإنسان أي يظن ابن آدم أن يترك سدى أي أن يخلى مهملا ، فلا يؤمر ولا ينهى ; قاله ابن زيد ومجاهد ، ومنه إبل سدى : ترعى بلا راع . وقيل : أيحسب أن يترك في قبره كذلك أبدا لا يبعث . وقال الشاعر : فأقسم بالله جهد اليمين ما ترك الله شيئا سدى أخوكم أبو يوسف عن موقع(مشروع المصحف الإلكتروني)...

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

اتفضل ادخل هنا الفريق الادارى للموقع هتلاقى فيه مشرفين ومديرين وخبراء قسم الاكسيل بالتوفيق اخى

بالفعل أخي الحبيب عانيت من هذه المشكلة من فترة في ملف كنت أقوم بتصديره لـ PDF فكان الملف يعمل على أوفيس 2013 بشكل ممتاز أما أوفيس 2007 فلم تكن النتائج منضبطة على الإطلاق .. فتوقفت عن 2007 ساعتها وبدأت أتعامل بأوفيس 2013 .. أي أن تخمينك في محله .. نسخة الأوفيس قد تكون هي السبب في المشكلة تقبل تحياتي

السادة الكرام قمت بتنصيب اوفيس 2013 بدلاً من 2007 وكانت النتيجة ممتازة بقي أن أتأكد من المشلكة. هل هي من نسخة اوفيس 2007 التي لدي ؟ أم المشكلة من اوفيس 2007 عموماً تحياتي للجميع

أخي وحبيبي في الله الأستاذ الكبير عبد الباري .. أنت الأستاذ وأنا التلميذ ... وأشكرك على كلماتك الرقيقة في حقي والتي لا أستحقها أبدا إن أعمالك تنم عن أستاذ كبير لا يستهان بقدراته أبدا وكان كلامي مجرد رأي شخصي ، ولكن أقصد منه المصلحة العامة ، حيث أن العاملين على هذه البرامج يهمهم في المقام الأول أن يؤدي البرنامج كل المطلوب وأن يكون البرنامج خفيف وسريع في التعامل مما يسهل العمل عليه ... تقبل تحياتي

أستاذي الكبير عبد الباري ممكن أقولك حاجة بس توعدني متزعلش .. أقول وأتوكل على الله .. حقيقة الأمر برامج الكنترول برنامج هاااااااام جدا جدا جدا ، وبالتالي يراعى فيه ان يكون حجمه خفيف شغله خفيف وعملي إلى حد كبير .. بالتالي أرجح دائما البعد عن كل ما يسبب ثقل للملف أو يجعل حجمه يكبر ..!!! أنا من فترة من حوالي سنيتن عملت برنامج للصف السادس طلب مني وكان البرنامج يسع التعامل مع أكثر من ألف مدرسة ومرن جدا وبصراحة أنا مش عارف عملته إزاي .. كله بعون الله وتوفيقه ، والبرنامج وفيه بيانات أكثر من 3000 طالب كان حجمه لا يتعدى 2 ميجا كان 1.3 تقريبا لا أتذكر صراحة ... المقصد من كلامي أن يكون البرنامج خفيف بقدر الإمكان .. لأن معظم اللي بيستخدموا البرامج دول شغالين في أجهزة المدارس (اللي هفا عليها الزمن) ، ويهمهم دايما المخرجات بقدر ما يهمهم شكل البرنامج ، ومش معنى كلامي إننا هنتغاضى عن الشكل ، هذا ليس مقصدي ، إنما هدفي الأول أن يكون البرنامج عملي من الدرجة الأولى ... نشوف ايه اللي الناس محتاجاه ، ونركز عليه ، وفقط وبالنسبة للناس اللي بتطلب كشوف المنادة وأرقام الجلوس وخلافه من أعمال الكنترول ، لما لا تكون منفصلة عن برنامج الكنترول الأصلي حتى لا نسبب ثقل للملف هذا رأيي الشخصي ( وأنتم لكم حرية التعامل مع البرامج بالشكل الذي يحلو لكم) فأنا لست حكرا على رأي أحد وأكرر هذا رأي شخصي (ولا يعني رأيي أني أفرض رأيي على أحد والعياذ بالله ..هذا مجرد رأي ، وقد أكون أخطأت فيه) والله من وراء القصد وهو يهدي السبيل .. أعتذر للإطالة .تقبلوا تحياتي

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

اين كشوف المناداه ؟ اين ارقام الجلوس ؟ اين كشوف رصد ملف الانجاز ؟ اين الله يجزيك الخير

مجهود تشكر عليه ولكن اخي الكريم الم تعلم ان اغلب كمبيوترات المدارس تعمل على 2003 وكثره الباسوردات تجعل العمل غير محبب اجعل الباسوورد رقم 1 في اي شيء يبقى سهل واللي عايز يغيره يغير جزاك الله الف خير وبارك فيك عايزين من هذا العمل الرائع نسخه 2003

إنت مش ناسي إخوانك سواء الاعدادي أو الابتدائي .. كدا الجماعة بتوع الثانوي هيزعلوا تقبل تحياتي

السلام عليكم احسنت اخي الحبيب الخالدي ....حفظكم الله كود رائع جزاكم الله خيرا تقبلوا تحياتي وشكري