excel - 在工作表 1 中的名称范围内搜索文本并使用 Excel VBA 在工作表 2 中返回值

Question

我有以下几点：

表 1

(Name Range : Code)
Column A -------- Column B

School ------------ 1
College ----------- 2
University--------- 3

工作表 2
单元格 A1 =（在名称范围代码中搜索“学院”并获取“2”的值作为代码。）因此单元格 A1 中应该存在 2 的值。

请提供excel VBA

Answer 1

使用该VLOOKUP功能。

这是Application.WorksheetFunction.VLookUp在VBA中。

Answer 2

这对我有用：

Sub LookUpValue()
    Dim searchValue As String
    Dim lookupTable As Range

    Set lookupTable = Worksheets("Sheet1").Range("Code")
    searchValue = "College"

    Worksheets("Sheet2").Range("A1") = WorksheetFunction.VLookup(searchValue, lookupTable, 2, False)

 End Sub

希望这可以帮助...