excel - 如何在excel VBA中根据行和列ID查找单元格值

Question

需要一个 VBA Sub 来根据行和列 ID 查找单元格值。
在下面的示例中，我需要选择 East 和 RT3 相交的值，即 80。

A B C D E
1 空 RT1 RT2 RT3 RT4
2 北 31 40 78 11
3 南 32 41 79 12
4 东 33 42 80 13
5 西 34 43 81 14

Answer 1

使用类似于下面未测试 :

Function getcell(ct as string, rt as string) as range

    With activecell
        R = .columns("A").find(rt).row
        C = .rows("1").find(ct).Column
        'The below will escape the function if none where found
        If r = nothing or c = nothing then exit function
        Set getcell = .cells(r, c)
    End with

End function