Libreria oggetti di Microsoft Excel . " Fare clic su "OK".
4 Digitare il seguente codice nella prima riga del modulo di importare lo spazio dei nomi di Microsoft Office :
Importazioni Microsoft.Office.Interop
5
Aggiungere il seguente codice all'interno del evento click del pulsante per creare un nuovo foglio di calcolo Excel :
Dim xlsxA As New Excel.Application
xlsxA.Visible = True
< p > Dim xlsxWks Come Excel.Workbooks = xlsxA.Workbooks
Dim xlsxWk Come Excel.Workbook = xlsxWks.Add
Dim xlsxShts Come Excel.Sheets = xlsxWk.Worksheets
dim xlsxSht Come Excel.Worksheet = xlsxShts ( " Foglio1 " ) economici 6
Aggiungere più righe al foglio di calcolo aggiungendo il seguente codice :
xlsxSht.Range ( "A1" ) . value = " Riga 1 con i dati "
xlsxSht.Range ( "A2" ) . value = " Riga 2 con i dati "
xlsxSht.Range ( "A3" ) . value = "Riga 3 con i dati "
7
Salvare il foglio di calcolo :
xlsxSht.SaveAs ( " C : \\ Temp \\ ExcelFile.xlsx " ) economici 8
Press "F5" per eseguire il programma e fare clic su " Button1 ".