vb引用excel数据 需要用到什么技术?
情况是这样的我是大一学生做了一个vb程序用来输入实验数据然后计算直接测量量间接测量量转动惯量一类的东西,但是现在的问题是要一个一个输入比较麻烦。我想能不能建立一种接口,直...
情况是这样的 我是大一学生 做了一个vb程序 用来输入实验数据 然后计算直接测量量 间接测量量 转动惯量一类的东西,但是现在的问题是要一个一个输入 比较麻烦。我想能不能建立一种接口 ,直接导入整个班级的excel的数据,自动识别 并且计算? 我想问下这个需要哪方面的技术 我想去学习一下
展开
2个回答
2015-06-17
展开全部
不用自己建立接口吧. 你主要是不会在VB中去读取excel单元格里面的数据.你可以在VB中添加excel引用.使用createobject,再去读取excel单元格
dim myxls as excel.application
dim mybook as excel.workbook
dim mysheet as excel.worksheet
set myxls=createobject("excel.application")
mybook.open("文件的路径.xls")
set mybook=myxls.workbooks(1)
set mysheet=mybook.worksheets(1)
单元格A1的数据=mysheet.cells(1,1)
单元格A2的数据=mysheet.cells(2,1)
单元格B1的数据=mysheet.cells(1,2)
数据用完了之后
mybook.close
myapp.quit
set mybook,myxls,mysheet=nothing
大概是这样..
dim myxls as excel.application
dim mybook as excel.workbook
dim mysheet as excel.worksheet
set myxls=createobject("excel.application")
mybook.open("文件的路径.xls")
set mybook=myxls.workbooks(1)
set mysheet=mybook.worksheets(1)
单元格A1的数据=mysheet.cells(1,1)
单元格A2的数据=mysheet.cells(2,1)
单元格B1的数据=mysheet.cells(1,2)
数据用完了之后
mybook.close
myapp.quit
set mybook,myxls,mysheet=nothing
大概是这样..
更多追问追答
追问
能加个qq吗?
追答
可以
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询