Re: [算表] Excel如何取得篩選的傳回值個數?
Selection.SpecialCells(xlCellTypeVisible).Count - 1
上式標題也會算進去 故 -1
如要正確設定篩選結果範圍
http://blog.xuite.net/crdotlin/excel/11049893
(網頁中介紹如何遍歷篩選結果範圍)
結論
Sub Macro1()
Set Rng = Selection
Rng.AutoFilter Field:=1, Criteria1:="a"
Set Rng = Rng.Resize(Rng.Rows.Count - 1).Offset(1, 0). _
SpecialCells(xlCellTypeVisible)
MsgBox Rng.Count
End Sub
※ 引述《outlookterry (失)》之銘言:
: 軟體: Microsoft Office Excel
: 版本: 2003
: 例如我使用下列自動篩選的巨集:
: Selection.AutoFilter Field:=1, Criteria1:="a"
: 請問要如何計算自動篩選的傳回值個數?
: 例如篩選"a"後得到10列的內容,我希望能夠在vb中取得10這個值,
: 在此請教各位先進。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.164.49.84
※ 編輯: JieJuen 來自: 218.164.50.43 (08/15 10:58)
→
08/15 11:06, , 1F
08/15 11:06, 1F
→
02/24 21:45, , 2F
02/24 21:45, 2F
→
02/24 21:46, , 3F
02/24 21:46, 3F
→
02/24 21:48, , 4F
02/24 21:48, 4F
→
02/24 21:48, , 5F
02/24 21:48, 5F
→
02/24 21:48, , 6F
02/24 21:48, 6F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Office 近期熱門文章
PTT數位生活區 即時熱門文章