求解：如何定位某字符第一次出现的行列号？

czr0373

如何定位出王五第一次出现，行3，列2？？

	A列	B列	C列
行1	张三	张三	张三
行2	张三	刘二	李四
行3	张三	王五	张三
行4	张三	赵六	王五
行5	张三	王五	王五

as42065300

用find去查找如：msgbox range("b:b").find("王五").row

z403025335

Sub cz()
Dim r As Range, s
s = InputBox("请输入要查找的字符", "查找")
Set r = Selection.Find(s, Selection.Cells(1, 1), xlFormulas, , , xlNext) 'Selection可以更换为指定的Range
MsgBox "该字符首次出现的位置在" & r.Address
End Sub

jiminyanyan

用Find去查。。。。

jiminyanyan

Sub test()
    Dim arr
    arr = Sheet1.UsedRange
    For j = 1 To UBound(arr, 2)
        For i = 1 To UBound(arr)
            If arr(i, j) = "王五" Then
                MsgBox i & "," & j
                GoTo line
            End If
        Next
    Next
line:
End Sub

jiminyanyan

。。。。。。。。

hcm19522

G2:G16{=MIN(IF(B$2:D$16=F2,A$2:A$16))

H2:H16{=MIN(IF(B$2:D$16=F2,B$1:D$1))