Microsoft Access und Excel fast Hand in Hand gehen , wenn die Entwicklung von Datenbankanwendungen in Access. Nutzer lieben es, ihre Daten mit Excel analysieren , und Sie können ihnen diese Funktionalität durch die Möglichkeit, Tabellen aus Access aktualisieren. In Access können Sie Visual Basic für Applikationen verwenden, um eine vorhandene Excel-Tabelle öffnen und aktualisieren Sie es mit Daten dynamisch . In VBA können Sie die Microsoft Excel Object Library auf Excel-Objekte zu manipulieren. Anleitung
1

Klicken Sie auf " Database Tools ", klicken Sie " Visual Basic ", und klicken Sie auf "Einfügen "-Menü. Klicken Sie auf " Module" ein neues Modul VBA-Code einzufügen.
2

Klicken Sie auf das Menü "Extras" und dann auf " Referenzen . " Aktivieren Sie das Kontrollkästchen neben " Microsoft Excel Object Library" und klicken Sie auf " OK", um den Verweis hinzuzufügen .
3

starten , indem Sie den folgenden Code, um ein neues Sub erstellen Prozedur : private Sub

updateSpreadSheet ()

On Error GoTo Err_updateSpreadSheet :
4

Geben Sie den folgenden Code , um die Arbeitsmappe und Arbeitsblatt Objekte zu erstellen :
< p> Dim wkBkObj wie Excel.Workbook

Dim XLSheet wie Excel.Worksheet
5

Öffnen Sie eine vorhandene Excel-Arbeitsmappe und verwenden Tabelle1 als Blatt , indem Sie den folgenden Code zu aktualisieren:

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

Set XLSheet = wkBkObj.Worksheets ( " Tabelle1 " )

wkBkObj.Windows (1) . Visible = True
6

Fügen Sie den folgenden VBA-Code zu aktualisieren A1 der Tabelle : . .

XLSheet

Range (" A1") Wählen Sie

. Range (" A1") . Value = " aktualisierten Wert von Access"

End With
7

Speichern , schließen Sie die Excel-Arbeitsmappe , und beenden Sie den Vorgang indem Sie den folgenden Code :

wkBkObj.Save

wkBkObj.Close

Exit_updateSpreadSheet :

Exit Sub

Err_updateSpreadSheet :

MsgBox Err.Description

Lebenslauf Exit_updateSpreadSheet :

End Sub
8

Presse "F5" um die Prozedur auszuführen und aktualisieren Sie Ihre Tabellenkalkulation