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

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

أخي الكريم محي الدين جرب تدوس بالماوس في الخلية التي بها المعادلة دوسة طويلة شوية .. ستظهر المعادلة في شريط المعادلات

أخي الحبيب محمد الريفي بارك الله فيك وعوداً حميداً ولا تحرمنا من تواجد بيننا فنحن نشتاق لك ولرؤية مشاركاتك القيمة أخي الغالي سليم قدم ما لديك من حلول ليستفيد الأخوة فما زال في جرابك الكثير تقبلوا تحياتي

تقصد الأحدث في التاريخ ؟؟ هو الأول أم الأقدم في التاريخ؟؟ حاول تكون محدد الهدف لأنه وارد ان يكون هناك أكثر من قيمة للعميل الواحد

أخي الكريم ماذا لو كان هناك أكبر القيم لعميل واحد بنفس القيمة ..أقصد مثلاً إذا قمنا بتصفية العميل وحصلنا على القيمة 10 مرتين .. ما الحل في هذه الحالة؟

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

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

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

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

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

أخي الحبيب بن علية بارك الله فيك وجزيت خيراً على المعادلة الجميلة والرائعة .. أخي الغالي ابو يوسف جزيت خيراً على المشاركة الجميلة وإن كانت مكررة من قبل أخونا الحبيب أحمد الفلاحجي ولكنها مقبولة منك .. ربنا يبارك فيك ومشكور على المشاركة الرائعة أخي الحبيب أبو بسملة هوووووووووب جبت حلول كتير في المشاركة الأخيرة ليك وللأسف كلها مش مناسبة !! طبعاً معظمها شغال تمام التمام ..ولكن راعي أن تكون عملية البحث غير مقتصرة على النقل وفقط ..بل يجب أن يتم تجربة كل كود والتعديل عليه بما يتناسب مع الملف.. عايزين بحث وتدقيق وتفحيص وتمحيص .. وأعتقد إنك وصلت لي !! بالنسبة للملحوظة : السطر المشار إليه ليس بكود إنما معادلة توضع في الخلية B1 ثم يتم سحبها لأسفل

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

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

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

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

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

وعليكم السلام أخي الكريم حراثي تفضل الكود Private Sub CommandButton1_Click() Range("B2").Value = TextBox1.Value Range("D3").Value = TextBox2.Value End Sub

بسم الله ما شاء الله بدأت بشاير البحث تبان يا فلاحجي إحنا قولنا تكون النتائج في العمود المجاور بس التعديل هيكون بسيط ...في آخر سطر غيره إلى التالي لكي تظهر النتائج في العمود المجاور WorkRng.Offset(, 1).Formula = Arr تقبل تحياتي

جرب كلمة Reverse ... دي معناها عكس الشيء !!

ردي لا يقلل من شأن مجهودك أبداً أخي الحبيب توكل جزيت خير الجزاء على الوقت الذي بذلته في تجهيز الملف المرفق .. تقبل تحياتي

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

أخي الكريم يرجى الإطلاع على هذا الرابط لمعرفة بدايات التعامل مع محرر الأكواد من هنا

هل جربت حماية ورقة العمل ؟

أخي الحبيب سليم عندما نطرح موضوع فنحن نتعامل دائماً مع النطاقات بشكل ديناميكي ليكون الحل المقدم مرن ويفيد الجميع بدون أن يضطر المستخدم العادي إلى التعديل بارك الله فيك وجزيت خيراً على المعادلات الرائعة وإضافة بسيطة جرب المعادلة بهذا الشكل =IFERROR(OFFSET($A$1,COUNTA($A:$A)-ROW(),),"") في انتظار المزيد من الحلول بالمعادلات أو بالأكواد أو بأي طريقة .. تقبل تحياتي

بارك الله فيك أخي الحبيب سليم ومشكور على المبادرة حاول تسحب المعادلة لأبعد خلية ستجد أن هناك نتائج بعد النطاق .. اسحب مثلاُ من الخلية B1:B20 ولاحظ النتائج