作者m9556 (紫色天平Boy)
看板Visual_Basic
标题Re: [VBA ] 关於excel的问题
时间Thu Nov 13 06:18:39 2008
你有用"F8" Debug mode 去看过为什麽会这样吗?
※ 引述《oycoyc (.......)》之铭言：
: 我要计算sheet2中有几个column,
: 因为每个column的最开始都固定是"nA"字串,
: 所以我的程式码如下,
: Sub 按钮1_Click()
: Dim i As Integer
: i = 1
: Do while Sheet2.Cells(1, i) = nA
^^^^^^^^^^^^^^^^^^^^^^^^
这里的叙述我用白话说: 当Sheet2.Cells(1, i) 等於 nA 'nA :内容"无"
Do while=>当cells(1,i) "等於无" 不成立就跳出LOOP ，
因为Cells(1,1) 有值 =\= 无,形成"不成立条件"当然会跳出，
我就说这样!!!你在想想吧!!!
建议你在最上面加入 Option Explicit
: i = i + 1
: Loop
: '在sheet1显示出有几个column
: Sheet1.Cells(1, 2) = i - 1
: End Sub
: 结果答案都是0,
: 奇怪的是我把判断式改为
: Sheet2.Cells(1,i) <> nA
: 之後,
: 答案竟然正确了!?
: 怎麽逻辑刚好相反?
: 是我哪里搞错了吗?
: 烦请诸位高手指点迷津为小弟,感谢!!!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.230.221.175
1F：推 MOONRAKER:你真有耐心…我看到他说「没有才可以」就不想理他了… 11/13 14:16
2F：推 oycoyc:问题已解决,感谢你的解答! 11/13 17:27
3F：→ m9556:唉~我也不想~只是来这想学~却是都来敎别人~希望新手多想想! 11/13 22:04