logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
abdelmoniem ismail لا تميز خلال هذه الفترة-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة توزيع المعلمين في جدول الحصص حسب النصاب بشروط اكسيل مشاريع جاهزه



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





18-08-2018 10:05 مساءً
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
السلام عليكم ورحمة الله وبركاته

قد لا يعلم البعض عن دالة TextJoin لأنها دالة من دوال نسخة أوفيس 365 أو إصدار نسخة 2019
وعلى السريع كدا لو عايز تعرف كل الدوال وامتى تم اصدارها ممكن تراجع قاموس دالات الاكسل من هنا

طيب واحد هيقولى بتعمل ايه المحروسة
TextJoin
المحروسة دى تقدر تقول انها سوبر دالة CONCATENATE blink

صيغة دالة TEXTJOIN كالتالى
CODE
= TEXTJOIN(",", TRUE, A1:C1)


أول باراميتر هو فاصل بين كل نص والتانى وفى حالة تجاهله يكن الفاصل الإفتراضى فراغ ""

ثانى باراميتر هو قيمة TRUE أو FALSE بمعنى لو TRUE
يتم تجاهل الخلايا الفارغة أثناء دمج النص طب لو FALSE
أكيد ياحمادة العكس لن يتم تجاهل الخلايا الفارغة صحصح معايا كدا
وفى حالة تجاهله يكن الإفتراضى هو TRUE أى تجاهل الخلايا الفارغة

ثالث باراميتر خاص بالنطاق المراد دمج النص الذى يحتويه



يعنى بدل ما تستخدم دالة CONCATENATE وتدخل النص الأول وبعدين تدخل الفاصل بين النص وبعدين النص التانى وهكذا
موضوع متعب شوية مش كدا برضوا

ودالة TextJoin وفرت مجهود كبير فى الموضوع دا ،
إلى أنه لا يتمتعون بميزاتها أغلبية الناس لعدم توافر نسخة
365 لديهم بل إن الغالبية تستخدم نسخة 2010 أو 2007
لذلك فكرت ببرمجة دالة تقوم بالوظيفة نفسها وهى دالة JoinEA

نشوف الدالة بقى عشان شكلى اتكلمت كتير وبإختصار دى نتائج الدالة كما موضح بالصورة التالية
NDUxMTI3MQ9999001

ماذا نلاحظ يأبا البراء ، نلاحظ أن ترتيب الباراميترات نفس ترتيب دالة TextJoin


أول باراميتر هو الفاصل والثانى هو TRUE أو FALSE حمادة وقفنى تانى انت كاتب 1 مش TRUE لا وباصصلى كدا وبيشرب سيجاره 63
شوف أحمادة عشان تعبتنى معاك خدها قاعدة دائما وفى أى لغة رقم 0 فى القيم المنطقية يساوى FALSE وأى رقم خلاف ذلك سواء موجب أو سالب يساوى TRUE
والباراميتر الثالث هنا هو النطاق المراد دمجة


شوفت بسيطة وجميلة ازاى

وأعتقد كدا كووفاية شرح فى استخدام الدالة وكود الدالة المستخدم هو......


ملاحظة: تم تحديث الدالة بتاريخ 19/11/2018
CODE
Function JoinEA(Optional break As String = "", Optional ignore As Boolean = 1, Optional rng As Variant) As String
'Programming by Eslam Abdullah
Dim txt$, r As Variant, i As Boolean
    If Not IsArray(rng) And Not IsObject(rng) Then JoinEA = rng: Exit Function
    If IsArray(rng) Then rng = Application.Transpose(rng)
    
    For Each r In rng
        txt = txt & IIf((i = 0 Or ignore) And (txt = "" Or r = ""), "", break) & r
        i = 1
    Next r
JoinEA = txt
End Function

وبلاش بقى شغل أخد الكود وأجرى ها ماشى ، ياحمادة حمل ملف العمل وامسحه تانى biggrin2


لتحميل ملف العمل من هنا


هتحمل الملف تبقى حبيبى وصاحبى وكفاءة ، هتاخد الكود وتجرى همسكك أعصرك أنزل منك أعضاء صغيرين 121

كل عام وانتم بخير أحبابى فى الله 81
وأدام الله عليكم اليمن والبركات 81
كان معكم ومعنا ومعاهم برضوا اسلام عبدالله biggrin2
 
 





look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  18-08-2018 11:57 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1765
الدولة : مصر
الجنس :
الدعوات : 2
قوة السمعة : 9685
الاعجاب : 25
رائع استاذ اسلام بارك الله فيك وجعله الله فى ميزان حسناتك
دالة ممتازة وعلى فكرة انا قمت بتحميل الملف كله



توقيع :ali mohamed ali


{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
الاخرين لوجه الله وان تحتسب له اجر عند الله

look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  19-08-2018 12:02 صباحاً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 10-03-2018
رقم العضوية : 4794
المشاركات : 477
الجنس :
تاريخ الميلاد : 1-4-1980
قوة السمعة : 882
الاعجاب : 8
مشكورين استاذ اسلام على هذه الموضوعات الهامة والشيقة جزاك الله كل خير




look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  19-08-2018 12:19 صباحاً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
مشكور أستاذ على وأستاذ هانى على مروركم المشرف والعطر على الموضوع
وموشكرين على تحميل الملف أعلوه biggrin2
نردهالك فى الأفراح إن شاء الله 63




look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  19-08-2018 04:08 صباحاً   [4]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36752
الاعجاب : 184
بسم الله ما شاء الله عليك أخي الغالي إسلام
مميز وموضوعاتك فريدة ومتميزة ..

متسألش مين فريدة دي عشان متتعبش :)




look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  19-08-2018 12:44 مساءً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
عارفها عارفها ، الست فريدة اهى بتسلم عليك biggrin2
MjkxOTk5MQ2020MzgzMjI5MQ100100NDIyMTEwMQ2525xEzzQ7u2ihc6N7b
 
 





look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  27-08-2018 12:06 مساءً   [6]
معلومات الكاتب ▼
تاريخ الإنضمام : 27-08-2017
رقم العضوية : 247
المشاركات : 202
الجنس :
تاريخ الميلاد : 13-4-1966
قوة السمعة : 613
الاعجاب : 0
بارك الله فيك أستاذي الفاضل وجزاك الله خير الجزاء
وزادك الله علما ونفع بك ، وجعل هذا العمل الطيب
في ميزان حسناتك وكتبه لك صدقة جارية .




look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  19-11-2018 11:38 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
ملاحظة: تم تحديث الدالة بتاريخ 19/11/2018




look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  20-11-2018 12:16 صباحاً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36752
الاعجاب : 184
أخي الحبيب إسلام
توهتنا بالتحديثات كل شوية .. يرجى ذكر ما قمت بتحديثه لكي نعرف كيف تم تطوير الدالة ..




look/images/icons/i1.gif الدالة المعرفة JoinEA بديل للدالة TEXTJOIN
  20-11-2018 12:29 صباحاً   [9]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
المشاركة الأصلية كتبت بواسطة: YasserKhalil أخي الحبيب إسلام
توهتنا بالتحديثات كل شوية .. يرجى ذكر ما قمت بتحديثه لكي نعرف كيف تم تطوير الدالة ..
ههههههههههههههههه سورى سورى biggrin2
التحديث للتعامل مع الصفيف كما النطاقات أو إدخال الدالة ضمن معادلة صفيف




اضافة رد جديد اضافة موضوع جديد




الكلمات الدلالية
الدالة ، المعرفة ، AlsaqrJoin ، بديل ، للدالة ، TEXTJOIN ،









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

الساعة الآن 11:15 AM