اذهب الي المحتوي

أ / محمد صالح

أوفيسنا
  • Content count

    1,865
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    32

أ / محمد صالح last won the day on February 11

أ / محمد صالح had the most liked content!

السمعه بالموقع

662 Excellent

عن العضو أ / محمد صالح

  • الرتبه
    فريق الموقع
  • تاريخ الميلاد 01 ينا, 1977

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    معلم أول لغة عربية
  • بلد الإقامة
    مصر - البحيرة - إيتاي البارود
  • الإهتمامات
    برمجة الاكسيس و الفيجوال بيزيك و الاكسيل والموقع

وسائل التواصل

  • MSN
    ostaz_mas@hotmail.com
  • Website URL
    http://a1.comze.com
  • Yahoo
    ostaz_mas
  • Skype
    ostaz_mas

اخر الزوار

4,746 زياره للملف الشخصي
  1. ربما يشتبه الأمر على البعض الأداة الموجودة في المشاركة الأولى وتحديثها يقومان بفك كلمات المرور لشيتات الإكسل التي نقوم بها من أجل حماية المعادلات والتنسيقات من تبويب مراجعة --> حماية ورقة العمل Review --> protect sheet ولا تقوم بفك كلمات الفتح أو محرر الفيجوال بيسك فقد تطرق لهذا الأمر الكثير من الأصدقاء في موضوعات كثيرة في هذا الصرح الكبير أوفيسنا شكرا لكل من مر على هذا الموضوع نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  2. أ / محمد صالح

    تعديل وحده نمطيه_ ترقيم جديد كل سنة

    تفضل أخي الكريم @ابو زاهر نفس الكود السابق فقط كان يحتاج لتطويع حسب الملف المرفق جرب تعديل الشرط الأخير في الكود إلى Else If Year(Date) > Year(DMax("[Atarih]", "AfwtIar")) Then Next_Seq = 0 Else Next_Seq = Nz(DMax("Mid([Rjmfatwra], 2)", "AfwtIar", "Mid([Rjmfatwra], 1, 1) = '" & t & "'"), 0) End If Next_Seq = t & Format(Next_Seq + 1, "0000000") End If يمكن استعمال dmax للحصول على أكبر (أحدث) تاريخ أو استعمال dlast للحصول على آخر تاريخ تم إدخاله
  3. أ / محمد صالح

    تعديل وحده نمطيه_ ترقيم جديد كل سنة

    الأخ الكريم @ابو زاهر المرفق لا يحتوي على نماذج يستعمل فيها الوحدة النمطية لذا أي اقتراح سيكون بدون تجربة وعلى حسب فهمي المتواضع للمطلوب جرب تعديل الشرط الأخير في الكود إلى Else If Year(Date) > Year(Date - 1) Then Next_Seq = 0 Else Next_Seq = Nz(DMax("Mid([Rjmfatwra], 2)", "AfwtIar", "Mid([Rjmfatwra], 1, 1) = '" & t & "'"), 0) End If Next_Seq = t & Format(Next_Seq + 1, "0000000") End If
  4. بعد إذن أخينا العزيز شيفان يمكنك استعمال هذا الاستعلام SELECT B FROM Tab1 WHERE B NOT IN(SELECT A FROM tab1);
  5. كل عام وحضرتك بخير وسعادة ورضا ياريت توضح أي جزء من الكود غامض بالنسبة لك حتى يتم توضيحه أكثر
  6. شكرا لك في رأيي thunkable أفضل لأنه بدا من حيث انتهى appinventor
  7. أ / محمد صالح

    app inventor2

    شكرا لك أخي الكريم فعلا هذا الموقع أول موقع قام بهذه المهمة لكني أفضل thunkable
  8. إلى كل أحبابي في الله الطلبة والطالبات والمعلمين والمعلمات واولياء الأمور يسعدني أن أقدم الحل الأمثل لحفظ كلمات الإنجليزية English vocabulary وذلك بمناسبة شهر رمضان المبارك أعاده الله علينا جميعا بالخير والبركات. هذه أكبر مشكلة تواجهنا في تعلم اللغات الأجنبية، ولكن بفضل الله مع هذا التطبيق، أصبح تعلم اللغة الإنجليزية متعة. وذلك بشهادة كل من جربه من الطلاب والمعلمين وأولياء الأمور. والحل في برمجة تطبيق يعمل على الموبايلات بنظام أندرويد وهو أول تطبيق لي يعتمد على قواعد البيانات بانتظار آرائكم وتعليقاتكم الحل الأمثل لحفظ كلمات الإنجليزية English vocabulary الجميل في الموضوع أن التطبيق يحتوي على قواميس لجميع الصفوف في المرحلة الابتدائية: الصف الأول الابتدائي الصف الثاني الابتدائي الصف الثالث الابتدائي الصف الرابع الابتدائي الصف الخامس الابتدائي الصف السادس الابتدائي تابع معي مميزات التطبيق من مميزات تطبيق English4primary سهل الاستخدام واجهة رسومية مناسبة لجميع الأعمال يعمل على جميع الأجهزة بنظام أندرويد Android يعمل بنظام اختبارات الاختيار من متعدد وكذلك كتابة الكلمة كاملة (للمستوى المتقدم) يمكن السؤال عن الكلمة باللغة العربية والاختيارات انجليزية أو العكس (السؤال بالانجليزية والاحتيارات باللغة العربية) وهذه الصورة تشرح استخدامات الأزرار والمكونات الموجودة في شاشة التطبيق وغيرها الكثير من المميزات اكتشفها بنفسك والآن مع رابط تحميل التطبيق اضغط هنا أو من المرفقات وفي الأخير لا ينقصن سوى دعاؤكم لوالدي بالرحمة والمغفرة ولنا جميعا بالخير في الدنيا والآخرة ومشاركة هذه الصفحة مع جميع أصدقائكم انتظرونا فالقادم أفضل بإذن الله في رعاية الله وحفظه ولا تنس تقييم المنشور English4primary.rar
  9. أ / محمد صالح

    السنوات الكبيسة بين عامين

    فكرة رائعة وخصوصا عرض تواريخ الأعوام الكبيسة 29 فبراير بين السنتين ولإثراء الموضوع هذه معادلة كنت قد صممتها لهذا الغرض وهي ليست معادلة صفيف =DATE(A3,1,1)-DATE(A2,1,1)-(A3-A2)*365+IF(MONTH(DATE(A3,2,29))=2,1,0) وفكرتها بسيطة جدا نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  10. أ / محمد صالح

    تصريح وبيان / شخصي

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

    دالة التفقيط العربي الصحيحة

    تفضل أخي الكود بالمرفقات وفقنا الله جميعا لكل خير mas_ar_n2t_utf.rar
  13. عليكم السلام أخي بن علية فكرة رائعة ويمكن اختصار المعادلة قليلا إلى =F6/(HOUR(E6)+MINUTE(E6)/60) وفقنا الله جميعا لكل ما يحب ويرضى
  14. شكرا لكلماتكم العطرة أستاذ طارق
  15. يمكنك أن تضع في الحلية G6 المعادلة الآتية =F6/HOUR(E6) وتغيير تنسيق الحلية إلى رقم وإنقاص المنازل العشرية decrease decimal إلى رقمين ليصبح الناتج 1.54
×