[算表] excel vba 計算資料欄位但不含隱藏欄位

[problemman (^^)]

軟體: Excel

版本:2016

使用vba計算 column 1中有幾個欄位有資料
但不含被篩選掉的項目

試過很多次都會將被篩選掉的都計算記進去
希望有高手能幫我一下
謝謝


原資料,尚未隱藏,項目各數 15
https://imgur.com/L7bBcx7

篩選後,欲使用vba計算項目得到 10
https://imgur.com/Vn0sqWl

檔案:
https://reurl.cc/exjjnx

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 175.98.7.241 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1596630435.A.C08.html
→ soyoso: 用工作表函數subtotal可回傳10
→ problemman: 抱歉請問沒辦法使用vba嗎? 因為我是想要把他當變數
→ problemman: 剛剛嘗試subtotal(2,A1:A16)回傳0 請問我有用錯嗎?THX
→ soyoso: 會說工作表函數就是指用在巨集內
→ soyoso: worksheetfunction.subtotal就是工作表函數在巨集的用法
→ soyoso: 另外也不是用2，要計數文字要用3
→ soyoso: 2，count計數數字，3，counta計數非空白儲存格
→ problemman: 感謝 在vba中成功了,再次感謝soyoso