اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

أ / محمد صالح

أوفيسنا
  • Posts

    4,357
  • تاريخ الانضمام

  • Days Won

    185

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

  1. كلنا إيجابيون بدرجة وسلبيون بدرجة وتختلف الحالة من وقت إلى آخر ولكن السعيد من يلجأ إلى الله ويبتعد عن السلبية ويكفي لرفع الهمم ألا إن سلعة الله غالية
  2. بسم الله والصلاة والسلام على رسول الله كل عام أنت جميعا بكل خير أحبابي في الله تم تحديث الملف وإضافة التعريفة الجديدة السارية من أول يوليو 2018 وفقنا الله جميعا لكل خير تم إضافة التعريفة الجديدة من أول يوليو 2018 وتعديل الرسوم والدمغة وتم إضافة نسخة من الملف تعمل على أكسس 2003
  3. بسم الله والصلاة والسلام على رسول الله كل عام أنت جميعا بكل خير أحبابي في الله تم تحديث الملف وإضافة التعريفة الجديدة السارية من أول يوليو 2018 وفقنا الله جميعا لكل خير
  4. ربما يشتبه الأمر على البعض الأداة الموجودة في المشاركة الأولى وتحديثها يقومان بفك كلمات المرور لشيتات الإكسل التي نقوم بها من أجل حماية المعادلات والتنسيقات من تبويب مراجعة --> حماية ورقة العمل Review --> protect sheet ولا تقوم بفك كلمات الفتح أو محرر الفيجوال بيسك فقد تطرق لهذا الأمر الكثير من الأصدقاء في موضوعات كثيرة في هذا الصرح الكبير أوفيسنا شكرا لكل من مر على هذا الموضوع نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  5. تفضل أخي الكريم @ابو زاهر نفس الكود السابق فقط كان يحتاج لتطويع حسب الملف المرفق جرب تعديل الشرط الأخير في الكود إلى 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 للحصول على آخر تاريخ تم إدخاله
  6. الأخ الكريم @ابو زاهر المرفق لا يحتوي على نماذج يستعمل فيها الوحدة النمطية لذا أي اقتراح سيكون بدون تجربة وعلى حسب فهمي المتواضع للمطلوب جرب تعديل الشرط الأخير في الكود إلى 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
  7. بعد إذن أخينا العزيز شيفان يمكنك استعمال هذا الاستعلام SELECT B FROM Tab1 WHERE B NOT IN(SELECT A FROM tab1);
  8. كل عام وحضرتك بخير وسعادة ورضا ياريت توضح أي جزء من الكود غامض بالنسبة لك حتى يتم توضيحه أكثر
  9. شكرا لك أخي الكريم فعلا هذا الموقع أول موقع قام بهذه المهمة لكني أفضل thunkable
  10. إلى كل أحبابي في الله الطلبة والطالبات والمعلمين والمعلمات واولياء الأمور يسعدني أن أقدم الحل الأمثل لحفظ كلمات الإنجليزية English vocabulary وذلك بمناسبة شهر رمضان المبارك أعاده الله علينا جميعا بالخير والبركات. هذه أكبر مشكلة تواجهنا في تعلم اللغات الأجنبية، ولكن بفضل الله مع هذا التطبيق، أصبح تعلم اللغة الإنجليزية متعة. وذلك بشهادة كل من جربه من الطلاب والمعلمين وأولياء الأمور. والحل في برمجة تطبيق يعمل على الموبايلات بنظام أندرويد وهو أول تطبيق لي يعتمد على قواعد البيانات بانتظار آرائكم وتعليقاتكم الحل الأمثل لحفظ كلمات الإنجليزية English vocabulary الجميل في الموضوع أن التطبيق يحتوي على قواميس لجميع الصفوف في المرحلة الابتدائية: الصف الأول الابتدائي الصف الثاني الابتدائي الصف الثالث الابتدائي الصف الرابع الابتدائي الصف الخامس الابتدائي الصف السادس الابتدائي تابع معي مميزات التطبيق من مميزات تطبيق English4primary سهل الاستخدام واجهة رسومية مناسبة لجميع الأعمال يعمل على جميع الأجهزة بنظام أندرويد Android يعمل بنظام اختبارات الاختيار من متعدد وكذلك كتابة الكلمة كاملة (للمستوى المتقدم) يمكن السؤال عن الكلمة باللغة العربية والاختيارات انجليزية أو العكس (السؤال بالانجليزية والاحتيارات باللغة العربية) وهذه الصورة تشرح استخدامات الأزرار والمكونات الموجودة في شاشة التطبيق وغيرها الكثير من المميزات اكتشفها بنفسك والآن مع رابط تحميل التطبيق اضغط هنا أو هنا أو من المرفقات وفي الأخير لا ينقصن سوى دعاؤكم لوالدي بالرحمة والمغفرة ولنا جميعا بالخير في الدنيا والآخرة ومشاركة هذه الصفحة مع جميع أصدقائكم انتظرونا فالقادم أفضل بإذن الله في رعاية الله وحفظه ولا تنس تقييم المنشور English4primary.rar
  11. فكرة رائعة وخصوصا عرض تواريخ الأعوام الكبيسة 29 فبراير بين السنتين ولإثراء الموضوع هذه معادلة كنت قد صممتها لهذا الغرض وهي ليست معادلة صفيف =DATE(A3,1,1)-DATE(A2,1,1)-(A3-A2)*365+IF(MONTH(DATE(A3,2,29))=2,1,0) وفكرتها بسيطة جدا نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  12. ما شاء الله لا فض فوك أخي الكريم @أبو آدم ذوق رفيع وأدب جم ينقص الكثير منا سواء السائل أو المجيب ومن ابتغى بكل عمله وجه الله فلا المديح يزيده شيئا (رغم أنه مطلوب كنوع من التقدير لمن أسدى معروفا) ولا الذم ينقصه شيئا (رغم أنه مطلوب بنية تصحيح المسار حال الخطأ) نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا ورزقنا حسن الخلق والخلقة
  13. الأخ الفاضل @ebnjabalapp لعلك تكون وصلت لسبب المشكلات التي تحدث معك بعد مشاهدة الفيديو وأين تعديلاتك على الكود بما يتناسب مع الأفكار السابقة من حضرتك فهي أفكار رائعة حقا لا تبخل علينا بها
  14. تفضل أخي الكود بالمرفقات وفقنا الله جميعا لكل خير mas_ar_n2t_utf.rar
  15. عليكم السلام أخي بن علية فكرة رائعة ويمكن اختصار المعادلة قليلا إلى =F6/(HOUR(E6)+MINUTE(E6)/60) وفقنا الله جميعا لكل ما يحب ويرضى
  16. يمكنك أن تضع في الحلية G6 المعادلة الآتية =F6/HOUR(E6) وتغيير تنسيق الحلية إلى رقم وإنقاص المنازل العشرية decrease decimal إلى رقمين ليصبح الناتج 1.54
  17. أخي الكريم @مصطفى شاهين إن شاء الله المعادلة سهلة وكل شيء ممكن لكن عندما يتم رفع الملف بطريقة صحيحة أضم صوتي لصوت أخي @احمدزمان الملف تالف وحجمه صفر
  18. رغم إني مش عارف قصدك ايه لكن شكرا لمجرد مرورك على مواضيعي المتواضعة وفقنا الله جميعا لكل ما يحب ويرضى
  19. فكرة رائعة والحمد لله ساهمت في نقل الموضوعات التي لا تحتوي على استفسار إلى منتدى شروح الباور بوينت وسنظل نتعاون جميعا حتى نتمكن من فرز جميع الموضوعات وفقنا الله جميعا لكل خير
  20. تم تحديث الموضوع وإضافة طريقة أخرى وشرحها بالفيديو نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  21. جزانا الله جميعا خيرا ونفع بنا شكرا لمروركم العطر أستاذ أحمد فعلا ما الحب إلا للحبيب الأول وهذا الملف لأحبابنا للمتمسكين بالحبيب الأول نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
  22. شكرا لمروركم العطر استاذ علي نفعنا الله جميعا بما علمنا وعلمنا ما ينفعنا
×
×
  • اضف...

Important Information