? Quando gli utenti di Excel devono accedere più ampio set di strumenti di database per manipolare i dati di fogli di calcolo , possono fare clic sull'icona " Excel " Accesso 'nel pannello " Importa" per duplicare i dati di un foglio come una nuova tabella di Access. Ma se gli utenti vogliono, invece di mantenere una sola copia dei dati , possono farlo attraverso la creazione di un collegamento anziché una tabella separata . Utilizzando VBA per creare questo link allevia gli utenti di Accesso di dover creare manualmente , un processo che richiede la selezione delle opzioni . Codice VBA sceglierà le opzioni corrette , diminuendo il rischio di possibili errori degli utenti . Istruzioni
1

Open Access , quindi immettere l'ambiente di sviluppo integrato di Visual Basic ( IDE ), premendo il tasto " Alt- F11 ". . Inserire un nuovo modulo di codice selezionando "Modulo" dal menu "Inserisci" dell'IDE
2

Incollare il seguente subroutine in qualsiasi parte del nuovo modulo di codice :

Public Sub xstest ( ) per

DoCmd.TransferSpreadsheet acLink , 5 , _

" newtable " , " ", True , "A1 : C4"

End Sub < br >
3

Type sopra il testo " " ( senza le virgolette ), il nome del percorso completo del foglio di calcolo Excel che si desidera di accesso per il collegamento. Inoltre , il tipo sul testo "A1 : C4" . Della specifica gamma completa , comprese le eventuali intestazioni di campo , della tabella nel foglio di calcolo che si desidera che il collegamento per fare riferimento a

Questa subroutine crea un collegamento dal Excel foglio di calcolo si specifica di una tabella chiamata " newtable . " Accesso VBA crea automaticamente questa tabella per visualizzare i dati del collegamento . L' argomento della funzione " acLink " dice a VBA per creare un collegamento dinamico , piuttosto che di importazione e fare una copia dei dati .
4

Clicca su uno di dichiarazioni del subroutine , quindi premere il tasto " F5 " per eseguire la subroutine . Premere il tasto " Alt- F11 " per immettere nuovamente l'ambiente standard di Access , quindi fare doppio clic sull'icona " newtable " in " tutte le tabelle " riquadro a sinistra della schermata. Accesso riporterà dati della tabella , che sarà la stessa di quella del foglio se visto in Excel . (Si noti che Microsoft ha disabilitato la funzione di consentire l'accesso per modificare i dati di un foglio . ) Economici

5 Premere il tasto " Alt- F11 " per rientrare l'IDE di Visual Basic , quindi apportare le seguenti modifiche al " xstest " subroutine : modificare il testo" acLink " leggere " acImport , " e cambiare " newtable " leggere " newtable2 " . Questi cambiamenti istruire VBA per creare una nuova tabella di Access che le importazioni , piuttosto che collegamenti a , i dati di fogli di calcolo . Questa azione consentirà agli utenti accesso per modificare i dati della nuova tabella ( anche se queste modifiche non si rifletteranno nel foglio di calcolo ) .
6

eseguire la subroutine come avete fatto al punto 4 , quindi premere " Alt- F8 " per tornare ad Access. Fare doppio clic sull'icona " newtable2 " nel riquadro sinistro dello schermo , quindi modificare la nuova tabella in base alle esigenze .