首页 > 解决方案 > For循环在VBA中找不到价值

问题描述

我对下面的代码有一些问题。我想在工作表上找到数字“1”并将位置作为一组变量返回。代码在找到数字之前完成了循环,我不知道为什么。源文档上的格式(即合并的单元格)是否会以某种方式对其产生影响?我是 vba 的新手,非常感谢和帮助或洞察力或推荐阅读。

   Dim arr(0 To 100, 0 To 100) As Variant     
       Dim d As Long, c As Long
            For d = 1 To UBound(arr, 1)
            For c = 1 To UBound(arr, 2)
                If arr(d, c) = "1" Then
                    Exit For
                    Exit For
                End If
            Next c
            Next d

这段代码诚然取自 Tim Williams 并为我使用而修改。

标签: excelvbaloopsfor-loop

解决方案


推荐阅读