ExcelVBA Filter関数について
お世話になります
唐突ですが、Filter関数についてお教えください。
これってobject、特にレンジobjectには使えないのですか？
もし使えないならば、同様の用途のもの、他にありますでしょうか？
ご教示をお願い致します。
例文
Option Base 1
Option Explicit
Const カウントアップ As Integer = 1,Zero = 0, 真 As Boolean = True, 偽 As Boolean = False, DimBaseUnder = 0
Sub TEST()
Dim ランゲ As Range, カウンターr As Range, カウンターI As Long, 項目数() As String
カウンターI = DimBaseUnder
With Sheets("Sheet1")
ランゲ = .Range("A1:j40").Value
Do
カウンターI = カウンターI + カウントアップ
ReDim 項目数(カウンターI)
項目数(カウンターI) = CStr(ランゲ.Cells(1, 1).Value)
ランゲ = Filter(ランゲ, 項目数(カウンターI), 偽)
Loop Until ランゲ Is Nothing
End With
End Sub
