vba单元格查找

1、单元格查找,循环查找

image.png

Sub lookat()
Dim i&, j&, t As Date
t = Time()

For i = 1 To 10000
    For j = 1 To 50
        If Cells(i, j) = "赵六" Then
            Cells(i, j).Interior.Color = vbRed
            Cells(i, j).Select
            GoTo FOUND
        End If
    Next j
Next i
FOUND:

个人编程学习
python,matlab,VB

喜欢追星的非科班的编程爱好者

467 声望
79 粉丝
0 条评论

喜欢追星的非科班的编程爱好者

467 声望
79 粉丝
宣传栏