如何用VB调出这个excel工作簿？

显示全部楼层 · 2011-1-6 08:54:08

我已经做好了一个工作簿，现在想把它在VB中运行，该如何操作？
我已经做好了一个工作簿，现在想把它在VB中运行，该如何操作？
文件名为book1.xls,地址在C盘。
谢谢您的回答，但是还不行啊，要的是text1显示整个sheet1，text2显示整个sheet2啊！

千问 · 2011-1-6 08:54:08

在“工程”的“引用”中选择“microsoft excel 11.0”,"microsoft excel 11.0"看版本而定Dim xlApp As New Excel.ApplicationDim xlBook As New Excel.WorkbookDim xlSheet As New Excel.WorksheetPrivate Sub Command1_Click()On Error Resume Next '后台进程运行excel程序，并得到该工作簿 Set xlBook = xlApp.Workbooks.Open("f:\1.xls") xlApp.Visible = False