logo

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



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





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

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

لكن الامر مختلف قليلا
الدالة هنا تقوم بعمل الدالتين COUNTA و COUNTBLANK
ولكن الدالتين السابقتين تقوم بحساب الخلايا المدمجة على انها خلية واحده
لانه اذا كانت هناك خلية مدمجة ممتلئة هنا يعد اول خليه فيها الممتلئه فقط اما الباقى يعد فارغ

ولكنى وجدت من يبحث عن دالة تقوم بحساب الخلايا المدمجة بعدد خلاياها
فمثلا اذا كانت 3 خلايا مدمجة بخلية واحدة بها نص هنا تعد ب3 وليس ب1 وهكذا

لذلك قمت ببرمجة الدالة AlsaqrCount لتخدم هذه الرغبة
واليكم مثال كما بالصورة التالية

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

والآن كود الدالة هو....

CODE
Function AlsaqrCount(rng As Range, rw As Boolean) As Long
'Programming by Eslam Abdullah
Dim cel As Range, value&, blank&

    For Each cel In rng
        If cel.MergeArea.Cells(1).value <> "" Then value = value + 1 Else: blank = blank + 1
    Next cel
    
    Select Case rw
        Case True: AlsaqrCount = value
        Case False: AlsaqrCount = blank
    End Select
End Function


ولتحميل ملف العمل بالكود لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
مع تحياتى اسلام عبدالله 81
 
 





look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  28-08-2018 06:17 صباحاً   [1]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1824
الجنس :
الدعوات : 21
قوة السمعة : 20024
الاعجاب : 10
موقعي : زيارة موقعي

رائع يا غالى ربنا يكرمك يا غالى 123




توقيع :الصقر

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


look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  28-08-2018 11:35 صباحاً   [2]
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1765
الدولة : مصر
الجنس :
الدعوات : 2
قوة السمعة : 9683
الاعجاب : 24
أحسنت استاذ اسلام وبارك الله فيك



توقيع :ali mohamed ali


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

look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  28-08-2018 11:44 صباحاً   [3]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-03-2018
رقم العضوية : 5025
المشاركات : 450
الجنس :
تاريخ الميلاد : 19-3-1990
قوة السمعة : 796
الاعجاب : 0
جزاك الله كل خير استاذى الكريم




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




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




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




look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  30-08-2018 05:32 مساءً   [7]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
جميل أن تساعد وأيضاً التوجيه مطلوب .. حيث أن توجيه السائل للابتعاد عن الخلايا المدمجة سيمنعه من الوقوع في مشاكل مع الأكواد ..
عامتا (أقصد عامةً) .. بارك الله فيك وجزاك الله خيراً wink_3




look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  30-08-2018 05:34 مساءً   [8]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
تمام كلامك اغالى ابو الغاليين
هروح اكمل انا C++ كفايه VBA شويه biggrin2




look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  30-08-2018 06:43 مساءً   [9]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
طمني وصلت لفين ...؟
في انتظارك لوضع دروس في المنتدى .. ليستفيد الجميع .. وأفضل طريقة للتعلم هي أن تقوم بتعليم ما تعلمته للآخرين




look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  30-08-2018 08:29 مساءً   [10]
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
هانت شوية كدا واخلص الConsole Application
حاضر ربنا يسهل فى الوقت بس وبإذن الله اطرح دروس فى لغة C++




look/images/icons/i1.gif الدالة المعرفة AlsaqrCount
  30-08-2018 09:19 مساءً   [11]
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10510
الجنس :
تاريخ الميلاد : 1-10-1978
الدعوات : 24
قوة السمعة : 36676
الاعجاب : 161
إنت في الفيديو رقم كام ... أنا مخصص كل يوم فيديو واحد yes
عايزين نعمل قسم جديد في قسم لغات أخرى ، ويكون مخصص للـ C++ .. شد حيلك يا بطل




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




اضافة رد جديد اضافة موضوع جديد
الصفحة 2 من 2 < 1 2 >




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

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









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

الساعة الآن 12:34 AM