Clicca su "Strumenti Database " e cliccare su " Visual Basic " per avviare l'editor di Visual Basic. Fai clic sul menu "Inserisci" e fare clic su "Modulo " per aggiungere un nuovo modulo 
 2 
 Copia e incolla il seguente per avviare una nuova procedura di sub e di creare le variabili che verranno utilizzate per la connessione a Excel . : 
 
private Sub connectToExcel ( ) per
 Dim newExcelApp Come Excel.Application 
 
 Dim newWbk Come Excel.Workbook 
 3 
 Inserisci l' seguito per visualizzare l'applicazione Excel : 
 
 newExcelApp = Excel.Application 
 
 newExcelApp.Visible = True 
 4 
 Modifica " C : \\ MyEXCELBk.xlsx " sotto e digitare il percorso per la cartella di lavoro di Excel . Digitare il seguente codice per effettuare la connessione : 
 
newWbk = newExcelApp.Workbooks.Open ( " C : \\ MyEXCELBk.xlsx " ) economici 5
 Digitare il seguente codice per salvare qualsiasi modifiche e chiudere la cartella di lavoro : 
 
 ActiveWorkbook.Save 
 
 MsgBox "Fatto" 
 
 ActiveWorkbook.Close 
 
 End Sub 
 6 
 Premere " F5 " per eseguire la procedura. 
 
              
software © www.354353.com