logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
Hatem Eissa hassona229-- لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة لا تميز خلال هذه الفترة اكسيل مشاريع جاهزه



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





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

موضوع النهارده عن دالة معرفة جديدة
شكلى زهقتكم من مواضيع الدوال المعرفة معلش استحملونى
إن شاء الله ننوع المره الجايه biggrin2

دالة اليوم ببساطة لو عندى نص وعايز أضيف فى أوسطه نص أو فاصل بناء على تسلسل رقمى محدد
ودا بالضبط عمل الدالة Addin
أولاً ما هو بناء الدالة :
سيدى القاضى والسادة المستشارين إن الدالة التى أمامكم اليوم تتكون من 5 باراميترات
أول باراميتر فقط هو الإجبارى والباقى اختيارى اجل الباقى اختيارى
وها هو دليل قولى متمثل أمامكم

CODE
=Addin(text,[break],[length],[start_num],[num_chars])



.1 text اجبارى: النص المراد دمجه
.2 [break] اختيارى: الفاصل بين الأحرف ، الإفتراضى مسافة
.3 [length] اختيارى: طول السلسلة النصية لكل فاصل ، الإفتراضى 1
.4 [start_num] اختيارى: بداية الحرف داخل النص لإضافة الفاصل ، الإفتراضى 1
.5 [num_chars] اختيارى: عدد الأحرف التى يضاف فيها الفاصل ، الإفتراضى طول السلسلة النصية

وكما ترا أيها القاضى ان المتهم برئ برئ برائة الذئب من دم بن يعقوب
واليك مثال على ما اقول




النص النتيجة
Eslam Abdullah E s l a m A b d u l l a h
Hossam Khatab Ho-ss-am- K-ha-ta-b
Yasser Khalil Yasser- Khalil
Yasser Alaraby Yasser Ala-r-a-b-y
01095814458 0109 581 4458
Example E-x-a-m-p-l-e

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

CODE
Function Addin(txt As String, Optional break As String = " ", Optional length As Integer = 1, Optional s As Integer = 1, Optional n As Variant) As String
'Programming by Eslam Abdullah
Dim i%

If IsMissing(n) Then n = Len(txt) Else n = Application.Min(Len(txt), (n + s - 1) * -(n <> 0))
If length < 1 Or s < 1 Or s > Len(txt) Or n < 0 Then Addin = IIf(txt = "", "", CVErr(xlErrNum)): Exit Function

Addin = Left(txt, (s - 1) * -(n > 0))
    For i = s To n Step length
        If i - 1 < n - length Then Addin = Addin & Mid(txt, i, length) & break Else Addin = Addin & Mid(txt, i)
    Next i
End Function

كان معكم المحامى اسلام عبدالله من محكمة أكاديمية الصقر
والسلام عليكم ورحمة الله وبركاته

أثارت هذه المشاركة إعجاب: abdulwahed catran،



look/images/icons/i1.gif الدالة المعرفة Addin
  22-11-2018 11:36 مساءً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1309
الدولة : مصر
الجنس :
تاريخ الميلاد : 4-7-1990
الدعوات : 59
قوة السمعة : 4570
الاعجاب : 0
موقعي : زيارة موقعي
احب اكون اول واحد يعلق ويقول مش شايف جديد عادى لا جديد
واحب ارخم اكتر واقول ولا اتأثرت ولا اى حاجه g



توقيع :محمود ابو الدهب
لى عظيم الشرف بالانضمام لهذا الصرح العظيم
وكم أتمنى من الله
ان يعيننى ويعلمنى من علمة الواسع فهو ولي ذالك وهو على كل شي قدير

تحياتى وتقدير للجميع  محمود ابوالدهب

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




look/images/icons/i1.gif الدالة المعرفة Addin
  23-11-2018 09:03 صباحاً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36759
الاعجاب : 186
بارك الله فيك أخي الحبيب إسلام وجزيت خيراً على الموضوع المميز
شكلك هتشتغل أي حاجة إلا محاسب laugh

أثارت هذه المشاركة إعجاب: abdulwahed catran،



look/images/icons/i1.gif الدالة المعرفة Addin
  23-11-2018 01:53 مساءً   [4]
معلومات الكاتب ▼
تاريخ الإنضمام : 27-08-2017
رقم العضوية : 219
المشاركات : 169
الدولة : سورية
الجنس :
تاريخ الميلاد : 10-2-1968
قوة السمعة : 280
الاعجاب : 0
جزاكم الله خيرا




look/images/icons/i1.gif الدالة المعرفة Addin
  23-11-2018 10:16 مساءً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
مشكور مروركم الكريم أستاذى الغالى ياسر وأستاذ عبدالواحد

احنا نسد فى أى حاجه مبرمجين محامين مدرسين محاسبين كلوا موجود
عقبال ما ابقى مدير مالى وانافس استاذ حسام biggrin2




look/images/icons/i1.gif الدالة المعرفة Addin
  23-11-2018 10:28 مساءً   [6]
معلومات الكاتب ▼
تاريخ الإنضمام : 14-10-2018
رقم العضوية : 8371
المشاركات : 12
الجنس :
تاريخ الميلاد : 17-3-1970
قوة السمعة : 42
الاعجاب : 0
بارك الله فيك أستاذ إسلام
إبداعات




look/images/icons/i1.gif الدالة المعرفة Addin
  23-11-2018 11:02 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
وبارك الله فيك أستاذ الخضر
مشكور مرورك الكريم على الموضوع المتواضع 81




look/images/icons/i1.gif الدالة المعرفة Addin
  24-11-2018 05:03 صباحاً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10529
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36759
الاعجاب : 186
تنافسني ماسي تنافس المحامين ماشي ... لكن تنافس المدير المالي حسام خطاب أهو دا بقا اللي مش ماشي .. حسام خط أحمر
بس إن شاء الله تقدر تعديه :)




look/images/icons/i1.gif الدالة المعرفة Addin
  24-11-2018 06:50 صباحاً   [9]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1824
الجنس :
الدعوات : 21
قوة السمعة : 20048
الاعجاب : 12
موقعي : زيارة موقعي

جزاكم الله خيرا يا غالى عمل رائع كالمعتاد
وان شاء الله تكون افضل منى علما وخلقا 142




توقيع :الصقر

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


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



المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
مدموج :نريد عمل دالة معرفة للدالة الجديدة VSTACK (برمجة الدالة) jjebril
3 335 jjebril
الدالة المعرفة TrimPro Eslam Abdullah
7 1218 karwan
جمع وطرح أرقام بعدد خانات لا نهاية له بالدالة المعرفة Calc Eslam Abdullah
16 3271 YasserKhalil
الدالة المعرفة LSum Eslam Abdullah
6 1495 محمد أبو عبدو
الدالة vlookup alsaqr. بالفرنسية منجة فاتح
4 857 hassona229

الكلمات الدلالية
الدالة ، المعرفة ، Addin ،









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

الساعة الآن 07:41 AM