sumvis دالة لجمع الخلايا الظاهرة فقط

 : دالة sumvis  تستخدم لجمع الخلايا   الظاهرة و تستثنى الخلايا المخفية . وتختلف عن دالة subtotal حيث ان الاخير تستخدم للخلايا المفلترة فقط وليست المخفية , وفى البداية تبدأ بتركيب الكود التالى  





Function SumVis(r As Range) Dim cell As Excel.Range Dim total As Variant For Each cell In r.Cells If cell.Height <> 0 Then total = total + cell.Value End If Next SumVis = total End Function

ومن خلال الصورة التالية نقدر نركب الكود و لا تنسى حفظ الكود  :

وبعد تركيب الكود وحفظ تاتى مرحلة كتابة المعادلة  و التطبيق :

تمام الشرح و تقدر تحمل الشرح و الشيت من على الميديا فير

done