Les macros sont des programmes écrits dans un langage de script , tels que Microsoft Office de Visual Basic pour Applications ( VBA) . Macros VBA peuvent remplir des colonnes dans Access et Excel, en utilisant des méthodes (c.- fonctions) du modèle objet VBA, une hiérarchie d'objets virtuels. Colonnes de remplissage dans Access et Excel consiste à écrire le code source qui appelle ces méthodes avec des paramètres définis pour les valeurs à remplir les colonnes avec . Utilisation des macros VBA plutôt que la saisie manuelle pour remplir les colonnes des données réduit le temps nécessaire pour ajouter des données à votre accès et de tableaux Excel . Choses que vous devez
Microsoft Access et Excel
Voir Plus Instructions
Remplissez colonnes Excel avec des données
1
Ouvrez Excel et ouvrir la fenêtre de développement VBA en appuyant sur " alt "+" F11 ".
2
Double -cliquez sur le " l' objet " du volet" Projet Ce classeur "pour afficher une fenêtre pour entrer un nouveau code du programme.
3
Collez le programme qui apparaît ci-dessous dans le nouveau volet . Ce programme définit les valeurs de la propriété Cells de l'objet ActiveSheet . La propriété Cells représente toutes les cellules de la feuille de calcul actuelle. Les états «pour» et «Suivant» de la forme du programme , une structure en boucle qui remplit une colonne de la feuille de calcul actuelle des données .
FillColumns Public Sub ()
Dim col
< p> Pour col = 1 à 10
ActiveSheet.Cells ( col, 1) = " somevalue "
Suivant col
End Sub
4 < p> Cliquez sur une déclaration du programme FillColumns , puis appuyez sur la touche "F5 " pour exécuter ce programme .
5
Retour vers Excel en appuyant sur " Alt" + " F11 ". La feuille de calcul actuelle affiche « somevalue " pour les 10 premières rangées de la première colonne de la feuille de calcul.
Remplissez les colonnes d'accès aux données
6
Ouvrez Microsoft Access, puis créez un nouvelle table de base de données en cliquant sur "Table" l'article de l' menu " créer".
7
type " Champ1 " dans la cellule à côté de la cellule qui affiche "ID ", pour créer une colonne appelée " Champ1 " dans la nouvelle table. Votre macro VBA remplira ce champ avec des données.
8
Appuyez sur " Control" + " S ", " Table1" de type pour le nom de la table, puis cliquez sur "OK" pour enregistrer la nouvelle table.
9
pénétrer dans l'environnement VBA en appuyant sur " Alt" + " F11 ". Faire une nouvelle fenêtre de code source en cliquant sur la commande "Module" du menu "Insertion " .
10
Collez le programme colonne de remplissage suivant dans la nouvelle fenêtre de code source. Ce programme invite les Edition de l'objet Recordset et mise à jour des méthodes pour combler Champ1 de Table1 avec les données.
FillColumns Public Sub ()
Dim DBS DAO.Database
recset Dim comme DAO.Recordset
Dim i As Integer
Set dbs = CurrentDb
Set recset = dbs.OpenRecordset ( "Table1 " )
For i = 1 à 10
recset.AddNew
recset ! Champ1 = " Le magicien d' Oz"
recset.Update
Next i
< p > End Sub
11
exécuter le programme en cliquant sur l'une de ses déclarations et en appuyant sur la touche "F5 ". Appuyez sur " Alt" + " F11 " pour retourner à l'accès , puis double -cliquez sur la rubrique " Table1" du volet de navigation. Tableau 1 apparaîtra sur le réseau et afficher une colonne ( " Champ1 " ) que votre macro rempli de données .