Hvordan koble til en MS Excel regneark fra MS Access

Hvordan koble til en MS Excel regneark fra MS Access


Hvis du trenger å bruke Excel-data i en Access-database eller vice versa, kan du koble begge programmene ved hjelp av Microsoft Visual Basic for Applications eller VBA. Bruk VBA i Microsoft Office for å automatisere rutineoppgaver som ellers gjøres manuelt. I Access, kan du benytte Microsoft Excel objektbiblioteket for å lage en forbindelse med en Excel-arbeidsbok og utveksle data mellom applikasjoner.

Bruksanvisning

1 Klikk "Databaseverktøy" og klikk "Visual Basic" for å starte Visual Basic Editor. Klikk på "Insert" -menyen og klikk "Module" for å legge til en ny modul.

2 Kopier og lim inn følgende for å starte en ny sub prosedyre og lage variabler som du vil bruke for å koble til Excel:

Private Sub connectToExcel ()

Dim newExcelApp As Excel.Application

Dim newWbk Som Excel.Workbook

3 Skriv inn følgende for å vise Excel-programmet:

Set newExcelApp = Excel.Application

newExcelApp.Visible = True

4 Edit "C: \ MyEXCELBk.xlsx" nedenfor og skriv inn banen for Excel-arbeidsboken. Skriv inn følgende kode for å gjøre tilkoblingen:

Set newWbk = newExcelApp.Workbooks.Open("C:\MyEXCELBk.xlsx")

5 Skriv inn følgende kode for å lagre eventuelle endringer og lukke arbeidsboken:

ActiveWorkbook.Save

MsgBox "Ferdig"

ActiveWorkbook.Close

End Sub

6 Trykk "F5" for å kjøre prosedyren.