vb 查找excel单元格的值，显示值所在的行号，但值有多个，怎么全部找出来，比如找14所有的行号

用ⅤBA查找？

用for循环，逐行逐列查，符合条件就执行 *** 作(按你说的要求打印行号)

for i=1 to 10 '找1--10行

for j=1 to 10 '找1--10列

if cells(i,j)=14 then

print i & "行的" & j & "列是要找的值"

end if

next

next

sub a()

for i=1 to [a65536]end(3)row

    if range("A"&i)="6月19日" then

       str1=str1&"第"& i &"行" &","

    end if

next 

[b1]=left(str1,len(str1)-1)

end sub

’自己修改

Private Sub Command1_Click()

Dim i As Long, row As Long, col As Long, arr

Open "c:\123txt" For Input As #1

row = 5: col = 3 '设置行号和列号

arr = Split(StrConv(InputB(LOF(1), 1), vbUnicode), vbNewLine)

Close #1

If row + 1 <= UBound(arr) Then

If col <= Len(arr(row)) Then MsgBox "行号：" & row & ",列号：" & col & "=" & Mid(arr(row - 1), col, 1)

End If

End Sub

以上就是关于vb 查找excel单元格的值，显示值所在的行号，但值有多个，怎么全部找出来，比如找14所有的行号全部的内容，包括:vb 查找excel单元格的值，显示值所在的行号，但值有多个，怎么全部找出来，比如找14所有的行号、VB设计寻找EXCEL单元格中相同条件下的不同数据所在的行号、如何用VB读取文件中具体行和具体列的特定数值等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！