|
Expérience pratique est l'une des meilleures façons de vous présenter à la Visual Basic pour Applications ( VBA) langage. VBA est un langage de programmation informatique disponible dans toutes les applications Microsoft Office telles que Access et Excel . Dans Access, lorsque vous créez une nouvelle base de données , vous commencez généralement par la création d' une table et l'insertion de données en elle. Ce processus peut facilement être automatisé par l'utilisateur de VBA. Dans Excel, vous pouvez automatiser les tâches de premier enregistrement des macros VBA . Vous pouvez modifier une macro VBA pour répondre à vos besoins après qu'il a été enregistrée . Choses que vous devez
Microsoft Office
Voir Plus Instructions
1 Lancement Microsoft Access , cliquez sur " Nouvelle base de données " et cliquez sur le bouton "Créer" pour créer un nouveau base de données. Cliquez sur " Database Tools " et cliquez sur " Visual Basic " pour lancer l'éditeur VBA. Cliquez sur le menu "Insertion " et cliquez sur "Module" pour insérer un nouveau module de code
2 Copiez et collez le code suivant pour créer une table et insérez une ligne de données en utilisant des requêtes SQL : . < Br > createTable Private Sub ()
strSQL Dim As String
strSQL = " CREATE TABLE myTbl ( fName TEXT, TEXT lName ) "
DoCmd.RunSQL ( strSQL )
strSQL = "INSERT INTO VALUES myTbl ( « John » , « Smith » ) «
DoCmd.SetWarnings Faux
DoCmd.RunSQL ( strSQL )
< p> End Sub
3 Appuyez sur "F5" pour exécuter la procédure .
4 Lancez Microsoft Excel , cliquez sur l'onglet « développeur » et cliquez sur «Enregistrer macro "pour commencer l'enregistrement d'une macro VBA. Cliquez sur " OK " dans la fenêtre de dialogue " Enregistrer une macro " . Tapez " 2" en A1 et "4" à "B1 ". Cliquez sur " Arrêter l'enregistrement " et cliquez sur " Visual Basic " pour lancer l'éditeur VBA
5 Développez le dossier "Modules" et double -cliquez sur " Module1 " pour afficher le code de macro suivant : .
Range (" A1") . Sélectionnez
ActiveCell.FormulaR1C1 = "2"
Range (" B1 " ) . Sélectionnez
ActiveCell.FormulaR1C1 = "4 "
6 Ajoutez le code suivant à la macro pour afficher l'ajout de A1 et B1 en C1:
Dim a As Integer
Dim b As Integer
totale As Integer
Range (" A1") . Sélectionnez
a = Range (" A1") . Value
Range (" B1 " ) . Sélectionnez
b = Range (" B1 " ) . Value
totale = a + b
Range (" C1" ) . Sélectionnez
ActiveCell.FormulaR1C1 = Total
7 Appuyez sur " F5" pour exécuter le code VBA macro.
|
