اذهب الي المحتوي
أوفيسنا

أ / محمد صالح

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    4,444

  • تاريخ الانضمام

  • Days Won

    192

 نوع المحتوي 

كل منشورات العضو أ / محمد صالح

  1. أ / محمد صالح
    تفضل أخي الكريم @ابو زاهر نفس الكود السابق فقط كان يحتاج لتطويع حسب الملف المرفق جرب تعديل الشرط الأخير في الكود إلى 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 للحصول على آخر تاريخ تم إدخاله
  2. أ / محمد صالح
    الأخ الكريم @ابو زاهر المرفق لا يحتوي على نماذج يستعمل فيها الوحدة النمطية لذا أي اقتراح سيكون بدون تجربة وعلى حسب فهمي المتواضع للمطلوب جرب تعديل الشرط الأخير في الكود إلى 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
  3. أ / محمد صالح
    بعد إذن أخينا العزيز شيفان يمكنك استعمال هذا الاستعلام SELECT B FROM Tab1 WHERE B NOT IN(SELECT A FROM tab1);
  4. أ / محمد صالح
    كل عام وحضرتك بخير وسعادة ورضا ياريت توضح أي جزء من الكود غامض بالنسبة لك حتى يتم توضيحه أكثر
  5. أ / محمد صالح
    إلى كل أحبابي في الله الطلبة والطالبات والمعلمين والمعلمات واولياء الأمور يسعدني أن أقدم الحل الأمثل لحفظ كلمات الإنجليزية English vocabulary وذلك بمناسبة شهر رمضان المبارك أعاده الله علينا جميعا بالخير والبركات. هذه أكبر مشكلة تواجهنا في تعلم اللغات الأجنبية، ولكن بفضل الله مع هذا التطبيق، أصبح تعلم اللغة الإنجليزية متعة. وذلك بشهادة كل من جربه من الطلاب والمعلمين وأولياء الأمور. والحل في برمجة تطبيق يعمل على الموبايلات بنظام أندرويد وهو أول تطبيق لي يعتمد على قواعد البيانات بانتظار آرائكم وتعليقاتكم الحل الأمثل لحفظ كلمات الإنجليزية English vocabulary الجميل في الموضوع أن التطبيق يحتوي على قواميس لجميع الصفوف في المرحلة الابتدائية: الصف الأول الابتدائي الصف الثاني الابتدائي الصف الثالث الابتدائي الصف الرابع الابتدائي الصف الخامس الابتدائي الصف السادس الابتدائي تابع معي مميزات التطبيق من مميزات تطبيق English4primary سهل الاستخدام واجهة رسومية مناسبة لجميع الأعمال يعمل على جميع الأجهزة بنظام أندرويد Android يعمل بنظام اختبارات الاختيار من متعدد وكذلك كتابة الكلمة كاملة (للمستوى المتقدم) يمكن السؤال عن الكلمة باللغة العربية والاختيارات انجليزية أو العكس (السؤال بالانجليزية والاحتيارات باللغة العربية) وهذه الصورة تشرح استخدامات الأزرار والمكونات الموجودة في شاشة التطبيق وغيرها الكثير من المميزات اكتشفها بنفسك والآن مع رابط تحميل التطبيق اضغط هنا أو هنا أو من المرفقات وفي الأخير لا ينقصن سوى دعاؤكم لوالدي بالرحمة والمغفرة ولنا جميعا بالخير في الدنيا والآخرة ومشاركة هذه الصفحة مع جميع أصدقائكم انتظرونا فالقادم أفضل بإذن الله في رعاية الله وحفظه ولا تنس تقييم المنشور English4primary.rar
  6. أ / محمد صالح
    فكرة رائعة وخصوصا عرض تواريخ الأعوام الكبيسة 29 فبراير بين السنتين ولإثراء الموضوع هذه معادلة كنت قد صممتها لهذا الغرض وهي ليست معادلة صفيف =DATE(A3,1,1)-DATE(A2,1,1)-(A3-A2)*365+IF(MONTH(DATE(A3,2,29))=2,1,0) وفكرتها بسيطة جدا نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  7. أ / محمد صالح
    ما شاء الله لا فض فوك أخي الكريم @أبو آدم ذوق رفيع وأدب جم ينقص الكثير منا سواء السائل أو المجيب ومن ابتغى بكل عمله وجه الله فلا المديح يزيده شيئا (رغم أنه مطلوب كنوع من التقدير لمن أسدى معروفا) ولا الذم ينقصه شيئا (رغم أنه مطلوب بنية تصحيح المسار حال الخطأ) نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا ورزقنا حسن الخلق والخلقة
  8. أ / محمد صالح
    مزيد من المعلومات حول ""
    الأخ الفاضل @ebnjabalapp لعلك تكون وصلت لسبب المشكلات التي تحدث معك بعد مشاهدة الفيديو وأين تعديلاتك على الكود بما يتناسب مع الأفكار السابقة من حضرتك فهي أفكار رائعة حقا لا تبخل علينا بها
  9. أ / محمد صالح
    تفضل أخي الكود بالمرفقات وفقنا الله جميعا لكل خير mas_ar_n2t_utf.rar
  10. أ / محمد صالح
    عليكم السلام أخي بن علية فكرة رائعة ويمكن اختصار المعادلة قليلا إلى =F6/(HOUR(E6)+MINUTE(E6)/60) وفقنا الله جميعا لكل ما يحب ويرضى
  11. أ / محمد صالح
    شكرا لكلماتكم العطرة أستاذ طارق
  12. أ / محمد صالح
    يمكنك أن تضع في الحلية G6 المعادلة الآتية =F6/HOUR(E6) وتغيير تنسيق الحلية إلى رقم وإنقاص المنازل العشرية decrease decimal إلى رقمين ليصبح الناتج 1.54
  13. أ / محمد صالح
    أخي الكريم @مصطفى شاهين إن شاء الله المعادلة سهلة وكل شيء ممكن لكن عندما يتم رفع الملف بطريقة صحيحة أضم صوتي لصوت أخي @احمدزمان الملف تالف وحجمه صفر
  14. أ / محمد صالح
    رغم إني مش عارف قصدك ايه لكن شكرا لمجرد مرورك على مواضيعي المتواضعة وفقنا الله جميعا لكل ما يحب ويرضى
  15. أ / محمد صالح
    فكرة رائعة والحمد لله ساهمت في نقل الموضوعات التي لا تحتوي على استفسار إلى منتدى شروح الباور بوينت وسنظل نتعاون جميعا حتى نتمكن من فرز جميع الموضوعات وفقنا الله جميعا لكل خير
  16. أ / محمد صالح
    تم تحديث الموضوع وإضافة طريقة أخرى وشرحها بالفيديو نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  17. أ / محمد صالح
    جزانا الله جميعا خيرا ونفع بنا شكرا لمروركم العطر أستاذ أحمد فعلا ما الحب إلا للحبيب الأول وهذا الملف لأحبابنا للمتمسكين بالحبيب الأول نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  18. أ / محمد صالح
    شكرا لكلماتك العطرة استاذ محمد هذا بعض ما عندكم
  19. أ / محمد صالح
    شكرا لمروركم العطر استاذ علي نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  20. أ / محمد صالح
    بسم الله الرحمن الرحيم، السلام عليكم ورحمة الله وبركاته، أسعد الله أوقاتكم من جديد، موعدنا اليوم مع معلومة مفيدة جدا ومتقدمة جدا، ومهمة جدا في نفس الوقت، ألا وهي تمتع بقوائم أوفيس 2003 في 2007 و 2010 و 2013 و 2016 Mas2003Menus فتابعونا. تمتع بقوائم أوفيس 2003 في 2007 و 2010 و 2013 و 2016 Mas2003Menus ربما يبدأ أحدنا بتعليم برنامج ميكروسوفت أوفيس سواء ميكروسوفت وورد أو باوربوينت أو ميكروسوفت إكسل ولكن يبدأ بتعلم إصدار قديم نسبيا وهو أوفيس 2003 وقد يجد صعوبة في الانتقال إلى الإصدارت الحديثة من ميكروسوفت أوفيس سواء 2007 أو 2010 أو 2013 أو 2016 أو 365 اليوم أحضر لكم الحل في صورة كود VBA ووظيفة إضافية Add-in كنت قد صممتها لهذا الغرض في 2010 وهي تقوم بإضافة قوائم أوفيس 2003 في تبويب جديد يسمى add-in في الشريط ribbon وبهذا نكون جمعنا بين الحسنيين تابعونا تعتمد آلية هذا الكود وهذه الوظيفة الإضافية على: إنشاء شريط قوائم في word أو excel أو power point ثم إضافة عناصر التحكم controls إليه وذلك بأبسط كود ممكن. ونتعرف أيضا على: كيفية إنشاء دالة معرفة UDF أو إجراء SUB كيفية تحويل ملف وورد أو إكسل أو باوربوينت إلى وظيفة إضافية مسار تخزين الوظائف الإضافية في نظام التشغيل كيفية تفعيل وظيفة إضافية كيفية إلغاء تفعيل وظيفة إضافية كيفية تنفيذ أمر معين عند تثبيت وظيفة إضافية كيفية تنفيذ أمر معين عند إلغاء تثبيت وظيفة إضافية كيفية تنفيذ أمر معين عند فتح عرض تقديمي كيفية تنفيذ أمر معين عند إغلاق عرض تقديمي والمزيد من المهارات في فيجوال بيسك للتطبيقات VBA ستجد بالملفات الكود وزر أمر ل عرض قوائم 2003 وزر أمر ل إخفاء قوائم 2003 اضغط هنا لتحميل الملفات المستعملة في عرض وإخفاء القوائم أو من المرفقات وهذا الفيديو يقوم بشرح الخطوات خطوة بخطوة step by step ويسعدني تلقي إجابة حضراتكم عن كيفية عمل الملف الموجود في آخر الفيديو الخاص بعرض قوائم 2003 في تبويب جديد قبل تبويب الصفحة الرئيسية home للمزيد زوروا ميكروسوفت إكسل Microsoft excel ولا ينقصني سوى دعاؤكم لي ولأهلي وأحبابي -وأنتم منهم- بخيري الدنيا والآخرة. ومشاركة الموضوع مع جميع أصدقائكم لو بخل بها غيرك ما وصلت إليك ولا تنس تقييم المنشور Mas_ShowHide2003Menus.rar
  21. أ / محمد صالح
    الحمد لله أن المشكلة قد حلت استاذ ناصر
  22. أ / محمد صالح
    شكرا لمروركم الكريم وفقنا الله جميعا لكل خير
  23. أ / محمد صالح
    شكرا لكل من مر على أول موضوع لي بالمنتدى ذكريات جميلة
  24. أ / محمد صالح
    شكرا لمروركم الكريم أستاذ @صقر قريش89 وأستاذ @زاكي بوشلاغم نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  25. أ / محمد صالح
    وفقنا الله جميعا لكل خير شكرا لكل من ساهم وشارك في هذا الموضوع المتواضع
×
×
  • اضف...

Important Information

  I accept