VB中怎么实现对EXCEL表格的计算？

在vb中怎么实现对EXCEL表格中数据的计算？如果本来用的是EXCEL中宏的 VB编辑器 怎么转换成可执行文件？

在vb 工程 里引用 添加microsoft excel 11.0 object library 这样vb就可以使用excel里的命令了 然后在vb里定义
Dim xlApp As Excel.Application '定义EXCEL类
Dim xlBook As Excel.Workbook '定义工件簿类
Dim xlsheet As Excel.Worksheet '定义工作表类
你可以打开一个已有的excel，也可以创建一个新的excel

Private Sub Command1_Click() '打开EXCEL过程
If Dir("C:\Documents and Settings\Administrator\桌面\excel.bz") = "" Then '判断EXCEL是否打开
Set xlApp = CreateObject("Excel.Application") '创建EXCEL应用类
xlApp.Visible = True '设置EXCEL可见
Set xlBook = xlApp.Workbooks.Open("C:\Documents and Settings\Administrator\桌面\aa.xls") '打开EXCEL工作簿
Set xlsheet = xlBook.Worksheets(1) '打开EXCEL工作表
xlsheet.Activate '激活工作表
End If
End Sub
然后你可以在vb里定义一个数组 将将excel里的数据赋值给它 就可以用了。。。。具体方法你可以看看资料追问

您好 请问怎么把这个转换成可执行文件呢？把EXCEL里面的编程放到VB中去用，用输入文件来读取EXCEL的数值

追答

上面的代码是直接在vb中编译执行的，编完程序以后，在文件的下拉菜单里有生成可执行文件，用这个就可以了。。。你后面那句 用输入文件来读取EXCEL的数值 不懂什么意思

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/svqs2mmvf.html