نجوم المشاركات

أخي الكريم السلام عليكم ((مع رجاء إرفاق ملف للعمل عليه من قبل الزملاء الأفاضل)): لإزالة السلاسل النصية من مجموعة من الخلايا في العمود B بدءاً من B2 نزولاً حتى آخر صف تريده يمكنك استخدام معادلة صفيف كما يلي : في الخلية C2: =SUM(MID(0&B2;LARGE(INDEX(ISNUMBER(--MID(B2;ROW($1:$99);1))*ROW($1:$99););ROW($1:$99))+1;1)*10^ROW($1:$99)/10) استخدم ALT+SHIFT+ENTER ثم تنسخ الناتج وتلصقه (لصق قيم في العمود B مثلاً) أو تسجل موديول كما يلي لمسح كلمات (رقم الهوية:) والإبقاء على الرقم في العمود ذاته: Sub ReplaceText() Cells.Replace What:="الاسم:", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False Cells.Replace What:="رقم الهوية:", Replacement:="", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False End Sub أما بقية الأسئلة ففي منتدانا من خلال البحث ستجد ضالتك إن شاء الله تعالى. إو إن شئت استخدم المعادلة التالية في العمود الثالث كما يلي: =IF($A1<>"";VLOOKUP(A1;$B$1:$B$170;1;0);"") تقبل تحياتي العطرة والسلام عليكم. ملاحظة: تمت كتابة معظم مشاركتي حسب طلبك كما جاء في الصورة التي أرفقت ....حرر للبيان. اوفسينا.xlsm