Sapere come aprire un foglio elettronico Microsoft Excel da Microsoft Access e l'inserimento di una nuova colonna al foglio di calcolo utilizzando Visual Basic, Applications Edition (VBA ) può rendere l'applicazione di accesso più dinamico . Access è un sistema di gestione di database relazionale comunemente usato per i database più piccoli . Excel è un foglio di calcolo che offre potenti strumenti per analizzare i dati . VBA è un popolare linguaggio di programmazione utilizzato per automatizzare le attività altrimenti fatto manualmente. In pochi passi è possibile scrivere codice VBA in Access per aprire una cartella di lavoro di Excel e inserire una nuova colonna di Foglio1 . Istruzioni
1
Avviare Microsoft Office Access 2007 e selezionare " Database vuoto ", quindi fare clic su "Crea ". Fare clic su " Strumenti di database ", quindi selezionare " Visual Basic ". Fare clic sul campo "Inserisci" e selezionare "Modulo ".
2
Copia e incolla il seguente codice nel modulo . Questo codice apre un foglio di lavoro , inserire una nuova colonna a destra della "Colonna C " e inserire "Questa colonna è stata inserita da Access . "
Private Sub addExcelColumn ( ) per
Dim xlApp come Excel.Application
Dim XLBook Come Excel.Workbook
Dim xlSheet Come Excel.Worksheet
XLBook = Workbooks.Add ( Template : = " C: \\ Book1.xls " ) per
xlApp = XLBook.Parent
xlSheet = XLBook.Worksheets ( " Foglio1 " )
XLBook.Windows ( 1) . Visible = True
xlApp.Visible = True
xlSheet
Colonne . . ( "C : C " ) Selezionare
Selection.Insert Maiusc : = xlToRight
< p > . Range (" C1" ) . Selezionare
Selection.Value = "Questa colonna è stata inserita da Access "
. Range (" D3" ) . Selezionare
End With End Sub
3
modificare la seguente riga di codice e digitare il percorso del foglio di lavoro :
XLBook Workbooks.Add = ( Template : = " C : \\ Book1.xls " ) per
Eseguire il sottoprogramma premendo
" F5 ".