استاذ اسامة الذى اكن له كل احترام وتقدير الف شكر على تعبك ومجهود ولكن كان الحل مطلوب بالكود لان فيه اعضاء نسقط عنهم العضوية فنقوم بحذفهم من الشيت لذا المعادلات لاتنفع
استاذ محى ابو البشر الذى يمد لى يده فى كل مرة الف الف شكر حل جميل وهو اقرب الى ما اكون ولكن لى استفسار ان تم الغاء جزئية UBound(a, 2)
واستبدالها range او cells شكل الكود هيكون الزاى