注册 登录
编程论坛 VB.NET论坛

vb.net 通过按钮打开一个本地Excel,实现不了,请指教

csuchen66 发布于 2011-05-03 09:40, 668 次点击
Imports Microsoft.VisualBasic.DateAndTime
Imports System.Windows.Forms
Imports System.Data.OleDb
Imports Microsoft.Office.Tools.Excel
Imports Microsoft.Office.Interop.Excel.XlApplicationInternational Imports dao

Public Class Form1
  
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim ex = CreateObject("excel.application")

        Dim exwBook As Excel.Workbook = ex.Workbooks.Open("D:\算工程数量\陈燕平精简表0425.xls")

        Dim exSheet1 = exwBook.Worksheets(1) '按表序
        
    End Sub

End Class
2 回复
#2
csuchen662011-05-03 09:41
我想要通过窗口的一个按钮打开本地计算机的一张Excel表,但运行的时候,我点击运行没反应,不弹出那张表,请指教,多谢了
#3
csuchen662011-05-03 18:25
已经弄懂了,Open只是在后台打开了Excel表,如果要弹出本地Excel表,需使用以下语句:
 System.Diagnostics.Process.Start("D:\算工程数量\表0425.xls ")    '打开本地的表
        xlBook.Save(True)   '保存表格
        xlBook.Close(True)  '关闭表格
        xlApp.Quit()  '退出表格进程

多谢关注过的人!
1