Connaître comment ouvrir un tableur Microsoft Excel à partir de Microsoft Access et d'insérer une nouvelle colonne à la feuille de calcul à l'aide de Visual Basic pour Applications ( VBA) peut faire votre demande d'accès plus dynamique. L'accès est un système de gestion de base de données relationnelle couramment utilisée pour les plus petites bases de données . Excel est un tableur qui offre des outils puissants pour analyser les données . VBA est un langage de programmation informatique populaire utilisé pour automatiser des tâches autrement effectuées manuellement . En quelques étapes, vous pouvez écrire du code VBA dans Access pour ouvrir un classeur Excel et insérer une nouvelle colonne à la feuille Sheet1 . Instructions
1

Démarrer Microsoft Office Access 2007 et sélectionnez « Base de données vide " puis cliquez sur "Créer". Cliquez sur " Database Tools " puis sélectionnez " Visual Basic ". Cliquez sur le champ "Insérer" et sélectionner "Module ".
2

Copiez et collez le code suivant dans votre module. Ce code va ouvrir une feuille de calcul, insérer une nouvelle colonne à la droite de « colonne C " et insérer "Cette colonne a été inséré à partir d'Access . "

Private Sub addExcelColumn ( )

xlApp As Excel.application

xlBook As Excel.Workbook

xlSheet As Excel.Worksheet

Set xlBook = Workbooks.Add ( Modèle : = "C: \\ Book1.xls »)

Set xlApp = XLBook.Parent

Set xlSheet = XLBook.Worksheets ( " Sheet1 " )

XLBook.Windows (1). Visible = True

xlApp.Visible = True

xlSheet

Colonnes. . ( "C: C " ) Sélectionnez

Selection.Insert Maj : = xlToRight
< p> . Range (" C1" ) . Sélectionnez

Selection.Value = "Cette colonne a été inséré à partir d'Access "

. Range (" D3" ) . Sélectionnez

End With End Sub

3

Modifiez la ligne de code suivante et tapez le chemin d'accès à votre feuille de calcul:

Set xlBook = Workbooks.Add ( modèle : = " C: \\ Book1.xls " )

Exécutez votre routine en appuyant

"F5 ".