Wie die VBA-Sprache eingeführt.

January 11

Wie die VBA-Sprache eingeführt.

Praktische Erfahrung ist eine der besten Möglichkeiten, um das Visual Basic für Applikationen (VBA) Sprache vorgestellt. VBA ist eine Computer-Programmiersprache in allen Microsoft Office-Anwendungen wie Access und Excel zur Verfügung. In Access beim Erstellen einer neuen Datenbank, beginnen Sie in der Regel durch eine Tabelle erstellen und Einfügen von Daten in es. Dieser Prozeß kann leicht durch den Benutzer über VBA automatisiert werden. In Excel können Sie die Aufgaben nach der ersten Aufzeichnung VBA-Makros automatisieren. Sie können ändern, ein VBA-Makro, um Ihre Bedürfnisse zu erfüllen, nachdem es aufgenommen wurde.

Anweisungen

1 Starten Sie Microsoft Access zu, klicken Sie "Leere Datenbank" und klicken Sie auf "Erstellen", um eine neue Datenbank zu erstellen. Klicken Sie auf "Datenbanktools" und klicken Sie auf "Visual Basic", um den VBA-Editor zu starten. Klicken Sie im Menü "Einfügen" und dann "Modul" um ein neues Codemodul einzufügen.

2 Kopieren Sie und fügen Sie den folgenden Code zum Erstellen einer Tabelle und fügen Sie eine Zeile von Daten mit SQL-Anweisungen:

Private Sub createTable()

Dim StrSQL As String

StrSQL = "CREATE TABLE MyTbl (fName, lName TEXT TEXT)"

DoCmd.RunSQL (StrSQL)

StrSQL = "INSERT INTO MyTbl VALUES ('JOHN', 'SMITH')"

DoCmd.SetWarnings False

DoCmd.RunSQL (StrSQL)

EndSub

3 Mit "F5" um die Prozedur auszuführen.

4 Starten Sie Microsoft Excel zu, klicken Sie auf die Registerkarte "Entwicklertools" und klicken Sie auf "Makro aufzeichnen" zum Starten der Aufnahme eines VBA-Makros. Klicken Sie auf "OK" im Fenster "Makro aufzeichnen". Geben Sie "2" in A1 und "4" in "B1." Klicken Sie auf "Aufzeichnung beenden" und klicken Sie auf "Visual Basic", um den VBA-Editor zu starten.

5 Erweitern Sie den Ordner "Module" und doppelklicken Sie auf "Module1" den folgenden Makrocode anzeigen:

Range("a1"). Wählen Sie

ActiveCell.FormulaR1C1 = "2"

Range("B1").Select

ActiveCell.FormulaR1C1 = "4"

6 Fügen Sie folgenden Code zum Makro zum Anzeigen des Zusatz von A1 und B1 in C1:

Dim a als Integer

Dim b As Integer

Dim total As Integer

Range("A1").Select

a = Range("A1").Value

Range("B1").Select

b = Range("B1").Value

total = a + b

Range("C1").Select

ActiveCell.FormulaR1C1 = total7

Drücken Sie die Taste "F5", um das Makro VBA-Code ausführen.