VB编程如何实现将VB程序运算结果有序输出在Excel里?

工作中要经常做一重复性的计算,并且由于做记录的需要要将已知和结果有序保存在一Excel里,我编辑了一个VB小工程实现了整个计算过程,但在将结果和已知输出到Excel里时遇... 工作中要经常做一重复性的计算,并且由于做记录的需要要将已知和结果有序保存在一Excel里,我编辑了一个VB小工程实现了整个计算过程,但在将结果和已知输出到Excel里时遇到了困难。
通过如下程序语句:
Private Sub Command1_Click()
i = InputBox("?", "?") '输入文件名
Open i For Output As #1 '打开文件
Print #1, Text1.Text '输出text1的内容到文件
Close #1 '关闭
End Sub(网上下的模板)
我基本上可以实现将数据输入到Excel里,但是实现过程不是很方便,而且不太满足大量数据有序的输出,比如实现不了如何将数据输出到指定的Excel单元格中(默认的多数据输出都是纵向的,不知道怎么改变……)。
哪位高手能否告诉我一个好点儿的将VB程序运算结果有序输出在Excel里的语句?VB和Excel两文件间数据交流方面的知识应该看哪些板块参考资料?他们间的一些命令是如何识别的?Dim xlApp As Excel.Application这句话是什么意思?
本人非计算机专业,VB也是自学了一些,希望得到高手指点,不甚感激,回答详细有用将追加分……
展开
 我来答
历又
2008-12-08 · TA获得超过299个赞
知道小有建树答主
回答量:726
采纳率:100%
帮助的人:449万
展开全部
Dim VBExcel As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
dim i as integer
Set VBExcel = New Excel.Application
Set xlBook = VBExcel.Workbooks.Open("此处写你的EXL文件名的绝对地址")
Set xlSheet = xlBook.Worksheets("sheet1") '选择表sheet1
xlSheet.Activate
for i=1 to 100
xlSheet.cells(1,2)=1234 '这句将数据输出到指定的Excel单元格(第一行,第二列)
next i
xlBook.save
xlBook.close

他们间的一些命令是如何识别的?———我也不知道,只知道是发送数据流信息。

Dim xlApp As Excel.Application定义xlApp为一个Excel应用程序类(或实例吧)
尼欧赵
2008-12-08 · TA获得超过823个赞
知道大有可为答主
回答量:1597
采纳率:0%
帮助的人:1204万
展开全部
你到Excel中录制一个宏,然后就可以仿照宏里面的命令来做你要做的事情了。
录制宏的意思就是把你对Excel的一些操作变为vba命令。
首先你要在vb中添加一个Excel的引用,才可以用二楼的那些程序。
Dim VBExcel As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
=====基本思想你可以理解为在vb中调用Excel的命令集(宏),来对Excel来操作,学习参考资料就是先学学宏,里面的命令和vb很相似的。然后随便在网上看看怎么在vb里对excel进行操作。二楼的算是最简单的一种。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
yym6211
2008-12-08 · TA获得超过1159个赞
知道大有可为答主
回答量:895
采纳率:0%
帮助的人:724万
展开全部
xlApp As Excel.Application表示定义一个Excel程序变量xlApp.
我建议你将你的VB工程转化为Excel中的VBA工程,直接在Excel中运行。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
jeff13141988
2008-12-11 · TA获得超过790个赞
知道小有建树答主
回答量:402
采纳率:25%
帮助的人:68.4万
展开全部
指定单元格名称:range("A1")=22
指定单元格相对位置:cells(1,1)=22
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式