Imports Excel = Microsoft.Office.Interop.Excel Imports Microsoft.Office.Interop Imports Microsoft.Office.Interop.Excel Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Select Case ComboBox1.SelectedItem Case "Open Excel" Dim oExcel As New Microsoft.Office.Interop.Excel.Application() Dim oBook As Excel.WorkbookClass Dim oBooks As Excel.WorkbookClass Dim Open As New Excel.ApplicationClass 'Start Excel and open the workbook oExcel.Visible = True 'oBooks = oExcel.Workbooks oBook = oExcel.Workbooks.Open("H:\ExportExcelBook.xlsm")
oBook = oExcel.Workbooks.Open("H:\ExportExcelBook.xlsm")
Quote:Reserved for internal use.
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)