[已解决]帮忙解答一下？

sdfssdd · 发表于 2014-3-31 15:27

本帖最后由 sdfssdd 于 2014-3-31 17:00 编辑

Sub abc()
Arr = Sheet1.UsedRange
For Each cel In Arr
If InStr(cel, "f") Then GoTo 100
Next
Call 宏1
100:
End Sub

最佳答案

hwc2ycy

2014-3-31 16:05

复制代码

hwc2ycy · 发表于 2014-3-31 15:36

本帖最后由 hwc2ycy 于 2014-3-31 15:41 编辑

Arr = Sheet1.UsedRange
你F8一看就知道了。
不同的情况下，结果是不一样的。
要么是数组，要么就不是。

hwc2ycy · 发表于 2014-3-31 15:42

对于一个新建的工作表，usedrange返回的一般就是A1单元格。

sdfssdd · 发表于 2014-3-31 15:49

hwc2ycy 发表于 2014-3-31 15:36
Arr = Sheet1.UsedRange
你F8一看就知道了。
不同的情况下，结果是不一样的。

按F8怎么看出是数组？

hwc2ycy · 发表于 2014-3-31 16:02

在本地窗口观察arr变量嘛。

hwc2ycy · 发表于 2014-3-31 16:05

复制代码

蓝粆 · 发表于 2014-4-3 22:09

原来本地窗口是干这活的

		自动登录	找回密码
密码			注册