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

بسم الله ما شاء الله هدايا رائعة من أخ وأستاذ رائع بارك الله لنا فيك وجعلك دائماً منارة لكل من يلتمس العلم

دالة قمة في الروعة أخي عباد بارك الله فيك وزادك علماً ورزقك حلماً

بالتأكيد أخي ....

الأخ الحبيب نسخة الأوفيس لديك 2003 ولذلك أرجعت النتائج إلى خطأ لكن النتائج الخاصة بالأخ أحمد عبد الناصر صحيحة 100%

الأخ الحبيب رجب جاويش والأخ الغالي محمود هذه مشاركة متواضعة مني لإثراء الموضوع Report.rar

الأخ الغالي جرب الملف التالي حي.rar

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

الأخ الحبيب تفضل المرفق التالي قمت بإضافة عمود إلى جدول البيانات باسم (اسم الحي) وعلى أساسه قمت بوضع معادلات تؤدي الغرض إن شاء الله حي.rar

الأخ الحبيب الدالة التي تقوم بدور عكس Large هي الدالة Small =SMALL($A$1:$A$7;1)

بارك الله فيك أخي الغالي أبو نصار

الأخ الحبيب أبو نصار جزاكم الله خيراً على كل ما تقدمه الأخ ضاحي جرب الملف التالي Date.rar

بارك الله فيك أخي يوسف وفي معلمنا الكبير الذي دائماً نستقي من علمه

أرى أن حجم الملف كبير جداً (لدرجة لا تصدق) ، ثم إن العمل على الملفات بهذا الحجم سيكون عائق لك ويتسبب في بطء في التعامل مع الملف سؤال : ما الذي يجعل الملف بهذا الحجم الهائل؟

الأخ السائل أعتقد إن ملف الأستاذ عمرو يؤدي المطلوب أوضح قليلاً إذا لم يكن يؤدي المطلوب

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

الأخ عباد بارك الله فيك أخي الغالي اسمح لي بإضافة بسيطة جداً .. عند حذف القيمة الموجودة في الخلية (الهدف) يتم إرجاع الأمر كما كان (بدون تسطير) Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 5 Or Target.Row < 10 Then Exit Sub If Target = "" Then Range(Cells(Target.Row, 1), Cells(Target.Row, 13)).Borders.LineStyle = xlNone: Exit Sub Range(Cells(Target.Row, 1), Cells(Target.Row, 13)).Borders.ColorIndex = 1 End Sub يبقى شيء واحد أريدك التعديل عليه وهو في حالة مسح بيانات أكثر من خلية في النطاق الهدف يظهر خطأ ... أريد التخلص من الخطأ وفي نفس الوقت أن يقوم بتنفيذ العملية (التخلص من التسطير)

ممكن ملف مرفق أخي الحبيب عباد

فكرة فعلاً جميلة يا أبو حنين بارك الله فيك وزادك علماً

مشكور على مرورك العطر يا مستر حمادة (الجوكر)

الأخ عباس السماوي الأخ صبري يوسف الأخ عبد الله المجرب الأخ سعد عابد لكم يسعدني مروركم العطر على موضوعي المتواضع جزاكم الله خيراً إخواني

بارك الله فيك معلمنا الكبير عبد الله المجرب وجزاكم الله خيراً

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

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

تفضل أخي الغالي الملف بعد التعديل إحصاء تحليلى.rar

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