[已解决]VBA太差了，请求高指点指点，如何能用？

pangwen_822 · 发表于 2011-12-13 09:57

本帖最后由 pangwen_822 于 2011-12-13 10:59 编辑

Sub aa()
For x = 3 To 1000
Sheets("日数据").Range("g" & x) = Application.WorksheetFunction.VLookup(Sheets("日数据").Range("f" & x), Sheets("日数据").Range("c3:d3000"), 2, False)
Next

End Sub
上面这出了什么问题？运行老是出这个： QQ截图20111213095153.png

VBA太差了，请求高手指点指点，如何才能用？

响应大家要求，上个附：

VLOOKUP(VBA).zip (21.53 KB, 下载次数: 9)

variable · 发表于 2011-12-13 10:17

前面加一句On Error Resume Next试试

variable · 发表于 2011-12-13 10:28

本帖最后由 variable 于 2011-12-13 10:28 编辑

你应该上一下附件，让高手看看出错的具体原因。

pangwen_822 · 发表于 2011-12-13 10:32

variable 发表于 2011-12-13 10:17
前面加一句On Error Resume Next试试

行是行，就是运行得太慢了，还不如直接用涵数！

有没有更好的办法呢？？？？？

fuxuanbo · 发表于 2011-12-13 10:35

应该增加上附件，这样高手们才好出手啊

上清宫主 · 发表于 2011-12-13 10:37

反对将VBA做成E函数的集成工厂！
建议用range.find或就用数组查找后写入等等方式

mxg825 · 发表于 2011-12-13 10:38

用数组加字典就是最快的了！

variable · 发表于 2011-12-13 10:42

同意楼上，试试放弃vlookup函数。

pangwen_822 · 发表于 2011-12-13 10:59

fuxuanbo 发表于 2011-12-13 10:35
应该增加上附件，这样高手们才好出手啊

已上附件，请高手指点｜｜｜｜｜｜｜｜｜｜｜｜｜｜

pangwen_822 · 发表于 2011-12-13 11:00

上清宫主发表于 2011-12-13 10:37
反对将VBA做成E函数的集成工厂！
建议用range.find或就用数组查找后写入等等方式

已上附件，请老师指点！！！！！！！！！！！

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