Download
1 / 28
280 likes | 398 Vues
ACCESS. Requêtes, macros & modules. Interface. Rappel. Objet table, Objet formulaire, Objet requête, extraction Objet état. Aujourd’hui. Objet requête, Extraction Création Ajout Mise à jour Suppression Objet macro Objet module (VBA). Objet requête. Activité 1.
E N D
ACCESS Requêtes, macros & modules
Rappel • Objet table, • Objet formulaire, • Objet requête, • extraction • Objet état.
Aujourd’hui • Objet requête, • Extraction • Création • Ajout • Mise à jour • Suppression • Objet macro • Objet module (VBA)
Activité 1 • Importer le fichier ‘codes.xls’. • Eliminer la redondance de la base obtenue, à l’aide de requêtes.
Activité 2 • Automatiser l’ensemble des traitements de l’activité 1 à l’aide d’une macro exécutant un ensemble de requêtes. • Explorer les possibilités offertes par les macros.
Activité 3 • Etablir le modèle relationnel permettant le stockage des données des fichiers ‘country.txt’ et ‘genealogie.xml’. • Importer les fichiers et normaliser les bases à l’aide de macros et requêtes.
VBA : type de données • Déclaration d’une variable : Dim variable As type • Boolean, Integer, Long, Single, Double, Currency, String. • Déclaration d’une constante : Const constante = valeur
VBA : Entrées/sorties • MsgBox et InputBox • Conversion de type : CInt(), CLng(), CSng(), CDbl(), CBool(), CDate(), CCur(). • Exemple :
VBA : opérateurs • Comparaison : =, <>, < et <=, > et >=. • Logique : or, and, not. • Opération : +, -, *, / (division réelle), \ (division entière), Mod (reste de la division entière), ^ (puissance).
VBA : structure alternative If condition then ‘instructions si vrai Else ‘instructions si faux End if
VBA : structure itérative For var = min To max Step pas ‘instructions à répéter Next var Do While condition ‘instructions à répéter Loop
VBA : exercices • Calculer le minimum de deux nombres. • Calculer la somme des n premiers entiers. • Calculer la factorielle de n. • Calculer les n premiers nombres premiers.
VBA : objets DAO (Data access objects) • Outils/Référence • Microsoft DAO Object library
VBA : objets DAO (Data access objects) • Affichage/Explorateur d’objets • Database (une base de données) • Recordset (un ensemble d’enregistrements) • QueryDef (définition d’une requête) • …
VBA : objets DAO (Data access objects) • Exemple :
VBA : objet Database • .OpenRecordset(argument) argument = variable de type String « MaTable » « MaRequete » « SELECT * FROM MaTable »
VBA : objet Recordset • Accès aux enregistrements MovePrevious EOF BOF MoveLast MoveFirst MoveNext Attention aux boucles infinies !
VBA : objet Recordset • Accès aux champs/valeurs • .Fields(«NomChamps») • .Fields(numChamps) • (.Fields(«NomChamps»).Name = NomChamps) • Mode Edition • .Edit • .Update • .AddNew (ajouter un nouvel enregistrement) • Suppression : .Delete • Fin : .Close
VBA : exercices • Dans la table ‘country’, ajouter un champs calculé représentant la densité. • Compter le nombre de pays dont la densité est inférieure et supérieure à 100. • Créer une table : puissance3(entier, cube). La remplir à l’aide d’une procédure VBA avec les n premiers entiers et leurs cubes. • Créer une procédure permettant de remplir la table ‘country’ à l’aide de boîtes de dialogue.
VBA : exercices • Créer une procédure permettant de recopier les enregistrements de la table ‘country’ dans une table ‘sauvCountry’. • Créer une procédure permettant de remplir la table ‘country’ à l’aide de boîtes de dialogue. • Supprimer tous les enregistrements de la table ‘country’, puis remplissez-la avec ‘sauvCountry’. • Supprimer dans la table ‘Puissance3’ les lignes dont le cube est inférieur à 35.
Activité 4 • Etablir le modèle relationnel permettant le stockage des données du fichier ‘discours.xls’. • Importer le fichier et normaliser la base à l’aide de requêtes et modules.
Examen 14/01/2008 2h • Savoir créer un formulaire (S1). • Savoir créer des requêtes pour sortir des états ou des graphiques (S2). • Savoir importer un fichier (S3). • Savoir normaliser une base à l’aide de requêtes et de modules VBA (S3, dont l’activité 4).
