（急求）xls 中编写 VB 语言主要是 for 循环问题

q917661442 发布于 2014-06-27 19:35， 491 次点击

在电子表格中，插入一个按钮如何实现单击一次比较单元格A1与B1中值得大小，若A1小于B1则A1数值加1，并循环下去直到A1中的数值大于或等于B1，求指教啊！新手不懂得如何编写了。各位亲谁会告诉我下啊！急求

[ 本帖最后由 q917661442 于 2014-6-27 19:41 编辑 ]

3 回复

w3609894262014-06-27 22:37

什么单元格？excel吗？
下段代码写在excel中的VBA中，设置一个按钮就可以了
sub aa()
dim a as Integer
for i =1 to Range("a65536").End(xlUp).Row '数据最后一行
if cells(i,1)<cells(i,2) then
cells(i,2)=cells(i,2)+1
else
exit for
end if
next
end sub

w3609894262014-06-27 22:38

这个excel你去另外一个论坛，excel home 你的excel问题基本上都可以得到解决

q9176614422014-06-28 19:23

谢谢你的解答，。