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

أ / محمد صالح

أوفيسنا
  • Posts

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

  • Days Won

    192

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

  1. عليكم السلام ربما يكون هذا المطلوب بالتوفيق نسبة المبيعات.xlsx
  2. في الخلية D14 يمكنك استعمال هذه المعادلة على اعتبار أن السنة 360 يكون العامان 720 =SUM(G9*360,F9*30,E9)/720 بالتوفيق
  3. ربما يفيد هذا الرابط ونتائج البحث عن الفرق بين تاريخين https://www.officena.net/ib/search/?q=الفرق بين تاريخين&quick=1&type=forums_topic&nodes=135&updated_after=any&sortby=relevancy&search_and_or=and بالتوفيق
  4. لها أكثر من حل يمكنك تجربب هذا keab.Text5.Value = CDate(keab.Text3.Value) + Int(keab.Text4.Value) - 1 بالتوفيق
  5. بارك الله فيك أداة رائعة ومجانية وهذا إصدار 4.03 وإليكم الإصدار الأحدث 4.21 بالتوفيق
  6. لا أدري لماذا لم توجد صراحة حالة كون الرقم 50 على العموم للتقريب لأقرب 100 يمكنك استعمال هذه المعادلة =mround(a2,100) على افتراض أن العدد المراد تقريبه في الخلية A2 ويمكن تغيير التقريب إلى أي رقم حتى لو رقم عشري بالتوفيق
  7. يمكنك وضع هذه المعادلة في H10 وسحبها يسارا =COUNTIFS($C$2:$C$10000,H$7,$F$2:$F$10000,"أنثى") وضع هذه المعادلة في H11 وسحبها يسارا =COUNTIFS($C$2:$C$10000,H$7,$F$2:$F$10000,"ذكر") وطبعا في H12 =SUM(H10:H11) بالتوفيق
  8. أعتقد لو رتبت ملفات المجلد حسب الاسم ستحصل على ما تريد الاسماء العربية قبل أو بعد اسماء الملفات الانجليزية وبعدها التحديد والنسخ بالتوفيق
  9. كمساهمة في وصولك للحل يمكنك استعمال هذه المعادلة في K6 سحبها لأسفل للحصول على مستمر وخرج وجديد =IF(AND(J6=2022,COUNTIF($B$6:$B$23,B6)=2),"مستمر",IF(AND(J6=2022,COUNTIF($B$6:$B$23,B6)=1),"خرج",IF(AND(J6=2023,COUNTIF($B$6:$B$23,B6)=1),"جديد",""))) بالتوفيق
  10. عليكم السلام لا توجد خاصية اسمها ارتفاع الصف الافتراضي لكن يمكنك التحايل للوصول للهدف ب استخدام نوع خط معين وحجم خط كبير نسبيا من ملف -- خيارت -- عام بالتزفيق
  11. يمكن تغيير المحاذاة لليمين لكن الوسط يمكن التحايل عليه بمسافة بعد النص لو المحاذاة يسار أو قبل النص لو المحاذاة يمين بالتوفيق
  12. التجربة خير دليل جرب واخبرنا بالنتيجة معك ورغم ذلك أعتقد أنه ممكن حسب سرعة الانترنت لدى المستخدمين
  13. إذا كان فهمي للمطلوب صحيحا يمكنك وضع نصوص هذه السطور في الرأس أو التذييل لهذا الشيت حتى يتم طباعتها في جميع الصفحات بالتوفيق
  14. آخر صف يتم حسابه على العمود A والصواب العمود B لأن A فارغ يمكنك تغيير هذا السطر lr = .Cells(.Rows.Count, "A").End(xlUp).Row إلى lr = .Cells(.Rows.Count, "B").End(xlUp).Row ولا يقوم الكود بحذف المصدر بالتوفيق
  15. ما الفائدة من إطالة الموضوع؟؟؟؟ لقد قدم الأخ أبو أحمد فكرة الحل بوضع معادلة تحدد الرقم الذي تكرر وذكرت أنا طريقة الحذف للصفوف التي بها رقم 1 أليس هذا هو المطلوب؟؟؟؟
  16. يجب حفظ الملف بامتداد يدعم الأكواد مثل xlsb أو xlsm
  17. ربما يكون هذا هو المطلوب بالتوفيق test1.xlsx
  18. جرب تشغيل هذا الكود في كل الشيتات Sub Clear_All_Filters() On Error Resume Next ActiveSheet.ShowAllData On Error GoTo 0 End Sub بالتوفيق
  19. الملف يحتاج إلى تثبيت برنامج Adobe Acrobat يكون مثبتا على الجهاز بالتوفيق
  20. أعتقد يجب إضافة عمود العدد المتاح من كل سلعة حتى لا يتم تجاوزه
  21. يمكنك البحث في جوجل عن aopr
  22. ربما يرجع اختلاف الحل المقدم من الأخ الفاضل @محمد هشام. بسبب اختلاف فهم المطلوب أعتقد أن المطلوب * إن كان الاسم الموجود في ( أ) موجود في (ب) يتم كتابة نفس الاسم / وإذا لم يكن موجودا في (ب) يتم ترك الخلية أمامه فارغة (وهذا تم تنفيذه) * إن كان الاسم الموجود في (ب) غير موجود في (أ) يتم كتابة نفس الاسم من (ب) ويتم ترك الخلية أمامه في (أ) فارغة (وهذا لم يتم تنفيذه) بالتوفيق للجميع
×
×
  • اضف...

Important Information