Fare clic sulla scheda "Database Strumenti" , clicca su " Visual Basic ", e fare clic sul menu "Inserisci" . Fare clic su "Modulo" per inserire un nuovo modulo di codice VBA . 
 
 2 Fare clic sul menu " Strumenti " e cliccare su " Riferimenti ". Seleziona la casella accanto a "   Inizia digitando il seguente codice per creare una nuova sotto procedura :   updateSpreadSheet private Sub ( ) per   On Error GoTo Err_updateSpreadSheet :   Digitare il seguente codice per creare la cartella di lavoro e gli oggetti del foglio di lavoro :   Dim wkBkObj come Excel.Workbook   Dim xlSheet come Excel.Worksheet   Aprire una cartella di lavoro di Excel esistente e utilizzare Foglio1 come il foglio di aggiornare aggiungendo il seguente codice : < br   Set> wkBkObj = Workbooks.Open ( " C : \\ mySpreadsheet.xlsx " ) per   xlSheet = wkBkObj.Worksheets ( " Foglio1 " )   wkBkObj.Windows ( 1 ) . Visible = True   Aggiungere il seguente codice VBA per aggiornare A1 del foglio di calcolo : . .   xlSheet   Range (" A1 ") Selezionare   . Range (" A1") . value = " valore aggiornato da Access "   End With   Salvare , chiudere la cartella di lavoro di Excel , e terminare la procedura aggiungendo il seguente codice :   wkBkObj.Save   wkBkObj.Close   Exit_updateSpreadSheet :   Exit Sub 
              
 3 
 
 4 
 
 
 5 
 
 6 
 
 
 
 
 7 
 
 
 
 
                  
Informazioni correlate
                  
software © www.354353.com