Microsoft Access è il programma di database della suite Microsoft Office . Gli sviluppatori di personalizzare questa suite da scrivere programmi nel linguaggio di programmazione Visual Basic, Applications Edition (VBA ) . Accesso alla programmazione comporta l'uso di VBA per creare e manipolare oggetti di database , comprese le relazioni , tabelle, query e maschere di immissione dati . Ad esempio , VBA può popolare automaticamente il campo " di genere" in una forma per l'inserimento di informazioni abbonati rivista , quando la persona che utilizza il modulo entra nomi comuni nel campo " Nome". Accesso alla programmazione ti dà la possibilità di rendere l'immissione di dati e attività di recupero più facile per gli utenti della tua squadra. Cose che ti serviranno
Microsoft Access
Mostra più istruzioni
1
Open Access e premere il tasto "Alt - F11 " per entrare nell'ambiente di codifica (chiamata " IDE " per " ambiente di sviluppo integrato " ) per l'accesso .
2
Clicca voce del menu "Inserisci" "Modulo" per creare una nuova finestra per l'immissione del codice .
3 < p > Incolla nella finestra del codice il seguente codice di programma , che crea una tabella con VBA :
Sub makeATable ( ) per
Dim db As Database , td Come TableDef , f Come Campo
< p > Set db = CurrentDb
Set tbl = dbs.CreateTableDef ( " userinfo " ) per
Set fld = tbl.CreateField ( "Nome " , dbText ) per
tbl . Fields.Append
f
dbs.TableDefs.Append tb
' dbs.TableDefs.Refresh
End Sub
4
Eseguire il programma da cliccando su qualsiasi dichiarazione in esso e premendo il tasto " F5 ".
5
Premete "Alt - F11 " per tornare all'interfaccia principale di accesso , quindi fare clic su pulsante "<<" del pannello di navigazione , quindi il suo pulsante ">>" . Vedrete una nuova tabella creata dal programma. Leggi ulteriori informazioni sulla creazione di tabelle con VBA sulla pagina MSDN pagina " Creare ed eliminare tabelle " .
6
digitare un campione alcuni primi nomi della nuova tabella di fornire i dati per la query VBA viene creare prossima
7
Premi " Alt- F11 " per tornare all'ambiente di codifica e incolla questo nuovo sub-routine sotto il primo che hai scritto : .
pubblico makeQuery sub ( )
Dim db As DAO.Database
Dim qd Come DAO.QueryDef
Dim str As String
Set db = CurrentDb
on Error GoTo DontDelete
db.QueryDefs.Delete " QUSER "
DontDelete :
str = "SELECT * FROM userinfo ; "
qd = db.CreateQueryDef ( " QUSER " , str ) per
End sub
8
eseguire il nuovo sub-routine come avete fatto il primo, per poi tornare ad Access e cercare il nuovo interrogare il codice creato. Si chiama " . QUSER "
9
doppio clic su " QUSER " per eseguire la query . L'accesso consente di visualizzare tutti i nomi inseriti nella tabella " userinfo " .
10
Creare un report facendo clic sulla voce " userinfo " nel pannello di navigazione , quindi facendo clic su "Report" sulla barra degli strumenti . Potrai scrivere un programma VBA che filtra il rapporto per un valore specifico immesso nel passaggio 6 .
11
destro fare clic sulla scheda del nuovo rapporto e selezionare " visualizzazione struttura ". Fare clic sulla freccia rivolta verso il basso nel caso in "On Load " della della scheda " Evento" del rapporto a destra dello schermo . Questa azione consente di tornare al VBA .
12
Incollare il seguente codice nell'IDE . Sostituire il testo " PARTICOLARE " con un particolare valore immesso nel passaggio 6 .
Report_Load Private Sub ( ) per
Me.Filter = " Nome = " " PARTICOLARE " " "
Me.FilterOn = True
End Sub
13
eseguire il report con il tasto" Alt- F11 "per tornare alla Access, clic destro sulla scheda del report e selezionare " Report View " . L'accesso verrà visualizzato il report , che mostra solo il record immesso per il filtro nel passaggio 12 . Per saperne di più sull'utilizzo di VBA con le relazioni sulla pagina Report Access.
