Hvordan bruke VBA i tilgang til åpne et Excel-regneark

Hvordan bruke VBA i tilgang til åpne et Excel-regneark


Prøver å analysere data gjennom rapporter i Access er ikke så brukervennlig som analysere data ved hjelp av Excel. I Access, kan du oss Excel Application objektet for å åpne et Excel-regneark ved hjelp av VBA. Når du har definert objektet, så kan du bruke "Open" eiendom for å åpne regnearkfilen. Når du åpner regnearket, kan du endre det dynamisk i skjult eller synlig modus. Den "Synlig" egenskapen brukes til å vise eller skjule regnearket etter at du åpner den ved hjelp av VBA-kode.

Bruksanvisning

1 Klikk på "Databaseverktøy" og klikk på "Visual Basic" for å starte Visual Basic Editor. Klikk på "Verktøy" -menyen og klikk på «Referanser». Scroll ned og merk av for "Microsoft Excel <versjonsnummer> Object Library." Klikk på "OK".

2 Opprett en ny sub prosedyre ved å skrive følgende:

Private Sub openSpreadsheet ()

3 Lag variablene du vil bruke for å få tilgang til Excel-objekter:

Dim xlsApp As Excel.Application

Dim xlsBook Som Excel.Workbook

4 Definer arbeidsboken du vil åpne ved å gi en bane og regneark navn ved hjelp av følgende VBA-kode:

Set xlsBook = Workbooks.Open("C:\my2007ExcelWorkbook.xlsx")

Sett xlsApp = xlsBook.Parent

5 Vis regnearket ved å skrive inn følgende kode:

xlsApp.Visible = True

6 Avslutt prosedyren ved å skrive "End Sub" på slutten av prosedyren. Trykk "F5" for å utføre prosedyren og åpne regnearket.