Comprendre comment le programme Excel VBA , Access vous permet d'écrire des programmes qui échangent des données entre les deux applications. Chaque application dispose de fonctionnalités pas l'autre , mais en utilisant ce que Microsoft appelle «Automatisation », vous pouvez donner à chaque programme les outils VBA et des objets virtuels de l'autre . Les éléments clés de l'automatisation comprennent les objets VBA virtuels d'une application , tels que la collecte Excel » Classeurs » et la propriété " ActiveCell " . La déclaration VBA qui rend les objets d'Excel disponible à l'accès est " CreateObject ". Instructions
envoyer des données vers Excel
1

Open Access , puis cliquez sur le bouton " Visual Basic " de l'onglet "Developer " de pénétrer dans l'environnement de développement Visual Basic .
2 < p > Cliquez sur la commande "Module" du menu "Insertion " pour créer une nouvelle fenêtre de tenir votre programme de contrôle Excel, puis cliquez sur le menu " Outils". Cliquez sur la commande « de référence» , puis cochez la case «Microsoft Excel» afin que votre programme peut accéder à des objets virtuels d'Excel .
3

Collez le programme suivant dans la fenêtre . Ce programme crée un classeur Excel, puis insère le texte dans l'une des cellules du classeur.

Public Sub MadeByAccess ()

aplExcel As Excel.Application

Set aplExcel = CreateObject ( " Excel.Application " )

aplExcel.Workbooks.Add

aplExcel.ActiveCell = " . Bonjour à partir d'Access "

aplExcel.ActiveWorkbook.SaveAs ( "c: \\ MadeByAccess.xlsx " )

aplExcel.Quit

End Sub
4

Cliquez sur" la commande Exécuter "" du menu " Run pour exécuter le programme, puis utiliser Windows explorer pour naviguer vers le dossier "C: \\".
5

Double- cliquez sur le fichier " MadeByAccess.xlsx " pour charger ce fichier dans Excel. Notez que la première cellule de la première feuille de calcul affiche le texte de " Bonjour à partir d'Access », paru dans votre programme.
Lire une valeur à partir d'Excel
6

Ouvrez Excel , puis tapez le texte dans la cellule " A1 " de la première feuille de calcul. Appuyez sur "Control" et "S " en même temps , puis tapez "C: \\ ForAccess.xlsx " dans la zone de texte "Nom" . Cliquez sur "Enregistrer ", puis appuyez sur "Control" et " F4 " simultanément pour fermer Excel.
7

Open Access , puis cliquez sur " Visual Basic " de l'onglet "Developer " de pour entrer dans la programmation Visual Basic environnement.
8

Cliquez sur la commande « de référence» du menu «Outils », puis cliquez sur la case de l'élément «Microsoft Excel» pour permettre à votre programme pour contrôler Excel.
9 < p> Cliquez la commande "Module" du menu " Insertion", puis collez le programme suivant dans la nouvelle fenêtre qui s'affiche. Ce programme ouvre le classeur Excel que vous avez créé à l'étape 1 , et lit la cellule "A1" à partir de ce classeur .

Public Sub ForAccess ()

aplExcel As Excel.Application
< p > Set aplExcel = CreateObject (" Excel.Application " )

aplExcel.Workbooks.Open ( "c: \\ ForAccess.xlsx " )

MsgBox aplExcel.ActiveCell

aplExcel . ActiveWorkbook.Close

aplExcel.Quit

End Sub
10

Cliquez sur la commande "Exécuter " du menu " Run" pour exécuter le programme. Access affiche une boîte de message indiquant le texte que vous avez tapé dans la cellule de feuille de calcul Excel dans la première étape .