Wissen, wie man mit VBA Objekte in Excel arbeiten können Sie Programme schreiben , dass die Kontrolle Excel. Solche Programme sind besonders nützlich für die Durchführung von Aufgaben , die kein menschliches Eingreifen erfordern und zeitaufwendig und fehleranfällig , wenn manuell durchgeführt werden . Arbeiten mit VBA-Objekte umfasst die folgenden drei Komponenten Fähigkeiten : Ausführen eines VBA -Objekt die Methoden , die auch als Funktionen ; Setzen eines VBA Eigenschaften des Objekts ; und Schreiben Aussagen, dass Excel ausgeführt wird, wenn Ereignisse wie Mausklicks oder Tastendrücke während die Arbeitsmappe auftreten öffnen. Anleitung
Run ein Verfahren
1
Klicken Sie auf die Registerkarte "Entwicklertools" , dann klicken Sie auf " Visual Basic " -Taste, um den VBA- Entwicklungsumgebung geben .
2
Klicken das Menü "Ansicht" , dann klicken Sie auf " Projekt-Explorer " aus. Doppelklicken Sie auf das " ThisWorkbook " Artikel in der " Projekt-Explorer " Fenster auf Bildschirm links . Excel wird ein neues Fenster für die Eingabe Programme anzuzeigen.
3
Fügen Sie das folgende Programm in das neue Fenster . Dieses Programm führt die "Activate" -Methode eines Objekts aufgerufen VBA Blatt . Blatt repräsentiert ein Arbeitsblatt in der aktuellen Arbeitsmappe .
Sub ActivateASheet () TCM-
End Sub
4
Presse "Alt" Sheet3.Activate und " F11 " gleichzeitig um zu Excel zurückzukehren , klicken Sie dann auf die Registerkarte "Blatt" am unteren Rand des Arbeitsblatts Netz. Diese Aktion aktiviert das erste Arbeitsblatt . Ihr Programm wird die dritte Arbeitsblatt zu aktivieren.
5
Presse "Alt " und " F11 " gleichzeitig wieder in die Programmierumgebung zurückzukehren, klicken Sie dann auf jede Anweisung in Ihrem Programm . Drücken Sie auf " F5 ", um das Programm auszuführen.
6
Presse "Alt " und " F11 " gleichzeitig , um zu Excel zurückzukehren. Beachten Sie, dass Noten ist jetzt das aktive Blatt , weil Ihr Programm machte es so .
Set Properties
7
Klicken Sie auf die Registerkarte "Entwicklertools" der " Visual Basic " -Taste, um die Eingabe Visual Basic-Entwicklungsumgebung , dann klicken Sie auf den Menüpunkt "Ansicht" die " Projekt-Explorer " aus.
8
Doppelklicken Sie auf das " ThisWorkbook " Artikel in der " Projekt-Explorer " angezeigt.
9
Fügen Sie das folgende Programm in die neue Code-Fenster . Dieses Programm weist einen Wert auf die Cells-Eigenschaft des VBA -Arbeitsblatt-Objekt . Cells stellt die Zellen in einem Arbeitsblatt.
Public Sub changeCell ()
Sheets ( 2). Cells (1, 1) = "Hallo"
End Sub
10
Klicken Sie auf eine Anweisung im Programm , und drücken Sie "F5 ", um das Programm auszuführen.
11
Presse "Alt " und " F11 " gleichzeitig um zu Excel zurückzukehren , dann klicken Sie auf die Registerkarte "Blatt" am unteren Rand des Arbeitsblatts Gitter links . Excel zeigt Blatt 2 des Gitters. Beachten Sie, dass die Zelle A1 dieses Blattes zeigt den Text "Hallo ", die Ihr Programm dort zu setzen .
Termin Funktionen
12
Klicken Sie auf die Registerkarte "Entwicklertools" der " Visual Basic " Taste, um den Visual Basic-Programmierung Umwelt gelangen , klicken Sie dann auf den Menüpunkt" Ansicht " die " Projekt-Explorer "-Befehl. Doppelklicken Sie auf das "Blatt " Artikel in der Scheibe , die auf der linken Seite angezeigt.
13
den Pfeil nach unten klicken in der linken Dropdown-Steuerelement an der Spitze der Programmierung Fenster , klicken Sie auf den " Worksheet " Element aus der Liste , die .
14
Klicken Sie auf das erscheint " Change "aus dem Drop-Down- Liste auf der rechten Seite die, die Sie im vorherigen Schritt geklickt . Diese Aktion wählt die Event-Funktion ändern für das VBA-Objektmodell Arbeitsblatt aus dem vorherigen Schritt . Event-Funktionen sind Unterprogramme , die Anrufe Excel , wenn Benutzer mit der Arbeitsmappe interagieren. The Change -Funktion ausgeführt, wenn der Benutzer einen Wert in eine Zelle.
15
Geben oder fügen Sie das folgende Programm in der neuen Programmperiode Fenster . Dieses Programm zeigt eine kurze Nachricht , wenn Excel führt die Event-Funktion .
Private Sub Worksheet_Change (ByVal Target As Range)
MsgBox (" Etwas hat sich geändert. " )
End Sub
16
Presse "Alt " und " F11 " gleichzeitig um zu Excel zurückzukehren , klicken Sie auf den " Sheet3 "-Reiter am unteren Rand des Arbeitsblatt Netz. Geben Sie einen Wert in jeder Zelle. Sie Programm wird die Meldung " Etwas hat sich geändert."