جديد .. فصل الاسم عن اللقب وفصل اللقب عن الاسم او الكنية

[محمد نصري]

السلام عليكم ورحمة الله وبركاته

كان هذا العمل ثمرة سؤال أحد المشتركين معنا في هذا الصرح العظيم

وكان نص السؤال إقتصاص اللقب

وقام الأخوة الأساتذة بإجابته

الاستاذ جمال عبد السميع

والاستاذ سليم

والاستاذ سعيد بيرم

مشكورين جميعهم على جهودهم الجبارة في المنتدى

ولكن لفت انتباهي سؤال ثاني لصاحب الموضوع

عن فصل الاسم عن اللقب

فقمت بالحل وآثرت نشره عله يكون فيه فائدة

عالجت فيه موضوع ان يكون اللقب مركبا

أرجو ان اكون وفقت لتقديم شيء مفيد

والسلام عليكم

جديد استخراج الاسم بدون اللقب.zip

 

وانا اتناول طعام الغداء خطر في بالي تعديل على التعقيد الذي في المرفق الاول

جديد استخراج الاسم بدون اللقب11.zip

 

[محمد نصري]

المرفق بعد التعديل

جديد استخراج الاسم بدون اللقب11.zip

[جمال عبد السميع]

تساؤل هام

هل تستطيع عمل هذه الفكرة بأوفيس 2003 لأن سبب مشكلة ، معادلتى هى وصولها للحد الأقصى ، أما الأصدارات الأعلى ليس بها مشكلة !!!!!!!!!!!!!!!!!!!!!!!!!!

تقبل تحياتى

[محمد نصري]

اخي جمال عبد السميع

جربها بنفسك واخبرنا ان كان ذلك ممكن

لاني حسب ما فهمت انك تعمل على اوفيس 2003

والتجربة خير برهان

وللعلم ان الدالة substitute

لها ايضا نفس المحدادات سبع شروط فقط

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

هذا الفرق بين الاثنين وليس الاصدار

[محمد نصري]

تساؤل هام

هل تستطيع عمل هذه الفكرة بأوفيس 2003 لأن سبب مشكلة ، معادلتى هى وصولها للحد الأقصى ، أما الأصدارات الأعلى ليس بها مشكلة !!!!!!!!!!!!!!!!!!!!!!!!!!

تقبل تحياتى

واقدر لك مرروك الكريم الذي أسعد به كلما رأيت اسمك لامعا براقا

[جمال عبد السميع]

لم تعمل أخى بالتأكيد جربت قبل الرفع

ياريت تعطينى مثال بأوفيس 2003

[محمد نصري]

في الحقيقة قمت بتنزيل 2003 لكي أشاركك هذه المعاناة ... وسوف اجد حل للوصول بواسطة 2003

ولكن لماذا الى الان هناك من يعمل على 2003 ... هل من سبب مقنع

[جمال عبد السميع]

تفضل أخى فصل اللقب حتى لوكان " مركبا "

وأضف إليه ماشئت من أسماء بالطبع ستضيف له كل ماينتمى للأسم المركب بصلة

أنا أعطيت بعض الأمثلة فقط

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

فلماذا أكرهة ؟ وإذا كان هناك حل أفضل بإصدارات أعلى أنوه الزميل لها وأكتبها له فى بار بعيدا عن المشاركة

تقبل تحياتى

=IF(OR(TRIM(LEFT(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";99));198);99))="عبد";TRIM(LEFT(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";99));198);99))="علاء";TRIM(LEFT(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";99));198);99))="أبو";TRIM(LEFT(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";99));198);99))="جاب");TRIM(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";99));198));TRIM(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";99));99)))