Excel VBA - 使用範圍內的長變量函數，同時過濾

我正在處理某些事情，我需要根據條件進行過濾並動態更改。我能夠找到我需要過濾的特定列的行數和列名稱。這裏是我的代碼，Excel VBA - 使用範圍內的長變量函數，同時過濾

Sub trial() 

Dim colm As Long, Rowz As Long, Coladd As String 
Dim nwb As Workbook, wb As Workbook 
Dim nwk As Worksheet, wk As Worksheet, wk1 As Worksheet 

colm = WorksheetFunction.Match("HeaderString", Sheets("Sheet1").Rows(1), 0) 
Columns(colm).Select 
Rowz = ActiveSheet.Cells(Rows.Count, colm).End(xlUp).Row 
Selection.AutoFilter 
ActiveSheet.Range("$colm.Address$1:$colm.Address$Rowz").AutoFilter Field:=1, Criteria1:="Mouse"

現在我該如何通過知道該列中的行數並知道該列號來獲取要進行過濾的範圍。我的標準是一個字符串 - 「鼠標」。我在代碼的最後一行出現錯誤。

請給我你的建議。提前致謝。

來源

2017-03-01 Sid29

[**'This' **]（http://www.contextures.com/xlautofilter03.html）鏈接將幫助你走了。 – ManishChristian

@ManishChristian感謝您的鏈接。對我來說最大的問題是不知道如何在範圍函數中添加地址。我看到一些關於將列號轉換爲列地址的其他堆棧問題，甚至不知道是否可以使用範圍函數與變量而不是直接地址 – Sid29

請參閱如下範圍：Range（Cells （1，colm），Cells（Rowz，colm））。AutoFilter Field：= 1，Criteria1：=「Mouse」' – Rory

要使用的列數，最簡單的方法是使用Range調用內部的兩個Cells電話：

Range(Cells(1, colm), Cells(Rowz, colm)).AutoFilter Field:=1, Criteria1:="Mouse"

還要注意的是，如果你需要指定範圍內的工作，你應該限定範圍和兩個單元與工作要求：

來源

2017-03-01 15:57:42 Rory

您也可以使用'With Sheets（「Some sheet」）... End With'來減少長度 –

是的，或者使用像'ws'這樣的變量。雖然我不想分散主要觀點。 ;） – Rory

Excel VBA - 使用範圍內的長變量函數，同時過濾

回答

相關問題