[حل شده] تعداد ستون فیلتر شده

[sunstar]

سلام
آیا کدی وجودارد که تعدادستون های فیلتر شده در یک شیت را نشان دهد؟
با سپاس فراوان

[Amir Ghasemiyan]

سلام
آیا کدی وجودارد که تعدادستون های فیلتر شده در یک شیت را نشان دهد؟
با سپاس فراوان

سلام دوست عزیز
میتونید یک حلقه بنویسید و بگید سلول هایی که visible نیستن رو بشمار

[sunstar]

سلام استاد بزرگوار
منظور من تعداد ستون های فیلتر شده می باشد .مثلا در یک شیت ستون a , b , c فیلتر شده اند و با اجرای کد عدد (3) نمایش داده شود.
با سپاس فراوان

[Amir Ghasemiyan]

سلام استاد بزرگوار
منظور من تعداد ستون های فیلتر شده می باشد .مثلا در یک شیت ستون a , b , c فیلتر شده اند و با اجرای کد عدد (3) نمایش داده شود.
با سپاس فراوان

فکر نکنم کار راحت و کلا کار جالبی باشه. شما بگید خواستتون چیه شاید راه بهتری بود

[sunstar]

سلام
اطلاعات من در خصوص vba خیلی کمه .با هزار تقلا کد زیرو نوشتم شاید خالی از اشکال هم نباشه. امیدوارم به درد دوستان بزرگوارم بخوره

   Dim flt As Filter
   Dim intCol As Integer
   Dim x As Integer
   For Each flt In ActiveSheet.AutoFilter.Filters
      intCol = intCol + 1
      If flt.On Then
       x = x + 1
      Else
      x = x
      End If
   Next flt
   MsgBox "number of filtered coloumns =" & x