Capire come programmare VBA di Excel da Access consente di scrivere programmi che scambiano dati tra le due applicazioni. Ogni applicazione ha caratteristiche di altro, ma utilizzando quello che Microsoft chiama "Automazione", si può dare ogni programma il VBA di strumenti e oggetti virtuali di altro. Gli elementi chiave dell'automazione includono gli oggetti VBA virtuali di un'applicazione, ad esempio Excel "Cartelle di lavoro" insieme e la proprietà "ActiveCell". L'istruzione VBA che rende disponibili gli oggetti di Excel da Access è "CreateObject."

Istruzioni

Inviare dati a Excel

1

Aprire Access, quindi fare clic su pulsante "Visual Basic" della scheda "Developer" per entrare nell'ambiente di sviluppo Visual Basic.

2

Fare clic sul comando "Modulo" del menu "Inserisci" per creare una nuova finestra per tenere il vostro programma di controllo Excel, quindi fare clic sul menu "Strumenti". Il comando di "Riferimento", scegliere la casella di controllo "Microsoft Excel" così il programma può accedere oggetti virtuali di Excel.

3

Incollare il seguente programma nella finestra. Questo programma crea una cartella di lavoro di Excel, quindi inserisce il testo in una delle celle della cartella di lavoro.

Public Sub MadeByAccess()

Dim aplExcel As Excel. Application

Impostare aplExcel = New

aplExcel.Workbooks.Add

aplExcel.ActiveCell = "Hello from accesso."

aplExcel.ActiveWorkbook.SaveAs ("c:\MadeByAccess.xlsx")

aplExcel.Quit

End Sub

4

Fare clic sul comando di "Esegui" del menu "Esegui" per eseguire il programma, quindi utilizzare Esplora risorse per passare alla cartella "C:".

5

Doppio clic sul file "MadeByAccess.xlsx" per caricare il file in Excel. Si noti che la prima cella del primo foglio di lavoro viene visualizzato il testo "Ciao dall'accesso a," che è apparso nel programma.

Leggere un valore da Excel

6

Aprire Excel, quindi digitare il testo nella cella "A1" del primo foglio di lavoro. Premere contemporaneamente "Controllo" e "S", quindi digitare "C:\ForAccess.xlsx" nella casella di testo "Nome". Fare clic su "Salva" e premere "Control" e "F4" contemporaneamente per chiudere Excel.

7

Aprire Access, quindi scegliere "Visual Basic" pulsante della scheda "Sviluppo" per inserire l'ambiente di programmazione Visual Basic.

8

Fare clic sul comando "Di riferimento" del menu "Strumenti", quindi fai clic sul riquadro dell'elemento "Microsoft Excel" per consentire al programma di controllo Excel.

9

Fare clic sul comando "Modulo" del menu "Inserisci", quindi incollare il seguente programma in una nuova finestra che appare. Questo programma si apre la cartella di lavoro di Excel creato nel passaggio 1 e letture cella "A1" da tale cartella di lavoro.

Public Sub ForAccess()

Dim aplExcel As Excel. Application

Impostare aplExcel = New

aplExcel.Workbooks.Open ("c:\ForAccess.xlsx")

MsgBox aplExcel.ActiveCell

aplExcel.ActiveWorkbook.Close

aplExcel.Quit

End Sub

10

Fare clic sul comando di "Esegui" del menu "Esegui" per eseguire il programma. Accesso visualizzerà una finestra di messaggio che mostra il testo digitato nella cella di foglio di lavoro di Excel nel passaggio uno.