أحسنت استاذ سليم عمل ممتاز الكود يعمل بكل كفاءة ولا يوجد به اى مشكلة بالفعل وتم تجربته
علي الهتاري كما أخبرك استاذنا الكبير سليم حاصبيا فالملف يعمل بكل كفاءة فإن كان هناك مشكلة لديك فمن عندك فربما تكون بالفعل نسخة الأوفيس عندك أقدم من 2010 كما اخبرك استاذنا الكريم فعليك بتحديث الأوفيس لديك وشكرا ... عليك وضع هذه المعادلة بداية من الخلية C2 سحباً للأسفل
=LEN(B2)-LEN(SUBSTITUTE(B2,",",""))+1
Hitari.xlsm