Apre excell Imports Microsoft.Office.Interop Imports Microsoft.Office.Core Dim objExc As Microsoft.Office.Interop.Excel.Application = CreateObject("excel.Application") objExc.Visible = True Dim Msalva As String = "C:\prova\a2006.xls" objExc.Workbooks.Open("c:\prova\730_2009.xltx") objExc = Nothing |