الباحث عن كل جدي قام بنشر يونيو 16, 2008 مشاركة قام بنشر يونيو 16, 2008 (معدل) بسم الله الرحمن الرحيم الى اخواني الاعزاء في المنتدى ارجو مساعدتي لتعلم عمل ازرار اوامر مثال اضغط على زر ياتي لي بالعشرة الاوائل اضغط على زر يعطي لي مثلا الناجحين اولا وهكذا ارجوا المساعدة وجزاكم الله خيرا واليكم ملف به ازرار واريد كيف يمكن عملها __________.rar تم تعديل يونيو 16, 2008 بواسطه الباحث عن كل جدي رابط هذا التعليق شارك More sharing options...
عادل جلال قام بنشر يونيو 17, 2008 مشاركة قام بنشر يونيو 17, 2008 السلام عليكم ورحمة الله وبركاته الأخ / صابر لقد قمت بإعادة رفع الملف بعد تعديل خلية الحاسب الآلى فى أول شهادة لآخر العام حسب المعطيات التى زوتنى بها بصفتك تنتمى إلى التعليم الإبتدائى . وأى طلب فى البرنامج .... أنا حاضر بإذن الله ولمعرفة عمل الأزرار فك الحماية وكليك يمين على الزر وأقرأ الكود باسورد الورقة( 123) باسورد الفيجوال(adel66) وإليك هذا الموضوع لأستاذى/ أكرم الغامدى سوف يفيدك جداَ بأذن الله http://www.officena.net/ib/index.php?showt...p;hl=تعلم+بنفسك __________.rar رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 18, 2008 مشاركة قام بنشر يونيو 18, 2008 ما هذا الجمال الذى ما رأت عينه مثله كل أملى فى هذا الوقت هو أن أفهم هذا البرنامج أنا أعلم أن هذا طلب صعب ولكن أعلم كرمك الزائد فأتمنى من حضرتك أن تشرح لى خطوات عمل مثل هذا البرنامج ولك جزيل الشكر رابط هذا التعليق شارك More sharing options...
محمد فيروز قام بنشر يونيو 18, 2008 مشاركة قام بنشر يونيو 18, 2008 يقول إن باسورد الفيجول خطأ رابط هذا التعليق شارك More sharing options...
عادل جلال قام بنشر يونيو 19, 2008 مشاركة قام بنشر يونيو 19, 2008 السلام عليكم ورحمة الله وبركاته الأخ / محمد فيروز با رك الله فيك الباسورد صحيح تأكد من أن لغة لوحة المفاتيح إنجليزية الأخ/ صابر الأخ/ محمد بالنسبة لعمل البرنامج كالآتى :- بعد الدخول على صفحة إدخال بيانات الطلبة وفك الحماية (123) كليك يمين على زر نسخ البيانات بعدد الطلاب تظهر نافذة نختار -تحرير - (Edit) تظهر نافذة الفيجوال بيزك بها مجموعة من الموديولات والماكروهات والزر السابق يخص الكود الآتى:- Sub MacroFil1() Application.ScreenUpdating = False Sheets("بيانات الطلبة").Range("a7:o7").Select Selection.AutoFill Destination:=Range("a7:o" & ['الرئيسية'!s12] + 6) Sheets("رصد نصف العام").Select Range("a7:n7").Select Selection.AutoFill Destination:=Range("a7:n" & ['الرئيسية'!s12] + 6) Sheets("ملف الإنجاز1 ").Select Range("a7:k7").Select Selection.AutoFill Destination:=Range("a7:k" & ['الرئيسية''!s12] + 6) Sheets("رصد آخر العام ").Select Range("a7:cd7").Select Selection.AutoFill Destination:=Range("a7:cd" & ['الرئيسية'!s12] + 6) Sheets("بيانات الطلبة").Select Range("A4").Select Application.ScreenUpdating = True End Sub السطر الأول فى الكود هو اسم الماكرو السطر الثانى هو إلغاء تحديث الشاشة (الغاء مشاهدة تنفيذ الماكرو) السطر الثالث تحديد البيانات الموجودة فى أول صف من صفوف بيانات الطلاب من الخلية (a7)إلى الخلية (o7) السطر الرابع نسخ المعادلات والدوال الموجود فى المدى السابق بعدد الطلاب الموجود فى الصفحة الرئيسية من السطر الخامس حتى السطرالثالث عشر تكرار نفس عمليتى التحديد والنسخ فى الصفحات ( رصد نصف العام - ملف الإنجاز1 - رصد آخر العام ) حتى تكون الصفحات جاهزة لأستقبال وربط البيانات السطر الرابع عشر الرجوع إلى صفحة بيانات الطلبة السطر الخامس عشر الوقوف فى الخلبة (a4) السطر السادس عشر عكس السطر الثانى السطر السابع عشر نهاية الكود ثم زر إظهار السرى Sub إظهار() Dim Answer As String Answer = InputBox(" فضلاَ أدخل كلمة المرور ") If Answer <> Sheets("بيانات الطلبة").Range("S2") Then MsgBox "كلمة المرور غير صحيحة ولم يتم تنفيذ المطلوب " Exit Sub End If MsgBox "كلمة المرور صحيحة وسيتم تنفيذ المطلوب " Columns("c:d").Select Selection.EntireColumn.Hidden = False Columns("s:s").Select Selection.EntireColumn.Hidden = True Range("b7").Select End Sub هذا الكود اسمه إظهار وهو يقوم بعملية إظهار عمود الرقم السرى كلآتى:- تظهر نافذة تطلب إدخال كلمةالمرور وهى موجودة فى صفحة بيانات الطلبة فى الخلية (s2) إذا كانت لاتساوى الكلمة الموجودة فى الخلية (s2)لم يتم تنفيذ المطلوب وتخرج من الكود إذا كانت تساوى يتم تنفيذ المطلوب وهو تحديد وعدم إخفاء العمودين (c , d)الموجود بهما سرى نصف العام وآخر العام وتحديد و إخفاء العمود (s)الموجود كلمة المرور ثم زر إخفار كلمة السرى يقوم بعكس عملية الإظهار وإلى لقاء قريب بمشيئة الله رابط هذا التعليق شارك More sharing options...
فهيد قام بنشر يونيو 19, 2008 مشاركة قام بنشر يونيو 19, 2008 (معدل) الف شكر يالغالي تم تعديل يونيو 19, 2008 بواسطه فهيد رابط هذا التعليق شارك More sharing options...
abbermustfa قام بنشر يونيو 19, 2008 مشاركة قام بنشر يونيو 19, 2008 (معدل) شكرا لك واذا اردنا ازالة الباسوورد نهائي حق الورقة والفيجوال ماذا نفعل ؟ نرجو تجربة الملف لانه يعطي رسائل خطأ تم تعديل يونيو 19, 2008 بواسطه abbermustfa رابط هذا التعليق شارك More sharing options...
قصي قام بنشر يونيو 20, 2008 مشاركة قام بنشر يونيو 20, 2008 اشكرك ونرجو شرح الصفحة الرئيسية كبفبة اتمامها رابط هذا التعليق شارك More sharing options...
الباحث عن كل جدي قام بنشر يونيو 20, 2008 الكاتب مشاركة قام بنشر يونيو 20, 2008 بسم الله الرحمن الرحيم الاخ الحبيب الاستاذ/ عادل اني احبك في الله واحمد الله انك في احسن حال واشكرك على حسن تعاونكم معا الاخ العزيز لقد اردت ان تصلح لي شيت الصف الرابع ولكن ارسلت لي الصف الاول والخطا في الصف الرابع وهو 1- شهادة نصف العام بها خطأ 2- ترتيب حسب الناجحين والراسبين بها خطأ لايعمل واتمنى ان تحدد لي معاد على الياهو تشرح لي البرنامج والكود والفيجول وجزاك الله خيرا اليك شيت الصف الرابع:___________1.rar رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 السلام عليكم ورحمة الله الاخ الفاضل الاستاذ / عادل عملك جميل جدا ورائع واستفدت منه انا شخصبا فى مجال المرحلة الابتدائية0 اسمح لى فقط ان اساعدك فى حل مشاكل استاذ صابر فقط ولا تعديل الاستاذ / صابر تفضل المرفق الله الموفق ___________1.rar رابط هذا التعليق شارك More sharing options...
الباحث عن كل جدي قام بنشر يونيو 21, 2008 الكاتب مشاركة قام بنشر يونيو 21, 2008 بسم الله الرحمن الرحيم الحمد لله رب العالمين ان جمعنا على الطاعة والعلم والتعلم كن عالما او متعلما ولا تكن الثالثة فتهلك الاستاذ/ عادل شكرا لك ولانه مجهودك يا اخي ونشكر الاستاذ هشام على المتابعة وتصليح الخطا الذي بشيت وجزاكما الله خيرا ولكن لي تعليق : ولكن عند ادخال درجات الطلبة قد نخطا ونكتب درجة كبيرة على الدرجة اريد كود لمجموعة كل مادة عندما يزيد عن الدرجة الاصلية ينبها ويعطي لي رسالة ارجو المتابعة اخوكم صابر رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 السلام عليكم ورحمة الله الاخ صابر يمكنك عمل ذلك عن طريق التحقق من الصحة وله امثلة كثيرة بالمنتدى فقط ابحث وحاول اذا وصلت الى النتيجة بمفردك سيكون افضل عن طريق بيانات - التحقق من الصحة ثم ضع الشرط الذى تريده0 الله الموفق رابط هذا التعليق شارك More sharing options...
الباحث عن كل جدي قام بنشر يونيو 21, 2008 الكاتب مشاركة قام بنشر يونيو 21, 2008 بسم الله الرحمن الرحيم الاخ العزيز شكرا لك يوجد خطأ في الشيت في طباعة العشرة الاوائل ارجو ان تنظر اليه وتصلح هذا الامر حيث لا يعطي نتيجة صحيحة رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 السلام عليكم ورحمة الله اخى الفاضل جرب المرفق الان واعلمنى هل توصلت الى ما كنت تريد فى المشاركة السابقة الله الموفق _____________________1.rar رابط هذا التعليق شارك More sharing options...
cat101 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 شكرا لهذا العمل ولكن الاعداد في الاحصاء به خطأ نرجو تصحيحه رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 السلام عليكم ورحمة الله اعلمونى بالحد الدنى والاعلى للدرجات فى كل مادة ملحوظة هامة البرنامج ليس به اى اخطاء الموجود به هى عيوب مستخدم البرنامج كامل وجميل فعلا 0 الله الموفق رابط هذا التعليق شارك More sharing options...
الباحث عن كل جدي قام بنشر يونيو 21, 2008 الكاتب مشاركة قام بنشر يونيو 21, 2008 بسم الله الرحمن الرحيم الاخ/ هشام قد تم بالفعل اصلاح ما اريد من الشهادات والاخطاء البسيطة ولكن العشرة الاوائل بياتي بالعياب الاول ولاياتي بخانة المجموع وهو ياتي بدرجات عمود خطا فارجو الاصلاح وارجو ان ترسل لي شرح لما قلت لك وهي طريقة التحقق من الصحة وارجو ان تضيفني على الياهو ولا ننسي ان نشكر الاستاذ/ عادل جلال على هذا الجهد الرائع فاللهم جازيه بالاحساني احسانا والله الموفق وارجو ان يكون معا في المحادثة فاين انت يااستاذنا رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 السلام عليكم ورحمة الله الاخ صابر اليك المرفق الله الموفق New_______Microsoft_Word.rar رابط هذا التعليق شارك More sharing options...
h63 قام بنشر يونيو 21, 2008 مشاركة قام بنشر يونيو 21, 2008 السلام عليكم ورحمة الله تصحيح العشرة الاوائل الله الموفق _____________________1.rar رابط هذا التعليق شارك More sharing options...
cat101 قام بنشر يونيو 22, 2008 مشاركة قام بنشر يونيو 22, 2008 لو سمحت ألق نظرة على صفحة واعداد الناجحين في الاحصاء رابط هذا التعليق شارك More sharing options...
عادل جلال قام بنشر يونيو 22, 2008 مشاركة قام بنشر يونيو 22, 2008 السلام عليكم ورحمة الله وبركاته الأخ/هشام كلامك وسام على صدرى بارك الله فيك الملف بعد تعديل الإحصاء _____________________2.rar رابط هذا التعليق شارك More sharing options...
cat101 قام بنشر يونيو 22, 2008 مشاركة قام بنشر يونيو 22, 2008 COUNTIF('رصد أخر العام'!S7:S507;">=50") كيف تعد من هو اكبر من الخمسين درجة ناجح الا يمكن ان يكون الطالب غايب في امتحان اخر العام او لم يحصل على ربع درجة امتحان اخر العام ويكون في نفس الوقت مجموع المادة اكبر من الخمسين لو سمحت راجع الاحصاء وشكراا مقدما رابط هذا التعليق شارك More sharing options...
محمدي عبد السميع قام بنشر يونيو 23, 2008 مشاركة قام بنشر يونيو 23, 2008 up رابط هذا التعليق شارك More sharing options...
الباحث عن كل جدي قام بنشر يونيو 23, 2008 الكاتب مشاركة قام بنشر يونيو 23, 2008 شكرا للاستاذ هشام على شرح دالة التحقق من الصحة وشكر للاستاذ عادل جلال الذي بالفعل اصلح خطأ العشرة الاوائل وجزاكم عن المسلمين خيرا اخوكم صابر رابط هذا التعليق شارك More sharing options...
محمدي عبد السميع قام بنشر يونيو 23, 2008 مشاركة قام بنشر يونيو 23, 2008 COUNTIF('رصد أخر العام'!S7:S507;">=50") كيف تعد من هو اكبر من الخمسين درجة ناجح الا يمكن ان يكون الطالب غايب في امتحان اخر العام او لم يحصل على ربع درجة امتحان اخر العام ويكون في نفس الوقت مجموع المادة اكبر من الخمسين لو سمحت راجع الاحصاء وشكراا مقدما ملحوظة سليمة ...... نرجو تصحيح الاحصاء رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.