Vide, hvordan man åbner et Microsoft Excel-regneark fra Microsoft Access , og indsætte en ny kolonne til regnearket ved hjælp af Visual Basic for Applications ( VBA ) kan gøre din Access-program mere dynamisk. Access er en relationel database management system der almindeligvis anvendes til mindre databaser. Excel er et regnearksprogram , der tilbyder stærke redskaber til at analysere data. VBA er et populært computer programmeringssprog bruges til at automatisere opgaver ellers sker manuelt. I et par trin, du kan skrive VBA-kode i Access til at åbne en Excel-projektmappe og indsætte en ny kolonne til Ark1 . Instruktioner
1
Start Microsoft Office Access 2007 og vælg " Tom database " og derefter klikke på "Opret ". Klik på " Database Tools " og derefter vælge " Visual Basic ". Klik på "Indsæt "-feltet og vælg " Modul ".
2
Kopier og indsæt følgende kode i dit modul. Denne kode vil åbne et regneark , skal du indsætte en ny kolonne til højre for " Kolonne C" og indsætte " Denne kolonne blev indsat fra Access ".
Private Sub addExcelColumn ( )
Dim XLApp Som Excel.Application
Dim XLBook Som Excel.Workbook
Dim XLSheet Som Excel.Worksheet
Set XLBook = Workbooks.Add ( Skabelon: = " C: \\ Projekt1.xls " )
Set XLApp = XLBook.Parent
Set XLSheet = XLBook.Worksheets ( " Ark1 " )
XLBook.Windows (1). Visible = Sand
XLApp.Visible = Sand
Med XLSheet
kolonner . . ( "C: C") Vælg
Selection.Insert Shift: = xlToRight
< p> . Range (" C1 "). Vælg
Selection.Value = " Denne kolonne blev indsat fra Access "
. Range (" D3 "). Vælg
End With
End Sub
3
Rediger følgende linje kode og skrive stien til dit regneark : Hej
Set XLBook = Workbooks.Add ( skabelon: = " C: \\ Projekt1.xls " )
Styr dit subrutine ved at trykke
" F5 ".