Savoir comment écrire une macro Word qui lit les données à partir d'Excel vous présente une approche pour contrôler une application Office à l' autre . Microsoft appelle ce type de contrôle " Automation. " Automatisation permet de l'un des programmes Office, tels que Word, Excel, Access et PowerPoint, établissent un lien vers , puis utilisez les objets virtuels d'une autre application Office. Pour écrire une macro Word qui lit les données à partir d'Excel , utilisez l'instruction " CreateObject " de Visual Basic pour créer un lien vers Excel. Ensuite, utilisez ce lien pour lire les données de l' objet " Cell" d'Excel . Instructions
1
Ouvrez Excel , puis tapez une valeur dans la première cellule de la première feuille de calcul. Cliquez la commande "Enregistrer " du bouton Office , puis tapez "c: \\ ReadFromExcel.xlsx " pour le nom du fichier . Cliquez sur " Enregistrer" pour enregistrer le classeur , puis fermez Excel.
2
Cliquez sur le bouton Office dans Word, puis cliquez sur le bouton "Options". Cliquez sur la case " développeur" pour afficher l'onglet "Developer " , qui détient les commandes de macro de Word .
3
Cliquez sur le bouton " Visual Basic " de l'onglet "Developer " de d'entrer dans le développement Visual Basic environnement.
4
Cliquez sur le menu " Outils", puis cliquez sur la commande «Références» . Cliquez sur le " Microsoft Excel objets", qui permet à votre macro accéder aux objets virtuels d'Excel.
5
Tapez le programme suivant dans la fenêtre de code. Ce programme crée un lien vers l'application Excel, puis fermez le lien. Le programme ne fait encore rien avec le lien établi . Vous allez maintenant utiliser le lien pour ouvrir le classeur Excel que vous avez créé à l'étape 1 .
Public Sub ReadExcelData ()
pgmExcel As Excel.Application
Set pgmExcel = CreateObject (" Excel.Application " )
pgmExcel.Quit
End Sub
6
Entrez les nouvelles déclarations suivantes après l'instruction «Set» . Ces déclarations ouvrez le classeur Excel que vous avez créé à l'étape 1 , puis fermez le classeur. Le programme révisé n'a pas encore lu toutes les informations du classeur . La déclaration suivante vous écrirez lit les informations du classeur
PgmExcel.Workbooks.Open "c: \\ ReadFromExcel.xlsx " .
7 Type de
les instructions suivantes après le " Ouvrez " déclaration. Cette déclaration utilise l'objet pgmExcel pour lire la valeur de la première cellule dans le classeur à partir de l'étape 1. La déclaration " MsgBox" affiche cette valeur.
MsgBox pgmExcel.ActiveWorkbook.Sheets (1). Cells (1, 1 )
8
Cliquez sur l'un des énoncés du programme, puis cliquez sur la commande "Exécuter" du menu " Run" . Votre programme sera exécuté et afficher la valeur de la cellule dans laquelle vous avez tapé à l'étape 1 .
