| 查看: 1156 | 回复: 2 | ||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | ||
[求助]
excel 宏 总是提示无效的next 控制变量
|
||
|
Sub checkareao() Dim colu1 As Integer Dim colu2 As Integer Dim colu3 As Integer For colu1 = 4 To 9 Step 1 For colu2 = 10 To 20 Step 2 For colu3 = 11 To 21 Step 2 For i = 3 To 2667 Step 1 If Sheet2.Cells(i, colu1) = 0 And Sheet2.Cells(i, colu2) > 0 Then Sheet2.Cells(i, colu3) = 0 Else Sheet2.Cells(i, colu3) = Sheet2.Cells(i, colu2) End If Next i Next colu1 Next colu2 Next colu3 End Sub 总是提醒无效的next控制变量引用,为什么啊,请懂的大侠帮忙看看啊, ![]() |
» 猜你喜欢
欢迎发来filecode的Mz6后的代码验证其规律
已经有70人回复
有时候,自然基金真的不能太认真 (我的申报经验)
已经有12人回复
招聘 金属平磨液,抛光液研发工程师
已经有3人回复
时间戳又变了8-15
已经有23人回复
filecode=后面第一个是大写字母
已经有7人回复
filecode
已经有12人回复
小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊
已经有13人回复
哪位老哥知道今年的国自然具体哪一天放榜?
已经有7人回复
关于Filecode分析方法
已经有13人回复
各位道友,我要去昆明玩几天,回来见。
已经有8人回复
3楼2012-06-05 20:30:04
【答案】应助回帖
★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
xzhdty: 金币+1, 欢迎常来程序语言 2012-06-05 21:55:18
njnuyhwang: 金币+10, ★★★很有帮助 2012-06-12 10:34:03
xzhdty: 金币+1, 欢迎常来程序语言 2012-06-05 21:55:18
njnuyhwang: 金币+10, ★★★很有帮助 2012-06-12 10:34:03
|
Next colu1 Next colu2 Next colu3 次序倒了 改成 Next colu3 Next colu2 Next colu1 |
» 本帖已获得的红花(最新10朵)

2楼2012-06-04 14:55:54











回复此楼
送鲜花一朵