您的位置：程序门 -> vb -> vba

请人帮忙解释一段程序

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

请人帮忙解释一段程序

发表于：2007-12-03 04:47:58 楼主

sub zelle for schleife1（ )
dim i as integer
sheets （"tabelle1").select
for i=1 to 10
cell （i,1)=i
next i
' und while.....wend
' und do while.....loop
' und do until.....loop
end sub

红色的是德语词 schleife是循环的意思 tabelle 是表格
这段程序说什么的。。？

发表于：2007-12-03 16:55:201楼得分:0

我认为是给表格1到10行的第一列分别赋值1到10

发表于：2007-12-23 04:39:102楼得分:0

1、zelle for schleife1 ：过程名？应改为schleife1
2、cell （i,1)=i 应为 cells（i,1)=i
这样就是“给表格1到10行的第一列分别赋值1到10”

发表于：2008-01-13 16:52:443楼得分:0

sub schleife1（)
dim i as integer '定义 i 变量
sheets （"tabelle1").select '选择表达式tabelle1.
for i=1 to 10 '用for循环 10 次
cell （i,1)=i '表单元格 i 行,1列等于 i 的值.由于循环10次,i的值从1开始,每次递增1,所以1-10行就次依次增加了1-10 10个值.
next i
end sub

注:你的代码第一行是错误的.

下一篇：excel的问题
上一篇：高手帮帮忙吧！！求您了！！！word为什么越来越慢？

其他资讯