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

بسم الله الرحمان الرحيم السلام عليكم برنامج دليل الهاتف هذا ليس الاول الذي يطرح في المنتدى يعني الفكرة ليست جديدة لاكن ,,,,,,,,, المغزى من تصميمي لهذا البرنامج هو الجانب الجمالي اكثر منه الجانب التقني كما يعلم الجميع ان امكانيات VBA ليست بالكبيرة من ناحية التصام الخاصة بالفورم شخصيا سأمت من الفورمات والازرار الكلاسيكية مع هذا البرنامج ستكتشفون التقنية الازمة لجعل شكل الفورم مميز وجذاب الى اقصدى الحدود ا ابدأ اولا مع تعريف البرنامج جعلت الملف ملف Setup يثبت على الجهاز كأي برنامج بالطريقة المعروفة لدى الجميع بعد تثبيت البرنامج ستجد ايقونته على سطع المكتب واجهة البرنامج هذا هو الفورم الذي اتحدث عنه أولا لاضافة البيانات اضغذ على زر جديد ثم اختر مجموعة ثم املئ البيانات الازمة ومن صورة ادراج صورة اختر الصورة التي تريد اراجهاط حفظ ثانيا للتعديل ابحث عن بيانات الشخص التي تريد تعديلها بواسطة مربعات البحث حيث تتوفر اربع خيارات للبحث حسب الاسم او اللقب او الهاتف او البريد اما قائمة المجموعات تجلب لك جميع الاسماء المدرجة تحت المجموعة المختارة بعد ايجادك للبيانات التي تريد تعديلها اضغط عليها من اليست لكي تضهر البيانات في التكسات عدل ماتريد وكدالك يوجد امكانية تعديل الصورة بعد اتمامك التعديل اضغط حفظ ثالثا للحدث نفس الامر كما التعديل وانما اضغذ حذف رابعا اضافة او تعديل مجموعة لاتمام ذالك اضغط على الايقونة الجرارة بجانب ليست المجموعات ليضهر لك الفورم التالي لتعديل اضغط على المجموعة تضهر لك امبوبوكس اكتب الاسم الجديد ثم اوك للا ضافة اضغط اضافة تضهر امبوبوكس اكتب فيها اسم المجموعة الجديدة ثم اوك ولمن يسأل عن الطريقة للوصول الى هذا الشكل الامر بسيط اولا قم بتصميم واجهة البرنامج باي برنامج تجيده كالفوتو شوب مثلا شخصيا استعملت الاكسل في التصميم ثم اجعله كخلفية للفورم الخاص بك ومن اجل الحواف والانحناءات ,,,, شاهد هذا الموضوع حركة جديدة (اجعل الفورم يأخذ اي شكل تريده) ولتفعيل عجلت المواس كما هو في هذا البرنامج شاهد تفعيل عجلة الماوس في اليست بوكس و الكومبوبوكس يبقى الخاصية التي استعملتها مع الازرار وهي كالاتي اولا قم جميع بتصميم الازرار الازمة للبرنامج ثم ادرج ImageList في المشروع الذي تعمل عليه وخن جميع صور الازرار فيه وهذا الكود المستعمل لجعل Image تأخد الصورة التي نريد ان تأخذها Me.Image1.Picture = ImageList1.ListImages(1).Picture ملاحضة عندما تكون في وضع الفورم وتريد العودة الى ملف الاكسل اضغط Alt+B الرقم السري 1111 اترككم مع المرفق و ارجو ان لا أكون قد اطلت عليكم كما ارجو ان ينال البرنامج اعجابكم وتن تستفيدومنه ولاي استفسارات أنا في الخدمة تحياتي للجميع اخوكم في الله (شوقي ربيع) البرنامج بصيغة الملف التنفيذي Telephone book.rar البرنامج بدون صيغة الملف التنفيذي Telephone book Excel.rar نسخة متوافقة مع جميع انظمة التشغيل للاخوة التي ظهرت عندهم مشكلة مع البرنامج بتاريخ اليوم 2014/04/16م نسخة متوافقة لجميع نظم التشغيل.rar

السلام عليكم ورحمة الله وبركاته بعد الحمد لله والصلاة والسلام على رسول الله وبعد وبعد نزول الاصدارالثاني من [الاصدار الثاني]شيت كنترول النقل(للتعليم الفني) صنايع [انتظام][جميع التخصصات 14 مادة +2 لا تضاف] ها انا كما وعدكم بالاصدار الثالث من شيت كنترول ولكن هذه المرة بمميزات جديدة اهم المميزات 1 ) يصلح جميع المراحل الفنية ( زراعي وصناعي وتجاري) 2 ) يصلح لجميع التصصات للمرحلة حيث تستطيع ادخال 20 مادة + 2 مادة لا تضاف 3 ) ادخال بيانات التخصص ودرجات التخصص والمواد من قبل المستخدم والان اترككم للتصفح وانا في انتظار ارائكم والسلام عليكم ورحمة الله وبركاته للعلم جميع المعلومات عن هذه المرحلة وما يخصها من درجات والقرارات الوزارية ماخوذة من الاستاذ //ahmed alimer فله الشكر كما اشكر كل من ساهم في امدادي ببعض المعلومات ومنهم الوالدة الفاضلة // أم عبد الله الاستاذ الفاضل // اسامة عطاالله الاستاذ الفاضل // حسين شاكر وعند وجود اي أخطاء ارجو الابلاغ لتعديلها والسلام عليكم ورحمة الله وبركاته.. شيت النقل للتعليم الفني 20 مادة تضاف للمجموع + 2 مادة لا تضاف للمجموع _الاصدار الثالث.rar

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

السلام عليكم ورحمة الله وبركاته الاستاذ الفاضل وائل اتفضل الملف واتمني من الله ان يكون هذا طلبك تقبل تحياتي محققات سنوية_w.rar

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

وعليكم السلام ورحمة الله وبركاته استاذ // زيد رغم ان الملف لم يتضح مقصودك تماما ولكن تفضل قمت بعمل احصائية لمادة العربي لعدد الغياب وهي كالتالي بالنسبة للذكور =SUMPRODUCT((الشيت!L7:L200="ذكر")*(الشيت!S7:S200="غ")) وبالنسبة للاناث =SUMPRODUCT((الشيت!L7:L200="انثى")*(الشيت!S7:S200="غ")) احصاء_braa.rar

من أروع ما قرأت في موضوع رضا الناس هذه القصيدة التي لم أقف على صاحبها ولا حتى عنوانها ضحكتُ فقالوا ألا تحتشـم؟ ........ بكيت فقالوا ألا تبتسم؟ بسمت فقالوا يرائـــــــــي ........ عبست فقالوا بدا ما كتم صمتّ فقالوا كليل اللسان ........ نطقت فقالوا كثير الكلم حلمت فقالوا صنيع الجبان ........ ولو كان مقتدرا لانتقم بسلت فقالوا لطيشٍ بــــه ........ وما كان مجترئا لو حكم يقولون شـــذٌ إذا قلـــت لا ........ وإمّعةٌ حين وافقتـــــهم فأيقنتُ أني مهــــــما أُرِدْ ....... رضا الناس لابد من أن أُذَم طبعا هذا يخص الناس الذين ليس لهم همٌ سوى تتبع أخطاء الناس وإظهار أخطائهم حتى وإن لم يخطئوا أما باقي المعتدلين من الناس فيستسحنون الفعل الحسن ويستقبحون الفعل القبيح

السلام عليكم نموذج فواتير منوع (مبيعات /مشتروات/ مردوات المبيعات/مردودات المشتروات) بامكانية: الترحيل والبحث والتعديل وحذف الكل طلب للاخ تامر جمال جعلته هنا لفائدة الجمع الكريم ______________.rar

أخى الفاضل / عمل بسيط .. توزيع الطلاب على كشوف المناداة وأرقام الجلوس تصفح وشاهد .. قم بكتابة البيانات فى الخلايا الغير الملونة فى صفحات " بيانات أساسية / الطلبة / اللجنة " 1 - كشوف منادة تبعا للجان المحددة بالعددالمحدد. 2 - بطاقة لكل طالب كاملة بها كل بياناته . 3 - زر طباعة لكشوف المناداة وملصقات أرقام الجلوس . 2011 أرقام الجلوس والمناداة.rar

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

لدي قوائم مختلفة لدرجات الطالبات ولكن عنوان الدرجة مشتركة مثلا جميع القوائم فيها خانة بعنوان المشاركة وخانة بعنوان اختبارات قصيرة واخرى بعنوان الواجبات ...الخ واريد الدمج لاشعار طالبة حيث يوجد في جدول الاشعار 7 مواد وكلها تحتوي على نفس اسماء الخانات السابقة من اختبارات وواجبات وعند دمج المراسلات في الجدول المدرج في الوورد (الفارغ طبعا ) حتى ادمج ...وعند اختيار العنوان المطلوب ...مثلا الواجبات واختار من قائمة المادة المطلوبة درجة الواجبات وانقر في الجدول ...ثم اختار من قائمة مادة اخرى خانة الواجبات في نفس الجدول وعند انهاء الدمج تظهر لي الدرجة نفسها للمادة المدرجة الاخيرة . السؤال : كيف استطيع الدمج لقوائم مختلفة لها نفس العناوين في نفس الصفحة او الجدولبحيث تظهر لي الدرجات المرصدة في الاكسس لكل مادة على حدة ؟

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

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

ممكن ان تضعها 4 ليس هنا مشكلة هذا في حال حذف اي سطر ،يعود الكود ليفتش في كل الصفوف من جديد جرب ان تضع مباشرة بعد عبارة i=4 last=last-1 ممكن ان ذلك يسرع العملية بحيث ينقص عدد الصفوف /اذا حصل مشكلة يمكن حذف هذا الشيء

تم قبولي دعوتك الأخ الفاضل / وليد فتحي

السلام عليكم تفضل استاذ ابراهيم /الحل بسيط جداً مرفق التصحيح DEL 1.rar

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

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

نظراً الى ان دالات التاريخ في الأكسل معقدة بعض الشيء قمت بوضع هذا الملف لمن يهمه الأمر كل شيء عن التاريخ.rar

ولاثراء الموضوع اخي الكريم جرب الكود التالي ... يقوم باضافة التاريخ في العمود B اذا كان الخلية في العمود A ليست فارغة Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then If Target.Offset(0, 1) = "" Or Not IsNumeric(Target.Offset(0, 1).Value) Then Cells(Target.Row, 2) = Now() End If End If End Sub   شاهد المرفق 2003 Book1-sama.rar

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

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

تم بحمد الله صدور عدد أبريل2014 من مجلة اوفيسنا الدورية

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

تفضلي تم التعديل على النموذج آمل ان يحقق المطلوب المدرسة المتوسطة تم.rar

السلام عليكم ورحمة الله وبركاته اولا : احب اشكر الاستاذ // ahmed alimer على معاونته الكبيرة لاخراج هذا العمل بدون اخطاء ثانياً : بعتذر على وجود بعض الاخطاء والله اعلم بمدى الصعوبات لاخراج العمل في هذه الظروف التى انا فيها ولعل البعض يعلم بعض هذه الظروف ثالثا : هذا ملف مرفق لاصلاح هذه الاخطاء والله اسال ان تكون الاخيرة رابعا : اتمنى من المشرفين مشكورين ان يضعوا هذا الملف في المشاركة رقم 1 شيت النقل للتعليم الفني 20 مادة تضاف للمجموع + 2 مادة لا تضاف للمجموع _الاصدار الثالث-4-4-2014.rar

السلام عليكم ورحمة الله وبركاته الاستاذ الحبيب // اسامة عطاالله 1 ) بشكرك على كلامك وثنائك وكذلك مساهماتك لخدمة واثراء الموضوع 2 ) بالفعل الملف من المادة 9 الى 20 به خطا في ورقة نتيجة نصف العام وتم تعديلهم في الملف المرفق 3 ) واما بالنسبة لطريقة كتابة المواد فهي تكتب عادي في الخانات والباقي اتركه فارغ لا تكتب فيه شي ------------------------- واخيراً طلب للمشرفين اتمنى تبديل الملف المرفق في المشاركة الاولى بهذا المرفق وفقنا الله واياكم للخير شيت النقل للتعليم الفني 20 مادة تضاف للمجموع + 2 مادة لا تضاف للمجموع _الاصدار الثالث-3-4-2014.rar

أخى الكريم / ahmed alimer شكرا لكم .. وفقكم الله

السلام عليكم الاخ الكريم / hoorabie بارك الله فيك وجميل جدا ان تكون من اولي مشاركاتك هذه المشاركة الجميلة فعلا ملف جميل جزاك الله خيرا

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

السلام عليكم ابداع في ابداع استاذ عبدالله حفظك الله من كل شر وزادك علماً الى علمك تقبل مروري

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

أخى / ياسر الحافظ بارك الله فيك أخوكم جمال دغيدى

الرابط يعمل فقط أضغط على download