ناصر سعيد

التاريخين بالميلادي لكن التاريخ اللي فوق بجواره م والتاريخ اللي تحته بجوارها هـ جزاكم الله خيرا

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

الاستاذ المحترم / مجدي يونس تمام حفظك الله ورعاك اتعشم ان تشرح كيف تمت خطوة خطوه ... ؟

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

تمام .. حفظك الله ورعاك ياأستاذ الأساتذه

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

ربنا يبارك فيك ... عندي سؤال طبعا انت بتسال هذا السؤال عشان تعمله على برنامج انت عامله وخايف عليه هل افدتنا بمعلومه فذه من معلوماتك التي جعلتك تخاف على برنامج .. اريد ان اتعلم ليس الا

=IF(OR('بيانات المدرسة'!$B$12=الصف الاول;'بيانات المدرسة'!$B$12=الصف التاني;'بيانات المدرسة'!$B$12=الصف الثالث);70;60)

الاستاذ المحترم محمود الشريف .. جزاك الله كل الخير .. وبعد برنامج الكنترول للمدارس : هو عباره عن برنامج به صفحات لادخال بيانات وصفحات لمخرجات هذه البيانات المدخله ثانيا : ماهي صفحات الادخال ؟ صفحه لبيانات المدرسه .... فيها اسم المدرسه ..الاداره التابعه لها .. اسم مدير المدرسه .. اسم رئيس شئون الطلبه .. اسم رئيس الكنترول مجرد اسماء الصفحه التانيه : من صفحات الادخال هي بيانات الطلبه من اسم الطالب .. تاريخ ميلاده .. نوع الطالب ( ذكر او أنثى ) .. حاله قيده (ناجح ام معيد ) .. الديانه ثالثا : الصفحتين السابقتين من بيانات المدرسه وبيانات الطلبه والحمد لله تمت نبدأ في رصد الدرجات وعشان نفهم اليه رصد الدرجات ودرجات ايه ؟ للطالب امتحانين الامتحان الاول في نصف العام وامتحان اخر العام وكل امتحان منهم له درجات اعمال سنه او انجاز او تقويم مسميات مختلف لحاجه واحده اذن مطلوب 4 صفحات لادخال درجات الطلاب منهم عدد2 صفحه لاعمال السنه .. واحده في نصف العام وايضا مثلها في اخر العام وعدد 2 صفحه لدرجات الامتحانين ( امتحان نصف العام و امتحان اخر العام ) كده المدخلات تمت بنجاح ===== خلاصه ماسبق ": مطلوب 6 صفحات منهم 2 واحدة لبيانات المدرسه والتانيه بيانات الطلبه وعدد 2 صفحةواحده لاعمال السنه في نصف العام والتانيه اعمال السنه لاخر العام وعدد 2 صفحه واحده لاختبار نصف العام والتانيه لاختبار اخر العام ..... ادعو الله ان اكون وفقت في هذا الجزء من شرح آليه العمل الكنترول =========================== سؤال : هل يمكن اختزال الصفحات ال6 الى اقل من ذلك ؟ نعم : لماذا ؟ لان عدد اعمدة الصفحات ال المطلوبه 6 اقل من عدد اعمده الصفحه الواحده الخلاصه : يمكن في صفحه واحده ان تجمع الصفحات ال6 بكود يظهر اعمده معينه مطلوبه ويخفي الاخرين ================================= تكمله ماسبق مدخلات البرنامج تمام التمام ناتي الى المخرجات مطلوب :ارقام الجلوس .. كشوف المناداه .. شهادات الناجحين .. شهادات من لهم حق دخول الدور التاني .. مطلوب اوائل الطلبه في المواد كلها .. واوائل الطلبه في كل ماده ... مطلوب كشوف بالناجحين ... وكشوف اخرى بطلاب الدور التاني .. وصفحه للاحصائيات .. فيها عدد الناجحين .. عدد المقيدين وبعض الاحصائيات الاخرى ادعو الله ان اكون قد وفقت في الشرح ================================ ناتي الى مرحله الطلاب الذين لهم حق دخول الدور التاني هايدخلو امتحان الدور التاني ( بتوع الملاحق ) يبقى المطلوب صفحه لاسمائهم وهم طلاب الدور التاني يعني اسماؤهم موجوده وصفحه لارقام جلوسهم وصفحه نرصد فيها درجاتهم في المواد التي قصروا فيها وبعدها نخرج شهاداتهم وصفحه اخرى للاحصائيات وشكرا =========================== هذه الصفحات محتاجه غلاف فورمه بها ازرار توصلنا للصفحات المختلفه تم بحمد الله وتوفيقه الشرح ومستعد ان شاء الله لاجابه اي سؤال والحمد لله ==================== وفورمه اخرى للبدايه تدل على اسم الكنترول وبها اسم مستخدم ورقم سري ================= ================ مطلوب فورم .. يا أهل القمم

نسأل الله لكم دائما وأبدا أن يبارك لكم استاذ محمود الشريف جميع الروابط الموجوده بالموضوع سليمه ... غير المتصفح وشوف

http://up.top4top.net/downloadf-416874e71-rar.html رابط الملف

==================== http://up.top4top.net/downloadf-416dxcbb1-rar.html

الجزء49ترحيل الطلاب على اللجان Formats xlPasteColumnWidthsساجدة العزاوي

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

جزاك الله كل خير وبارك لك استاذ مجدي

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

ربنا يبارك لك استاذ خالد ...

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

استاذ محمود الشريف جزاك الله كل خير وبارك فيك اختصره يا باشا =========================== لو تكرمت عايز اعرف معنى هذين السطرين ActiveWindow.ScrollRow = 627 ActiveWindow.SmallScroll Down:=366

من فضلكم اريد شرح لهذا الكود Sub سري() Rows("7:7").Select ActiveWindow.ScrollRow = 627 ActiveWindow.SmallScroll Down:=366 Rows("7:445").Select Selection.Sort Key1:=Range("e7"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom ActiveWindow.ScrollRow = 7 Range("e7").Select End Sub جزاكم الله خيرا

Sub تحريري() kh_ColumnHidden "m:w" Range("m7").Select End Sub مفيده لاجبار الموشر للوقوف على اول خليه في العمود المطلوب

Sub تحريري2() kh_ColumnHidden "m:t" Range("m7").Select End Sub ميزه عشان يقف المؤشر على بدايه الخليه المطلوبه بالضبط

تخيل انك نسيت الباسوورد لملف اكسيل .. فهل هذا البرنامج يفتح الملف ؟ 2 تخيل ان الملف مفتوح الصفحات واردت ان تدخل لمحرر الاكواد وانت نسيت الباسوورد فهل هذا البرنامج يفتح محرر الاكواد ؟ ============= جزاك الله خيرا

جزاكم الله كل خير Sub kh_ColumnHidden(ColumnAddres As String) 'هذه الأكواد الثلاثة التالية تعمل على تسريع تنفيذ الأوامر Application.ScreenUpdating = False Application.EnableEvents = False Application.Calculation = xlCalculationManual Columns("D:XFD").EntireColumn.Hidden = True Columns(ColumnAddres).EntireColumn.Hidden = False Application.ScreenUpdating = True Application.EnableEvents = True Application.Calculation = xlCalculationAutomatic End Sub '====================== Sub رصد_أعمال_ترم1() 'هذه الأكواد الثلاثة التالية تعمل على تسريع تنفيذ الأوامر Sheets("رصد الدرجات ").Select kh_ColumnHidden "U:AD" End Sub تم اختزال 4 صفحات في صفحه واحده بفضل الله ===================== كود لاظهار اعمده محددة 1.rar الاستاذه الكرام ارجو تمكين الزر رصد على سري1 ورصد على الجلوس ========== سري 1 معناها معناها ظهور نفس الاعمده المختاره بالكود + المسلسل وسري1 اما رصد على الجلوس معناها ظهور نفس الاعمده المختاره بالكود + المسلسل والاسم ورقم الجلوس

جزاك الله كل خير استاذ ياسر Sub kh_ColumnHidden(ColumnAddres As String) 'هذه الأكواد الثلاثة التالية تعمل على تسريع تنفيذ الأوامر Application.ScreenUpdating = False Application.EnableEvents = False Application.Calculation = xlCalculationManual Columns("D:XFD").EntireColumn.Hidden = True Columns(ColumnAddres).EntireColumn.Hidden = False Application.ScreenUpdating = True Application.EnableEvents = True Application.Calculation = xlCalculationAutomatic End Sub '====================== Sub رصد_أعمال_ترم1() 'هذه الأكواد الثلاثة التالية تعمل على تسريع تنفيذ الأوامر Sheets("رصد الدرجات ").Select kh_ColumnHidden "U:AD" End Sub تمام .. حفظكم الله ===================== كود لاظهار اعمده محددة 1.rar الاستاذ ياسر ارجو تمكين الزر رصد على سري1 ورصد على الجلوس ========== سري 1 معناها معناها ظهور نفس الاعمده المختاره بالكود + المسلسل وسري1 اما رصد على الجلوس معناها ظهور نفس الاعمده المختاره بالكود + المسلسل والاسم ورقم الجلوس