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

كل الانشطه

هذه الصفحة تحدث تلقائياً

  1. الساعة الأخيرة
  2. Bshar
    اوك فوووكش رح اجرب ،، انا عملت زر الفلتره في عامود الرصيد بس صار يخربط الارصده مع الاسماء بجانب الرصيد ، رح جرب طريقتك اخوي الغالي فووووووووكش
  3. Foksh started following اريد ضبط هذة المعادلة و مساعدة في فرز
  4. Foksh
    مهو انا جاوبتك قبل ما ترد علي بهذه النقطة .. انقل الملف على الكمبيوتر وحدد وانقر Ctrl+T بس لمرة وحدة في حياتك 😅 . وبعدها رجعه على الموبايل .. وجرب 😇 . وعلى فكرة انا ما جربتها ، لكن هي كفكرة خطرت ببالي
  5. Foksh
    ملاحظتك صحيحة أخي وأستاذنا عبدالله ، جزاك الله خيراً على ذكرها . ولكني حين قمت بالتطبيق ارتأيت وبما أنه العمود M هو معادلة مقرونة برقم الصف فلم ألتفت لها ، ولم ألق لها بالاً -رغم تجربتي لها- ولكن لا يضر أن نقوم بالتصويب ..
  6. Bshar
    اشكرك مرورك كل الشكر اخي @hegazee انا اريد عندما اقوم بالتحديد والفرز ان يتم الفرز للصف كامل بحيث كل اسم لا يتغير رصيده برصيد اسم اخر
  7. Bshar
    ههههههههههه @Fokshهلا فوووووكش منور هووون وهناك وبجميع المواقع ياقلب ،، مابقدر اضغط Ctrl + T لانه بتسخدم الكشف على الهاتف
  8. عبدالله بشير عبدالله
    مغلمنا Foksh الفاضل جزاك الله خيرا مع ملاحظة ان النطاق للفرز الى .SetRange ws.Range("A1:M" & lastRow) وليس .SetRange ws.Range("A1:L" & lastRow) كما ارجو تعديل التقديرات حسب فهمي لتقسيم التقديرات من الملف ان تكون التقديرات هكذا لك كل التقدير والاحترام Select Case Cell.Value Case Is >= 92 Cell.Offset(0, -1).Value = "ممتاز مع مرتبة الشرف" Case Is >= 90 Cell.Offset(0, -1).Value = "ممتاز" Case Is >= 85 Cell.Offset(0, -1).Value = "جيد جداً مع مرتبة الشرف" Case Is >= 75 Cell.Offset(0, -1).Value = "جيد جداً" Case Is >= 65 Cell.Offset(0, -1).Value = "جيد" Case Is >= 50 Cell.Offset(0, -1).Value = "مقبول" Case Else Cell.Offset(0, -1).Value = "مقبول س" End Select
  9. Foksh
    أهلاً أخي بشااااروو ... انت هنا وهناك 😅 جرب حدد الجدول من الخلية B2 إلى C16 على سبيل المثال .. واضغط Ctrl + T ثم انتر .. وبعدها انقل الملف الى الجوال وستتمكن من الفرز من خلال الأسهم بشكل تلقائي حسبما تريد
  10. Today
  11. Foksh
    وعليكم السلام ورحمة الله وبركاته ، مشاركة مع أخي حجازي ، جرب أن تقوم بتعديل أي نسبة مئوية وراقب الترتيب والفرز هل هو صحيح ومضبوط كما تريد ؟؟ SortBy2Way.xlsm وهذا حل آخر باستخدام ماكرو أكثر وضوح ويدعم معك التراجع على عكس الحل السابق الأول 😅 لابلبلبلبلبلب.xlsm
  12. hegazee
    كيف يتم ادراج التقدير تلقائيا و لانعرف هل هذا التقدير يستحق مرتبة شرف أم لا؟
  13. hegazee
    تفضل كشف (2)حساب.xlsx
  14. egymina2012 started following اريد ضبط هذة المعادلة
  15. egymina2012
    في هذا الشيت اريد ضبط الترتيب الصفوف وفقا للنسبة المئوية وفي حال ان تكون النسبة متشابهة يتم الترتيب وفقا للحروف الابجدية بحيث عند كتابة اي صف جديد فور الانتهاء من كتابتة يتم ادراجة وفقا للنسبة الخاصة بة والتسلسل الخاص بة في الترتيب كذلك عند ادارج النسبة يتم اداراج التقدير تلقائيا لابلبلبلبلبلب.xlsx
  16. egymina2012
    egymina2012 joined the community
  17. Moosak
    شكرا لجمال روحك أيها النقي 😊🌷 تعمل بكل كفاءة ما شاء الله 😎👌⭐
  18. أحمد العيسى
    بعد هذا النقاش المثمر بين المحترفين ( لم ألاحظ غير حبايبنا ) فى هذا الموضوع أقترح لكي تعم الفائدة على الجميع : عمل شرح مبسط على اليوتيوب بكل جوانب ما تم ذكره هنا (بالتفصيل) من خلال مثال .. مع شكري وتقديري لك
  19. Yesterday
  20. Foksh
    مزيد من المعلومات حول ""
    أهلاً أخي الكريم ،، لم أفهم ما علاقة التحزيم وإنشاء ملف تثبيت بمراجعة بيانات القاعدة الخلفية ؟؟؟ وحتى ربط جهاز آخر بالقاعدة الخلفية ، فهي نفس المبدأ الذي ربطت به القاعدة الأولى ، لكن الذي يختلف معك هو مسار القاعدة الخلفية فقط .
  21. Bshar started following مساعدة في فرز
  22. Bshar
    السلام عليكم ،، عندي كشف حساب على الاكسل استخدمه على الهاتف ، اريد فرز الصفوف تنازلي بحيث ان يكون اعلى رصيد بالصف الاول والاقل ثاني والاقل وهكذا ، كل الاحترام والتقدير لخبراء الاكسل مرفق كشف حساب.xlsx
  23. ihsan19
    ihsan19 joined the community
  24. منتصر الانسي
    من جمال الفكرة قمت بتنفيذها مباشرة الآن أصبح بالإمكان تصدير الكائنات المطلوبة فقط لعمل الأداة مع التحقق لعدم تصديرها أكثر من مرة
  25. منتصر الانسي
    يااارجل أعتقد إنك لو نويت بتخرج بما لم يسبقك إليه أحد
  26. Foksh
    وااااااااو إبداع وتوظيف جميل وذكي ورائع فوق الخيار للأفكار .. وأنت هنا من أرفع له القبعة أخي منتصر جزاك الله خيراً لصبرك على 7299 سجل في الجدول المخصص للأيقونات . وحقيقة أنت قمت بتوظيف الفكرة التي تقاعست عن تنفيذها في أداة صانع القوائم المختصرة ، ولكن هنا أنت أعدت لي الحماس بالتنفيذ 😜
  27. منتصر الانسي
    والله كنت أتمنى يكون هذا النموذج من تصميمي فلا أخفيك أنني في البداية كنت قد قمت بتصميم نموذج قريب من هذا بشكل كبير ولكنه كان يعتمد على جدول يحتفظ بالصور داخله ولم تعجبني الفكرة فهذا سيتطلب إستيراد الجدول لتعمل الأداة وبعد البحث في مخزون الأمثلة لدي وجدت أحد الأمثلة الأجنبية الذي كان يتضمن هذا النموذج ولكنه كان يقوم بوظيفة أخرى وبطريقة مختلفة فقمت بإستغلاله والتعديل عليه بما يناسب الهدف المطلوب هنا والحمدلله نجحت الفكرة التي كانت في بالي للطريقة التي أريد تنفيذ العمل بها عند فتح القالب ستجد الملاحظة هذه أسفل النموذج (تختفي الملاحظة عندما تكون Addin ولكنك طرحت فكرة جميلة سأحاول تنفيذها ولكني أرى أن الأفضل أن يتم ذلك عن طريق زر أمر وليس تلقائياً فقد يقوم الشخص بفتحها لمجرد الاطلاع عليها أو فتحها عن طريق الخطأ وليس لاستخدامها
  28. Moosak
    فقط لدي ملحوظة بسيطة بعد التطبيق العملي .. 🙂 عند حفظ الأداة كإضافة للبرنامج .. وعند تطبيق الأكواد على قاعدة جديدة فإنها لا تعمل بسبب أنها لا تحتوي على الموديولين التابعين لها وهذا سيحوجك إلى استيرادهما من ملف القالب () ويعيدنا إلى نقطة الإنطلاق من البداية 😅 (بمعنى أنني لازلت محتاج يكون هذا الملف موجود جنبي) ! السؤال هو : هل يمكن إدراج الموديولين تلقائيا في القاعدة التي يتم استخدام الأداة فيها ؟
  29. Moosak
    الله .. الله .. الله أحييك أخي منتصر على الإضافات الأخيرة بصراحة شي خيال ما شاء الله تبارك الله .. 😇 وخصوصا نموذج الأيقونات عجيييييب ويختصر للمستخدم عملية البحث .. شي متعوب عليه فعلا .. بارك الله فيك .. سير ياشيخ الله يوفقك دنيا وآخرة يارب 🤲
  30. منتصر الانسي
    بمبادرة جميلة من الأخ @Foksh والذي تكرم بإضافة الوظيفة التي تسمح بإضافة الأيقونات لعناصر القائمة فله جزيل الشكر وجزاه الله خيراً فقمت بتعديل نموذج بناء صيغة كود إنشاء القائمة المختصرة للسماح بدمج هذه الوظيفة ضمن صيغة الكود كذلك تم إضافة العبارة Case Else في بناء صيغة الأمر لتجاوز أي مشكلة قد تحدث كما ذكر هنا وأخيراً وليس آخراً تم تصحيح الخطأ الذي ذكرة الأخ @Moosak في ملاحظته هذه أرجو أن تنال التعديلات إستحسانكم وفي إنتظار أي ملاحظات أو مقترحات إضافية (فكما ترون فإن لملاحظاتكم القيمة الأثر الكبير في تحسين الأداة) تحياتي للجميع
  31. عبدالله بشير عبدالله
    لا حول ولا قوة الا بالله الفاضل / أبو مسلم الحازم أشكرك أخي الكريم، ولكن وجب التنويه إلى أن الحل الصحيح والجهد الفعلي يعود للأخ [الاشتاذ أ / محمد صالح]، وما ردي إلا تأكيد لصحة كلامه فقط. أرجو ان تصحح الامر او من الإدارة أو المشرفين نقل اختيار «تمت الاجابة» إلى رده . مع جزيل الشكر لك وللجميع."
  32. عيسى2013 started following شرح عمل فورم المحاماة خطوة خطوة
  33. عيسى2013
    السلام عليكم ورحمة الله وبركاته اريد التواصل معك لدى فرورم واريد اضافة الاكواد عليه وللاسف لم استطيع هل ممكن مساعدتي لو تكرمت
  34. الاسبوع الماضي
  35. aboyasser
    aboyasser joined the community
  36. منتصر الانسي
    كلامك صحيح وفي محله ولكني أريد توضيح نقطة هنا من باب العلم بالشئ لا أكثر هذا ليس شرط في كل الحالات ولكنه سيكون كإجراء وقائي حتى نتأكد من أن لا يتم تنفيذ إجراء بغير قصد فمثلاً في المثال الأول في النسخة التوضيحية نلاحظ عدم حصول أي شيئ عند عدم تحديد أي عنصر في القائمة ولو عدنا للكود خلف زر الأمر سنجد عدم وجود عبارة Case Else Dim intResult As Integer intResult = GetOptions("نموذج إدخال البيانات" & _ ";نموذج تعديل البيانات" & _ ";نموذج إستعراض البيانات" & _ ";نموذج تحديد معايير تصفية التقارير") Select Case intResult Case Is = 1 DoCmd.OpenForm "frm01" Case Is = 2 DoCmd.OpenForm "frm02" Case Is = 3 DoCmd.OpenForm "frm03" Case Is = 4 DoCmd.OpenForm "frm04" End Select ولكن في المثال الثاني سنجد أنه سيتم تنفيذ إجراء لم يكن في الحسبان في هذه الحالة سيتطلب منا إضافة عبارة Case Else وعلى رأي المثل الوقاية خير من العلاج إن شاء الله سأقوم يإضافة هذا الأمر ضمن بناء صيغة الأمر بالإضافة إلى معالجة الملاحظة المقدمة من الأخ @Moosak وذلك في النسخة الجديدة التي أقوم فيها بإضافة الهدية القيمة المقدمة منك
  1. أظهر المزيد
×
×
  • اضف...

Important Information

  I accept