أيسم إبراهيم

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

السلام عليكم الأخ أبو ملك : مرحبا بك بين إخوانك أعضاء المنتدى هل أستطيع أن أعمل ملف فيه عدد من الخلايا نتيجة جمع تلك الخلايا يساوي 500 ومتى ماصارت نتيجة الجمع أكثر من كذا يرفض الأرقام المدخلة حدد كل الخلايا التي ستكتب فيها الأرقام من قائمة بيانات...التحقق من الصحة...مخصص اكتب الدالة التالية : =M2<=500 ستصدر رسالة تنبيه بزيادة المجموع عن 500 الملف المرفق به توضيح أكثر دمت بخير أيسم إبراهيم MESSAGE ALERT.rar

السلام عليكم أخي الكريم: zinepef جزاك الله كل خير هذا مما تعلمناه من أساتذة هذا المنتدى الكريم دمت بكل الخير أيسم إبراهيم

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

السلام عليكم أخي الكريم بن علية جزاك الله خيرا على الكود الجميل لكن من المعروف أنه لا يوجد تراجع عن تنفيذ أمر ما بالكود و مسح البيانات قد يحدث بطريق الخطأ ففكرت بهذه الإضافة للكود Sub Button1_Click() prompt = "هل تريد مسح البيانات؟انتبه لا يوجد تراجع عن المسح!!" Command_buttons = vbYesNo + VbMsgBoxRt1Reading تحذير ! انتبه" project = MsgBox(prompt, Command_buttons, Title) If project = vbYes Then Range("B4:E13").Select 'Selection.SpecialCells(xlCellTypeConstants, 23).Select Selection.ClearContents Range("A1").Select End If End Sub وهي رسالة تنبيه قبل تنفيذ الكود بها الأمرين " نعم و لا " دمتم بخير أيسم إبراهيم Range.clear.rar

السلام عليكم الأخ الكريم نفرض أن مدى البيانات الذي تعمل عليه هو A1:A1000 حدد مدى البيانات و تأكد أن الخلية النشطة هي A1 من قائمة تنسيق....اختر تنسيق شرطي....ثم اختر الدالة هي... format>>>conditional formating>>>formula is اكتب المعادلة التالية =COUNTIF($A$1:$A$1000;A1)>1 =COUNTIF($A$1:$A$1000;A1)>1 ثم اضغط زر تنسيق format واختر الألوان والتنسيقات التي تحلو لك اضغط موافق ثم موافق مرة أخرى دمت بخير أيسم إبراهيم

السلام عليكم الأخ الكريم أرفق ملف به نموذج لبياناتك و ما تريد( بعد ضغط المف ) يساعدك الجميع إن شاء الله

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

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

السلام عليكم تفضل أخي الكريم المرفق به ما طلبت ولكن لا تنسى قبل إغلاق ملفك بعد تطبيق الكود عليه أن تظهر القوائم لأنك لو تركتها مخفية سيتم تطبيق الإخفاء على كل ملفات الإكسيل التي ستفتحها. دمت بخير أيسم إبراهيم menus barاحفاء ال.rar

السلام عليكم جميعا شكرا للجميع على المرور الطيب و الدعوات الجميلة جعل الله لنا منها نصيبا و إياكم أجمعين دمتم بخير أيسم إبراهيم

السلام عليكم أخي مجدي عادة عند العمل في الكنترول و عند وضع السري نقوم بعمل " مفتاح السري" على هيئة مجموعات رقمية" من ... إلى ... " ما رأيك في دالة تستخرج الرقم السري لكل رقم جلوس على حدة من مفتاح السري الذي هو على هيئة مجموعات رقمية ؟؟؟؟ دون الحاجة إلى كل ما طلبت الفكرة بها الكثير من تسهيل العمل جرب المرفق الرقم السرى.zip

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

السلام عليكم الأخ الكريم لفتح محرر الأكواد اضغط من لوحة المفاتيح Alt+F11 ستظهر لك صفحة بيضاء قم بلصق الكود بها دمت بخير أيسم إبراهيم

السلام عليكم الأخ الكريم أبو هتون تفضل المرفق به ما طلبت إن شاء الله ورسالة التنبيه صوت وصورة دمت بخير أيسم إبراهيم رسالة تنبيه الغائبون.rar

السلام عليكم أخي الكريم هذا حل جديد لو كنت تريد أن تستخدم رمز الغياب ( غ ) استخدم الدالة التالية =SUMPRODUCT((C3:C21="ذكر")*(D3:D21="غ")) مرفق ملف دمت بخير أيسم إبراهيم عدد البنون الغائبون.rar

السلام عليكم يمكنك أخي الكريم أن تستخدم التنسيق الشرطي لعمل ذلك من قائمة تنسيق..تنسيق شرطي..أكبر من 5 ثم اختر اللون و التنسيق الذي يحلو لك ملحوظة : التنبيه هنا يكون بتلوين الخلية و ليس برسالة

السلام عليكم وهذا حل آخر على ملفك عدد البنون الغائبون.rar

السلام عليكم تفضل المرفق به ما طلبت على السريع على ملف جهزته لك قبل إرفاق ملفك غ.rar

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

السلام عليكم الأخ الكريم تفضل المرفق به ما طلبت إن شاء الله للأمانة المعادلة منقولة =VLOOKUP(F3;$A$3:$D$12;3;1)+(F3-VLOOKUP(F3;$A$3:$D$12;1;1)) المرفق منفذ به الحل وعملت المعادلة في نفس صفحة الرقم السري لتتأكد من الأرقام بنفسك دمت بخير أيسم إبراهيم الرقم السرى.rar

السلام عليكم الأخ الكريم ابن بنها العزيز جزاك الله خيرا . عمل رائع من أول وهلة أما بعد التجربة فلكل مقام مقال. هل أنت الأستاذ : مجاهد xp أم العمل عمل الأستاذ مجاهد أم عملك أنت؟ السؤال فقط للتعارف لأني من بنها أيضا دمت بكل الخير أيسم إبراهيم

السلام عليكم جرب المرفق أخي الكريم 1.rar

<FONT face="Times New Roman"><FONT size=5><FONT color=#9932cc>السلام عليكم جميعا حياكم الله بالسلام في دار السلام الأستاذ هشام: المعادلة ليست معادلة للترتيب بعد الفرز و إنما هي حيلة عملتها ليقوم الكود بالفرز بناءا على اللون الأخ الكريم : .x8 ما مدلول b