VBA Excel如何在工作表区域内查找某个值，发回这个值所在的行号、列号

用VBA代码编写，如何在工作表区域内查找某个值，发回这个值所在的行号、列号

• 

spwangxu| 浏览 7128 次

推荐于2016-01-03 11:29:18

最佳答案

1

2

3

4

5

6

7

8

9

Sub 查找()

For Each rng In Range("a1:d3")

    If rng = 7 Then

        a = rng.Row

        b = rng.Column

    End If

Next

MsgBox "行号为" & a & "-" & "列号为" & b

End Sub