Microsoft Access et Excel presque aller de pair le développement d'applications de base de données Access. Les utilisateurs aiment à analyser leurs données en utilisant Excel, et vous pouvez leur donner cette fonctionnalité en étant en mesure de mettre à jour les feuilles de calcul à partir d'Access . Dans Access , vous pouvez utiliser Visual Basic pour Applications pour ouvrir un fichier Excel existant et le mettre à jour avec les données de manière dynamique. Dans VBA, vous pouvez utiliser la bibliothèque d'objets Microsoft Excel pour manipuler des objets Excel. Instructions
1

Cliquez sur l'onglet "Outils de base de données " , cliquez sur " Visual Basic", puis cliquez sur le menu "Insertion " . Cliquez sur " Module " pour insérer un nouveau module de code VBA.
2

Cliquez sur le menu «Outils» et cliquez sur « Références ». Cochez la case à côté de " Microsoft Excel 3

Commencez par taper le code suivant pour créer un nouveau sous procédure :

updateSpreadSheet Private Sub ()

On Error GoTo Err_updateSpreadSheet :
4

Tapez le code suivant pour créer le classeur et objets de feuille de calcul : Trouvez < p> wkBkObj As Excel.Workbook

xlSheet As Excel.Worksheet
5

ouvrez un classeur Excel existant et utilisez Sheet1 que la feuille de mettre à jour en ajoutant le code suivant:

Set wkBkObj = Workbooks.Open ("C: \\ mySpreadsheet.xlsx " )

Set xlSheet = wkBkObj.Worksheets ( "Sheet1" )

wkBkObj.Windows ( 1) . Visible = True
6

Ajoutez le code VBA suivant pour mettre à jour A1 de la feuille de calcul : . .

xlSheet

Range (" A1") Sélectionnez

. Range (" A1") . Value = " valeur actualisée à partir d'Access "

End With
7

enregistrez, fermez le classeur Excel, et mettre fin à la procédure en ajoutant le code suivant :

wkBkObj.Save

wkBkObj.Close

Exit_updateSpreadSheet :

Exit Sub

Err_updateSpreadSheet : < br >

MsgBox Err.Description

CV Exit_updateSpreadSheet :

End Sub
8

Appuyez sur " F5" pour exécuter la procédure et mettre à jour votre tableur < br . >