以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]for循环语句运行出错,请老师知道  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=99462)

--  作者:ltty5200
--  发布时间:2017/4/19 18:00:00
--  [求助]for循环语句运行出错,请老师知道
老师,我想在表A中第2行到第8行的“额“这一列”内输入200,使用for循环语句如下:
For i = 1 To 8
Tables("表A").Rows(i)("额") = 200
Next
运行时报错,提示信息为:
编译错误,“i”是“private”,因此它在次上下文中中不可访问。错误代码:for i =1 to 4。

ps:单独执行Tables("表A").Rows(数字)("额") = 200时不会出错。
请问如何修改该语句?因为我的程序需要在很多连续的行中同一列进行操作,我需要这样循环的代码,谢谢!

--  作者:有点色
--  发布时间:2017/4/19 18:02:00
--  
For i As Integer = 1 To 8
    Tables("表A").Rows(i)("额") = 200
Next