Libreria oggetti di Microsoft Excel" per aggiungerlo come riferimento .
3 Copia e incolla il seguente codice per creare le variabili oggetto di Excel si utilizzeranno per creare una nuova cartella di lavoro di Excel :
Dim objXLS Come Application = Nuovi applicativi
Dim objXLXBks come cartelle di lavoro = niente
Dim objXLSBk Come cartella di lavoro = niente
Dim objXLSShts come fogli = Nothing
Dim objXLSSht come manuale = Nothing
Dim objXLSrng come gamma = Nothing
4
Digitare il seguente codice per aggiungere una nuova cartella di lavoro :
objXLS.Visible = false
objXLS.DisplayAlerts = False
objXLSBk = CType ( objXLS.Workbooks.Add ( ) , Workbook ) economici 5 < p > aggiungere il seguente codice per aggiungere un nuovo foglio di lavoro :
objXLXBks = objXLS.Workbooks
objXLSSht = CType ( . objXLXBks ( 1) Sheets.Item ( 1 ) , fogli di lavoro ) per < p > objXLSShts = objXLSBk.Worksheets
6
Inserisci la data di "A1" in Excel aggiungendo la seguente riga di codice :
objXLSSht.Cells ( 1 , 1 ) = Now ( ) economici 7
Salvare la cartella di lavoro di Excel , digitare il seguente codice :
objXLSSht.SaveAs ( "C : \\ ExcelDate.xlsx " ) economici 8 < p > Visualizza una finestra di messaggio in cui la cartella di lavoro è stato creato e salvato .
MessageBox.Show (" Data è stata aggiunta in Excel" ) per
Premere F5 per eseguire il programma , quindi fare clic su " Button1 . "
