|
Microsoft Access est le programme de base de données dans la suite Microsoft Office . Les développeurs de personnaliser cette suite en écrivant des programmes dans son langage de programmation , Visual Basic pour Applications ( VBA) . Accès à la programmation consiste à utiliser VBA pour créer et manipuler des objets de base de données , y compris des rapports, des tables, des requêtes et des formulaires de saisie de données. Par exemple , VBA peut automatiquement remplir le champ "genre" dans un formulaire de saisie des informations d'abonnés du magazine , lorsque la personne utilisant le formulaire entre les noms communs dans le « prénom» . Programmation Access vous donne la possibilité de faire la saisie des données et les tâches de récupération plus facile pour les utilisateurs de votre équipe. Choses que vous devez
Microsoft Access
Voir Plus Instructions
1 Open Access et appuyez sur " Alt- F11 " pour entrer dans l' environnement de codage (appelé "IDE" pour " environnement de développement intégré ») pour l'accès.
2 Cliquez sur "Module" l'article de l' menu "Insertion " pour créer une nouvelle fenêtre de saisie du code.
3 Coller dans la fenêtre de code de code de programme suivant, qui crée une table avec VBA:
Sous makeATable ()
de db As Database , TD TableDef , f Comme Field Of < p> Set db = CurrentDb
Set tbl = dbs.CreateTableDef ( " Userinfo " )
Set fld = tbl.CreateField ( " prenom " , dbText )
TBL . Fields.Append f
dbs.TableDefs.Append tb
' dbs.TableDefs.Refresh
End Sub
4 exécuter le programme en en cliquant sur une déclaration en elle et en appuyant sur la touche "F5 ".
5 Appuyez sur " Alt- F11 " pour revenir à l'interface principale d'accès , puis cliquez sur le bouton "<<" le volet de navigation, puis le bouton ">>" . Vous verrez une nouvelle table créée par votre programme. Lire plus d'informations sur la création de tableaux avec VBA sur la page MSDN page " Création et suppression de tables " .
6 tapez un échantillon premiers noms de la nouvelle table de fournir des données pour la requête VBA vous aurez créer prochain
7 Appuyez sur " Alt- F11 " pour revenir à l' environnement de codage et collez ce nouveau sous- routine ci-dessous la première que vous avez écrit : .
makeQuery public Sub () Photos db As DAO.Database
qd As DAO.QueryDef
str Dim As String
Set db = CurrentDb
On Error GoTo DontDelete
db.QueryDefs.Delete " quser "
DontDelete :
str = "SELECT * FROM Userinfo ; "
Set qd = db.CreateQueryDef ( " quser " , str )
End Sub
8 exécuter la nouvelle sous- routine que vous avez fait la première, puis retourner à l'accès et à chercher la nouvelle interroger votre code créé. C'est ce qu'on appelle " quser . "
9 Double -cliquez sur " quser " pour exécuter la requête . Access affiche tous les noms que vous avez inscrits dans le tableau " Userinfo " .
10 Créer un rapport en cliquant sur la rubrique " Userinfo " dans le volet de navigation , puis en cliquant sur «Rapport» sur la barre d'outils . Vous écrivez un programme VBA qui filtre le rapport pour une valeur spécifique que vous avez entré à l'étape 6 .
11 un clic droit sur l'onglet du nouveau rapport et sélectionnez « mode Création. " Cliquez sur la flèche pointant vers le bas dans la " Sur chargement " cas de d '«événement » de l'onglet du rapport à la droite de l'écran. Cette action vous permettra de revenir à l' IDE de VBA .
12 Collez le code suivant dans l'IDE . Remplacez le texte "VALEUR DU " avec une valeur particulière que vous avez entré à l'étape 6 .
Report_Load Private Sub ()
Me.Filter = " prenom =" " "" "
Me.FilterOn = True
End Sub
13 exécuter le rapport en appuyant sur" Alt- F11 "pour revenir à access, un clic droit sur l'onglet du rapport et en sélectionnant « Rapport View " . Access affiche le rapport , qui montrera que le dossier que vous avez tapé pour le filtre à l'étape 12 . En savoir plus sur l'utilisation de VBA avec des rapports sur la page Rapports d'accès .
|
