Microsoft Office Tutorials and References
In Depth Information
19.7.4 Tastenschlüssel für Makros
grammierbar fist wie das Öffnen einer Mappe, das
Drucken von Daten oder die Neuberechnung Ihrer Tabelle.
ObjektArbeitsmappe
Eigenschaften
Methoden
Ereignisse
Objekte – der Begriff
VBA behandelt alles, was in der Programmumgebung zu
finden fist, als Objekte und stellt dem Entwickler von
Makros sogenannte Bibliotheken zur Verfügung, in denen
Routinen zum Anprogrammieren dieser Objekte
enthalten sind. Jedes Objekt hat in diesem Objektmodell
Eigenschaften, Methoden und Ereignisse. Stellen Sie sich
ein reelles, echtes Objekt vor, und versuchen Sie, eine
solche Einteilung vorzunehmen:
Name
Öffnen
Beim.Öffnen
Aktive.Tabelle
Schließen
Beim.Schließen
Anzahl.Tabellen
Speichern
Beim.Wechsel.auf.ein.
anderes.Tabellenblatt
Gespeichert
Drucken
Beim.Drucken
Geschützt
Tabelle.löschen
usw.
usw.
usw.
Programmieren mit Objekten, Eigenschaften und
Methoden
Dieses Makro dimensioniert eine Objektvariable ( wb ) und
weist dieser über die Set -Anweisung die aktive
Arbeitsmappe zu. Dann nutzt es die Eigenschaft Sheets (alle
Blätter) und von dieser wieder die Eigenschaft count ,
um die Blätter der Mappe zu zählen. Alles zusammen
wird in einer Meldung ( MsgBox ) ausgegeben:
Sub ObjektTest()
Dim wb As Workbook
Set wb = ActiveWorkbook
MsgBox wb.Sheets.Count
End Sub
Abbildung 19.45 Objekt Auto
Listing 19.12 Das Makro zählt die Tabellen der Mappe.
ObjektAuto
Eigenschaften
Methoden
Ereignisse
Hier wird eine weitere Variable eingeführt, und die Set -
Anweisung benutzt gleich eine Methode ( Add ), um ein
neues Tabellenblatt damit zu erstellen. Die Eigenschaft
Range("B1“) bezeichnet eine Zelle, von dieser wird die
Eigenschaft Value mit dem Tagesdatum versehen:
Marke
Starten
Beim.Fahren
Modell
Fahren
Im.Stillstand
Farbe
Bremsen
In.der.Kurve
Anzahl.Zylinder
Abbiegen
Bei.geschlossenen.
Türen
Sub ObjektTest2()
Dim wb As Workbook
Dim ws As Worksheet
Set wb = ThisWorkbook
Set ws = wb.Worksheets.Add
ws.Range("B1").Value = Date
End Sub
kW
Tür.öffnen
usw.
Ausstattung
usw.
Bereifung
usw.
Listing 19.13 Beispiel für Set-Anweisung
So wie ein reelles Objekt liefert auch Excel für sich
selbst (Application) oder seine Bestandteile
Eigenschaften, Methoden und Ereignisse.
TIPP ThisWorkbook fist besser als Workbooks .
Set brauchen Sie nur bei Objektvariablen.
Statt Range("B1“) können Sie auch schreiben: [B1].
TIPP
 
 
Search JabSto ::




Custom Search