ياسر خليل أبو البراء

الأخ الحبيب أبو تراب تسلم يا كبير على الحل الأمثل من أول ضربة ......... جزيت خيراً ..وفي انتظار لغز جديد منك إن شاء الله

الاخ الحبيب سليم هل تظنني قد نسيت ؟!! كنت فقط أجهز الملف فحسب .. وعذراً قمت باقتبااس حلك مع بعض التعديلات ليفهمه الأعضاء MMULT.rar

يا جماعة الخير يرجى الانتباه حين ننسخ الكود من المحرر أن تكون اتجاه الكتابة باللغة العربية في المحرر ، حتى يتم لصق الكود بشكل مضبوط تقبل تحياتي يا أستاذي ومعلمي أحمد ..ليك وحشة كبيرة

الراجل قال مساعدة قولوا إنتو : اتفضل جرب

أنا مش قلت مرة يغلق .. إنتو شكلكو غاوين هزار

لغز جديد إليكم إخواني لغز جديد .. في الملف المرفق يوجد كود يقوم بإنشاء ملف نصي إن لم يكن موجود ، في المسار C قم أولاً بتحديد النطاق من A1:D5 ثم قم بالضغط على زر RUN لتنفيذ الأمر .... إذا قمت بالإطلاع على الملف النصي في البارتشن C ستجد أقواس تنصيص وفواصل .. كيف يمكن التخلص من هذه الفواصل وأقواس التنصيص .. بالتعديل على الكود الموجود؟ Write Data To Text File.rar

الأخ الحبيب حميدي نورت المنتدى أخي الحبيب يرجى إرفاق ملفك بعد ضغطه ..حتى يتسنى للأخوة مساعدتك

شكلك بتخطط يا أخ مختار تاخد مني لقب فاكهة المنتدى .. بصراحة في منتهى الروعة يا مختار ..تسلم وعشت يا لذيذ يا رايق (أكيد كنت بتشرب سفن أب وإنت شغال ع الملف ده) تقبل تحياتي

وإليكم أيضاً - عشان الناس اللي بتقول إني ناااااايم - حل اللغز الخاص بالأخ سليم (الأرقام التي يتم قسمتها على 2 و 3 و 4 و 5 و 6 ) ويتبقى واحد فيه إضافة بالكود يا مستر حسام (عشان أنا قلت لك أنا طالما دخلت المعركة يبقا يا مقتول يا مقتول) Remainder One.rar

وإليكم حل اللغز الخاص بالأخ سليم الجدول المتحرك (بيفكرني ببحر الرمال المتحرك) والحلول مجمعة في ملف واحد Movable Table Conditional Formatting.rar

وإليكم حل اللغز الخاص بملء الفراغات في نطاق محدد بكلمة Blank مجمع كل الحلول في ملف واحد أيضاً Fill Blanks.rar

الله يبارك فيكم إخواني الكرام ........... إلى الغير متابعين للموضوع من بدايته ... حل اللغز الأول مجمع في ملف واحد (الخاص بعد الخلايا في ورقة العمل) Count Cells.rar

السلام عليكم أخي الفاضل إليك دالة معرفة تقوم بالمطلوب إن شاء الله جرب وأخبرني بالنتيجة TAX Function.rar

موضوع في منتهى الروعة ..تسلم يا كبير على هذه الأفكار الجبارة والمفيدة جداً

الأخ الغالي سليم بالراحة علينا .انا كنت مريض شوية ، بالراحة علينا ، وبعدين لازم بعد كل لغز تعلن انتهاء اللغز .. وبداية لغز جديد ..بحيث لو فيه حد عنده لغز يبدأ يتفضل بطرحه .. مش كله ورا بعضه عشان الموضوع يكون أكثر تنظيماً .. بالنسبة للغزك الأخير ..ممكن توضح اللغز أكثر ، لأني بصراحة تايه ومش عارف الملف اللي تقصده (الخاص بالجدول المتحرك ، ولا بلغز المتبقي 1) الأخ أبو صلاح بارك الله فيك على مشاركتك ، وإن كنت أفضل الانتظار حتى الانتهاء من لغز الأخ سليم .. بس تسلم ايدك وربنا يجازيك خير

بسم الله ما شاء الله عليكم أخي سليم حاصبيا جعل الكبار يدخلون اللعبة ..بارك الله فيك ، ومتحرمناش من الروائع يا كبير مشكور مشاركتك الفعالة أخي وحبيبي طارق محمود ..ولا تحرمنا من ردودك أستاذي ومعلمي وتاج راسي عبد الله باقشير .. مجرد ردك في أي موضوع دليل على نجاح الموضوع نجاح باهر ، وأصبح الموضوع ليس مجرد موضوع للتسلية كما يظن البعض ، بل إن مشاركاتكم فيه يعد أقصى استفادة يمكن أن نستفيد منها .. لا حرمنا الله منكم الأخ الغالي والأستاذ الكبير عبد الله المجرب مشكور على مشاركتك الرائعة والتي أضفت جمالا ورونقاً للموضوع بارك الله فيكم جميعاً وجزيتم عنا خير الجزاء ... وإلى لقاء مع لغز آخر (في انتظار ابن مصر باللغز القادم!!!! ) تقبلوا تحياتي

بارك الله فيك أخي الحبيب أحمد وأعتذر أني لم أرى مشاركتك ، حيث أنني كنت أتناول طعام الغداء (وإنت عارف ساعة الأكل تتوه العقول) ، ولم أحدث الصفحة فلم أنتبه لوجود رد .. جزاكم الله خير الجزاء

في الخلية S8 ضعي المعادلة التالية =COUNTIF(S5:S7,">="&S$4) وفي الخلية S9 ضعي المعادلة التالية : =COUNTIF(S5:S7,"<"&S$4) حاولي تطبيق المعادلة بشكل صحيح على بقية الأعمدة المراد عمل إحصاء بها

أخي طالما أن هناك عدم تجاوب إذاً فالموضوع مبهم رغم جهدك في شرح المطلوب إلا أن موضوع النقل لا يستند لشرط مما يجعل الموضوع مبهم ومعقد ...لابد من تواجد شرط في النقل ..أعتقد أن البيانات غير حقيقية إلى حد ما فبالتالي غير مفهوم الطلب ..يبدو أنه واضحاً لك .. أنا أريد مساعدتك لكني أقف عاجزاً عن فهم الطلب وأكيد غيري أيضاً ، وإلا لوجدت ولو رداً واحداً.. تقبل تحياتي ..حاول مرة أخرى بأسلوب مختلف (حاول تركز على شرط الفصل بين البيانات ..على أي أساس تريد الفصل ..هل البيانات عبارة عن اسمين فقط ؟أم أكثر ؟؟ )

الحمد لله الذي بنعمته تتم الصالحات مشكور على إفادتنا بعمل الملف ..تقبل تحياتي

الأستاذ الكبير والأخ الحبيب الغائب هشلم شلبي.. لكم أسعدني مشاركتك ، ورؤية اسمك في المنتدى بارك الله فيك ..تقبل تحياتي

الأخ الكريم ارفق ملف لتوضيح المشكلة بشكل أدق ..أنا جربت أنسخ معادلة من شيت لشيت تاني ولم يحدث ما قلت

كودي ليس رائع بل كود هو الأروع ..لأنني إذا قمت بمسح محتويات النطاق لا يتم إضافة كلمة Blank بخلاف كودك .. عموماً محاولة رائعة منك وتسلم يا كبير.. فين بقا ألغازك يا أبو المقالب ؟! عايزين منك لغز كدا شغل الدماغ النايمة دي

تسلم الأيادي أخي الحبيب سليم بارك الله فيك ... بالنسبة للملف المرفق في الصف رقم 10 في العمود الأول والثاني ..لم ينطبق الكود رغم الإشارة إليه ..!! بحاول يمين شمال مش قادر أجمع ايه السبب؟ ما رأيك لو كان الكود بهذا الشكل؟ Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A1:B10")) Is Nothing Then If IsEmpty(Target) Then Target.Value = "Blank" End If End Sub

بارك الله فيك أخي سليم وجزاكم الله خير الجزاء وشكرا على المقلب اللذيذ ..