logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
michel Sadek ali mohamed ali-- لا تميز خلال هذه الفترة Yasser Elaraby لا تميز خلال هذه الفترة اكسيل اسئله واجابات



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





15-06-2023 09:29 صباحاً
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
السلام عليكم إخواني في الله

الموضوع ليس بجديد ولكن هذه الدالة المعرفة مختصرة وبعيدة عن التعقيد ، ليسهل عليكم استخدامها في أكوادكم والملفات الخاصة بكم



CODE

Function FatherName(ByVal strName As String) As String
    Dim myArray, e
    myArray = Array("أبو ", "ابو ", "آل ", " الله", " الدين", " الإسلام", " الاسلام", " الحق", " النصر", " العهد", " النور", " بالله", "زين ال", "أم كلثوم", "ام كلثوم", "بن لادن", "بن زياد", "أم هاشم", "ام هاشم", "فاطمة الزهراء", "حبيبة الرحمن", "عبد ربه", "نور الهدى", "حد الزين", "جاد لله", "سمو الامير", "حسب النبي", "انور السادات", "ماهي نور", "سعد الهنا", "سبع ال", "عطا لله", "ضي العين", "جاد الكرم", "جاد الكريم", "عبد ال", "ست ابوها", "مطيع الرحمن", "جاد الرب", "خالد بن الوليد")
    On Error GoTo ErrHandler
    For Each e In myArray
        strName = Replace(strName, e, Replace(e, Space(1), "_"))
    Next e
    FatherName = Replace(Trim(Mid(strName & " ", InStr(strName & Space(1), Space(1)), Len(strName))), "_", Space(1))
    Exit Function
ErrHandler:
    FatherName = vbNullString
End Function




أثارت هذه المشاركة إعجاب: EM_ACC، علي بطيخ سالم، ali mohamed ali، تاج الدين،



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  16-06-2023 12:48 صباحاً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2018
رقم العضوية : 9257
المشاركات : 801
الدولة : مصر
الجنس :
تاريخ الميلاد : 13-9-1980
قوة السمعة : 3939
الاعجاب : 22
وعليكم السلام ورحمه الله وبركاته
بارك الله فيك استاذنا الغالي

أثارت هذه المشاركة إعجاب: YasserKhalil، علي بطيخ سالم، تاج الدين،



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  16-06-2023 06:57 صباحاً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
تسلم أخي الغالي حسونة ومشكور على تشجيعك الدائم 

أثارت هذه المشاركة إعجاب: hassona229، علي بطيخ سالم،



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  17-06-2023 12:09 صباحاً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 819
الجنس :
تاريخ الميلاد : 14-10-1973
الدعوات : 79
قوة السمعة : 8466
الاعجاب : 11
بارك الله فيك أخى الحبيب ومعلمى الفاضل
عهدى بكم دائما أنك سباق للخير

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



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  17-06-2023 07:29 صباحاً   [4]
معلومات الكاتب ▼
تاريخ الإنضمام : 19-09-2018
رقم العضوية : 8086
المشاركات : 274
الجنس :
تاريخ الميلاد : 30-10-1982
الدعوات : 1
قوة السمعة : 987
الاعجاب : 12
ما شاء الله تبارك الله حفظكم الله ورعاكم استاذنا وجزاكم الله خيرا وبارك الله لك ورحم الله والديك استاذنا الغالي ابو البراء 

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



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  17-06-2023 08:41 صباحاً   [5]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
أخي العزيز محمد الدسوقي
أخي العزيز علي سالم
بارك الله فيكما ومشكور على مروركما الكريم والعطر بالموضوع

أثارت هذه المشاركة إعجاب: علي بطيخ سالم،



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  17-06-2023 09:21 صباحاً   [6]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1765
الدولة : مصر
الجنس :
الدعوات : 2
قوة السمعة : 9685
الاعجاب : 25
أحسنت أستاذ ياسر انها حقاً دالة ممتازة بارك الله فيك وزادك الله من فضله

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


توقيع :ali mohamed ali


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

look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  17-06-2023 12:52 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
أحسن الله إليك أخي العزيز علي ومشكور على ردك الطيب

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



look/images/icons/i1.gif دالة معرفة لاستخراج اسم الأب من الأسماء المركبة
  16-11-2023 10:57 صباحاً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 01-02-2018
رقم العضوية : 4153
المشاركات : 42
الجنس :
تاريخ الميلاد : 4-11-66
قوة السمعة : 50
الاعجاب : 2
شكرا على مجهودك الرائع وبارك الله فيك




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



المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
الدالة المعرفة TND لاستخراج النص والرقم والتاريخ Eslam Abdullah
7 1916 Eslam Abdullah

الكلمات الدلالية
دالة ، معرفة ، لاستخراج ، الأب ، الأسماء ، المركبة ،









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

الساعة الآن 02:05 PM