VB怎样操作向excel中插入数据（求代码） 20
插入的数据在第三行下面循环插入，但下面行的格式还不能变，刚接触VB不是很懂，求循环插入数据行代码...
插入的数据在第三行下面循环插入，但下面行的格式还不能变，刚接触VB不是很懂，求循环插入数据行代码
展开
2个回答
展开全部
通过看你的图片,和你的描述不是很一致.
只能给你一些思路.
Sub 循环插入()
For i = 1 To 10 '设定循环次数,从1到10
Cells(i, 1) = i * i '单元格i行1列输入数据i*i
Next
End Sub
'此程序运行后是在A1:A10的单元格依次填充1的平方,到10的平方
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
VB本身的自动化功能就可以实现，其方法如下：
1、在工程中引用Microsoft Excel类型库：
从"工程"菜单中选择"引用"栏；选择Microsoft Excel 9.0 Object Library（EXCEL2000），然后选择"确定"。表示在工程中要引用EXCEL类型库。
2、在通用对象的声明过程中定义EXCEL对象：
Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
1、在工程中引用Microsoft Excel类型库：
从"工程"菜单中选择"引用"栏；选择Microsoft Excel 9.0 Object Library（EXCEL2000），然后选择"确定"。表示在工程中要引用EXCEL类型库。
2、在通用对象的声明过程中定义EXCEL对象：
Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
