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

samycalls2020

03 عضو مميز
  • Posts

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

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

كل منشورات العضو samycalls2020

  1. السلام عليكم أ. محمد هشام في البداية كل التعازي والمواساة في مصابكم الجليل لك وللشعب المغربي الشقيق نسأل الله العلى القدير أن يتغمد من وافته المنية في هذا الزلزال بعظيم الرحمة والمغفرة وأن ينزلهم منازل الشهداء وأن ينعم ويتم الشفاء على المصابين .. آمين .. أتوجه بالشكر الجزيل على ما قدمته بهذا الصدد وعلى هذا الكود الرائع وعلى شرح محتواه .. دائماً نتعلم منك .. بارك الله فيكم ولكم وكل التحية والاحترام
  2. السلام عليكم اسمحوا لي بإضافة بسيطة وهى أن نجعل كود الفرز يعمل بشكل تلقائي بحيث يعمل تلقائياً عند الاختيار من قائمة عمود الفرز في D3 كل التحية الخزينة4 معدل.xlsb
  3. السلام عليكم تم الترتيب في J3 القائمة المنسدلة سوء كان أبجدي أو رقمي كما ذكرت سابقاً وتم تحديد مدى الفرز والتصفية ب 3352 صف ويمكن التغير حسب الطلب والحاجة وشكراً لكل من شارك وساعد الخزينة3 معدل.xlsb
  4. محاولة لتعديل الأمر الأول وهو الترتيب في J3 القائمة المنسدلة سوء كان أبجدي أو رقمي ويتبقى الأمر الثاني وهو تحديد مدى الفرز والتصفية .. جارى المحاولة وأتمنى المشاركة من الأخوة الكرام وشكراً لكل من شارك وسيشارك الخزينة2 معدل.xlsb
  5. السلام عليكم الأستاذ الفاضل محمد هشام قمت بتجريب المرفق وهو رائع سلمت يداك .. ويبقى هناك أمران .. الأول : وهو الترتيب في J3 القائمة المنسدلة سوء كان أبجدي أو رقمي وأتمنى أن يتم هذا الترتيب من خلال كود الفرز الموجود إن أمكن ذلك .. بدون معادلة صفيف أو غيرها لترتيب تصفية عمود AD نظراً لكبر حجم الملف الأصلي الموجود لدي . والثاني : أن يكون مدى الفرز والتصفية محدد من صف 12 الى صف 10012 إن أمكن ذلك أيضاً . وفقكم الله .. وكل الشكر
  6. أخي الكريم / أبو أحمد .. السلام عليكم كل التحية والتقدير لمجهودك الكبير . وإن كنت أتمنى أن يكون الحل من خلال التطبيق الموجود بالملف بمعنى من خلال اصلاح كود الفرز عموما اسمح لي في بعض الملاحظات من خلال تجربتي السريعة للعمل الذى قدمته ولك لكل تحية وشكر علية . * بداية عمود التصفية من صف 11 وشرط التصفية من صف 12 ويفضل أن يكون عمود التصفية بأسماء صف العناوين رقم6 وشرط التصفية من صف رقم7 أي بداية الجدول . * عدم وجود تسلسل رقمي وأبجدي بشرط التصفية . * تصفية الأرقام لا تعمل لأنها تظهر في شرط التصفية بدون علامة ( 0.00 ) من مائة ، وبالتالي تصفية عمود F وعمود H لا تعمل . * عمود التصفية يظهر به التاريخ الشهر قبل اليوم . * عند الضغط على عمود التصفية وشرط التصفية تتحول الأرقام والتواريخ الى العربية وعند ترك الضغط تعود للإنجليزية . * الأرقام تظهر في القائمتين والخاصة برصيد الخزينة بعمود L بكسر كبير والمفترض أن يكون أي رقم بكسر( 0.00 ) من مائة . تقبل تحياتي
  7. السلام عليكم الأخوة الكرام .. الموضوع خاص بفرز وتصفية أعمده في جدول كما في المرفق خزينة تجريبى.xlsb
  8. شكراً أ. محمد صالح على مشاركتك القيمة
  9. السلام عليكم ما أطلبه من حضراتكم هو تبديل كلمة "طب" في الماكرو واستبدالها بخلية H2 التي تحتوى على قائمة منسدلة بحيث يمكن تغير ما نبحث عنه , وطبعاً ما يترتب على ذلك من تعديل في الكود . وشكراً على تفضلكم بالمساعدة Sub بحث_وانتقال() If Intersect(ActiveCell, Range("C6:C45")) Is Nothing Then Range("C6").Select Range("C6:C45").Find("طب", ActiveCell, xlValues).Select End Sub الكليات 2022.xlsm
  10. شكراً أ. أبو أحمد .. على المشاركة ذكرت أن الأصح الرقم صاحب اللون الأزرق 80% بدون كسور ولكن من الممكن أن تكون نسبة الدرجات تحمل كسور السؤال هنا .. لماذا الأصح الرقم صاحب اللون الأزرق 80% وما سبب الفرق بين النتيجتين؟ شكراً
  11. السلام عليكم ما هي النسبة الأصح شهادة الثانوية العامة 2023م.xlsx
  12. بارك الله فيكم ولكم .. وكل الشكر والتقدير
  13. أ / إبراهيم .. تحياتي واحترامي دائماً سباق بالعطاء .. هناك ملاحظة أرجو مشاهدة المرفق بحث عن قيم3.xlsb
  14. السلام عليكم مطلوب معادلة للبحث عن مجموعة حسابات كما موضح فى المرفق وفقكم الله وسدد خطاكم بحث عن قيم.xlsb
  15. تم استخدام الكودين معاً فكرة لابأس بها . . شكرا يا أخي
  16. Private Sub Worksheet_Change(ByVal Target As Range) Range("M5:M17").Value = Range("G5:G17").Value End Sub بهذا التعديل يعمل الكود وبعدها يعطى رسالة
  17. يحدث النسخ عند الكتابة فى ورقة 1 هذا الخاص بالمعادلات وفى حالة الجزء الخاص بالكتابة المباشرة فى ورقة data من G5 TO G10 لا يحدث نسخ
  18. شكراً على الرد أ/حسونة لكن حاولت التطبيق على حقلين في عمودين مختلفين ليناسب الملف الذى يخصني فلم أوفق أرفقت طلبي بهذا الملف . وبارك الله فيكم Test2.xlsm
  19. الكود بزر Sub Test() Range("D2").Value = Range("A1").Value End Sub ممكن عمله بدون زر من فضلك
  20. أ / عبد الفتاح .. شكرا للمشاركة برنامج Adobe Flash Player v 32.0.0.465 موجود على الجهاز قمت بحذفة وإعادة تنصيبه ولكن المشكلة قائمة كما هى
  21. السلام عليكم أود إضافة ملف فلاش الى ملف اكسيل في اوفيس 2016 ولكن عنصر التحكم Shockwave Flash Object غير موجود فهل من طريقة لإيجاد هذا العنصر أو أضافته وفقكم الله
×
×
  • اضف...

Important Information