我真的很困惑为什么我有2个For循环没有启动。然而,我的宏中的其他人工作正常。我甚至尝试将代码集拉到不同的子代中以查看其他代码是否会影响它,但它仍然无效! (这段代码昨天工作正常......声明都正确(在其他地方使用并重置正常)。
一个例子:
strVal = regionArr(counti, 3)
For textSearch = 6 To lastrowVF
If UCase(lesTab.Range("C" & textSearch).Text) Like UCase(strVal) & "*" Then
inTot.Range("K" & 2 + county).Value = lesTab.Range("C" & textSearch).Offset(0, 1).Value
inTot.Range("L" & 2 + county).Value = lesTab.Range("C" & textSearch).Offset(0, 2).Value
county = county + 1
End If
Next textSearch