0

有谁知道如何在表中返回一个值:

WorksheetFunction.Match

或者,还有任何其他替代功能可以用来使其正常工作。

rowNum = WorksheetFunction.Match(sum.Range("coverage").Table, temp.Range("A1:A200"), 0) 'colNum = WorksheetFunction.Match(sum.Range("Header").Value, temp.范围(“CoverageT”),0)

上面我尝试使用 WorksheetFunction 让它工作,但这是失败的。我将表命名为 'coverage 和 'header 以使其发挥作用,但我没有成功。

我希望我的问题足够清楚以获得一些帮助!如果还不够清楚,请发表评论!

4

1 回答 1

1

WorksheetFunction.Match 为您获取单个列范围或单个行范围中的值的相对位置。如果您的项目在列表中排名第三,则返回 3。

如果您想要表中的值,请使用 WorksheetFunction.VLookup。您正在表格或范围的第一列中查找您的项目。您指定要从中获取值的列,它将返回匹配行中的单元格值。

或者将 HLookup 用于转置表。

如果你真的想使用 Match,试试这个:

dim KeyValue as string
KeyValue = "my item"

Dim rowNum as Variant
If Not VBA.IsError(Application.Match(KeyValue, temp.Range("A1:A200"), 0)) Then
    rowNum = Application.Match(KeyValue, temp.Range("A1:A200"), 0)
End If

如果你想要一个 vlookup 试试这个:

Dim RetVal As Variant
Dim KeyValue As String 'or integer or date as appropriate
Dim LookupTable As Range
Dim ColumnNumber As Integer

KeyValue = "myItem"
LookupTable = Range("A1:A200")
ColumnNumber = 2
RetVal = WorksheetFunction.VLookup(KeyValue, LookupTable, ColumnNumber, False)
于 2013-10-12T15:17:20.230 回答