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

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

أشهد أن لاأله إلا الله ، محمد رسول الله ياريت ياأستاذ " زمزم " يكون طلب حضرتك مشفوع بمثال ، لأن ذلك سيسهل الحصول على طلبك بسرعة دون لبس أو خطأ والحمد أخى أن تحقق طلبك تقبل تحياتى

هل يمكن إعطائى مثال عما تريد بالضبط والنتيجة المرجوة سيكون هذا أسهل وأدق وأسرع فى الإجابة لأن المرفقين السابقين ليسا جمع وإنما إستخلاص لقيمة أصغر من قيمتين على العموم جرب هذا دالة IF.rar

بصراحة أستاذى إنت إللى مذكرتش كويس نورت المشاركة ، أستاذى والحمد لله إنك بخير تقبل تحيات تلميذك

هذه فكرة لعمل ترتيب أبجدى للأخو ة المدرسيين قبل جمع المجموع ، أو بمعنى أدق ليس بحاجة للجمع لأن هذه المعادلة تقوم بالجمع وترتب " أبجدى" ويمكن إضافة لها مزيدا من الترتيب حتى يشمل الشيت كله تقبلوا تحياتى ترتيب طلبة.rar

رغم عدم وضوح الطلب أتمنى يكون هذا طلبك لقد تم تعديل المرفق لعله المطلوب ولازال سؤالى قائما ماذا لو كان الشرط الثانى أكبر من أو يساوى القيمتين أو بمعنى أدق فى حالة " FALSE " للدالة ماذا تكون النتيجة ؟؟؟؟؟؟؟؟؟؟؟؟؟؟ دالة IF.rar دالة IF.rar

عمل جميل أخى وأيضا حبى للمعادلة الصرفة لن يتغير بدون تتدخ الكود هذه طريقة أخرى بالمعادلات فقط لعلها تثرى الفكرة NEW LOOKUP.rar

أولا - مرحبا بك أخا عزيزا بين أخوتك فى " جامعة أوفيسنا " ثانيا - نرجو من حضرتك دائما إذا إحتجت طرح سؤال ، أن يكون مشفوعا بمثال ، وإن أمكن تصور لمخرجاتة فإن هذا سيؤدى إلى سهولة الرد والدقة فيه لذلك لوتفضلت إعطاء مثال عما تريد وتصورك للنتائج تقبل تحياتى

تفضل أخى فصل اللقب حتى لوكان " مركبا " وأضف إليه ماشئت من أسماء بالطبع ستضيف له كل ماينتمى للأسم المركب بصلة أنا أعطيت بعض الأمثلة فقط أما بالنسبة لأوفيس 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)))

لم تعمل أخى بالتأكيد جربت قبل الرفع ياريت تعطينى مثال بأوفيس 2003

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

أخى الحبيب "لاأعتذار فى تقديم الخير ومساعدة الغير " وللعلم أخى يجب تنوية صاحب الطلب أن دالة " index" مع " mutch " دائما أفضل وأقوى فى العمل من دالة " vlookup " لأن دالة " vlookup " دائما لها شروط للعمل بشكل جيد منها الترتيب التصاعدى تقبلوا تحياتى

تفضل أخى أعتقد هذه أفضل إسحبها يمينا وأسفل ، ستحقق لك المطلوب تقبل تحياتى مثال الحاوى.rar

أستاذى " سعيد بيرم " شرف لى أستاذى وهذه شهادة أعتز بها تقبل تحيات : تلميذك

لايوجد مستحيل أخى بالطبع يوجد ماتريد تفضل وأرجو أن يكون المطلوب وإذا أردت الفراغات المفردة وليست الزوجية أو كامل الفراغات بين الأسم أستخدم هذه الدالة ستحقق لك ماتريد =ROUNDUP((LEN(A1)-LEN(SUBSTITUTE(A1;" ";""))+1)/2;0) تقبل تحياتى فصل كامل الأسم بدون اللقب.rar

أخى " حكيم " وهذه معادلة عد الفراغات بين الأسم أرجو أن تكون المطلوبة =LEN(A1)-LEN(SUBSTITUTE(A1;" ";"")) تقبل : تحياتى

ماذا تقصد أخى بالفراغات المفردة هل هى الفراغات الطبيعية بين كامل الأسم ؟ أم ماذا؟

أستخدم هذه المعادلة أخى فى الخلية " C12 " وأسحبها لأسفل =TRIM(RIGHT(SUBSTITUTE(B12;" ";REPT(" ";LEN(B12)));LEN(B12))) تقبل : تحياتى فصل اللقب.rar

لاعليك أخى جرب وأخبرنى بالنتيجة تقبل تحياتى

أنظر للمشاركة رقم " #18" أخى ولاتتعجل فى الرد دون التجربة لديك " معادلة " وكود " يحققان ماتريد تقبل تحياتى

تفضل أخى =IFERROR(MID($A2,LEN($A2)-(COLUMNS($B2:B2)-1),1),0)+0 ويمكن إستخدام هذا الكود أيضا Sub SplitNumbers() 'gamal abd elsameh 28/8/2014 'http://www.officena.net Dim WRng As Range Dim Cell As Range Dim Lgth As Byte Dim i As Byte 'Exit if worksheet not active If TypeName(ActiveSheet) <> "Worksheet" Then Exit Sub 'Set range to work with With ActiveSheet Set WRng = Intersect(.Columns("A"), .UsedRange) End With 'Loop through cells and 'split the characters... For Each Cell In WRng Lgth = Len(Cell.Value) If Lgth > 0 Then For i = 1 To Lgth Cell.Offset(0, i).Value = Mid(Cell.Value, i, 1) Next i End If Next Cell End Sub تقبل تحياتى فصل أرقام بطريقة عكسية.rar

تفضل أخى المطلوب المعادلة الأولى بشرط واحد وهو" سبب الأرتداد " المرفق الثانى به شرطان " سبب الأرتداد " ورقم الشيك " وبالطبع تستطيع إضافة للمعادلة ماشئت من شروط بنفس الكيفية المرفقة تقبل تحياتى Copy of شيكات مرتدة من 24_06_2012.rar Copy of شيكات مرتدة من 25_06_2012.rar

تفضل أخى لعله المطلوب ويمكن أستخدام هذه المعادلة أيضا وهى معادلة صفيف " أى لابد من الضغط على " ctrl+shift+enter وليس enter {=SUM(IF(mange=$A3;IF(sheet=B$2;1)))} تقبل تحياتى tist.rar

الا يمكن أعطاء مثال بسيط لما تريد ، لأن برنامج التحويل الذى عندى لم يستطع فتح ، الملف على أوفيس 2003 تقبل تحياتى

يسعدنى ويشرفنى أن أكون أول المتلقين لهذه الرائعة عمل جميل ورائع من أستاذ ، أعمالة كلها روائع تقبل تحيات : تلميذك