Grundelemente der Programmiersprache Visual Basic

In diesem Kapitel wird der Sprachumfang der in Excel 97 enthaltenen Programmier-sprache Visual Basic for Applications (VBA) beschrieben. Es soll dabei nur auf die wichtigsten Schlüsselwörter und Anweisungen eingegangen werden. Weiterführende Elemente von VBA, die hier keine Erwähnung finden oder nur kurz angerissen werden, sind häufig schon in der Online-Hilfe der Excel-IDE enthalten; fehlen gesuchte Begriffe oder Sprachkonstrukte auch dort, soll hiermit auf die entsprechende Fachliteratur verwiesen werden.

...

Zuerst jedoch muß auf einige grundsätzlichen Eigenheiten der Sprache VBA hingewiesen werden:

VBA ist nicht case sensitive, d.h., der Programmierer braucht nicht auf die Groß- oder Kleinschreibung zu achten (außer bei, hier nicht behandelten, API-Befehlen).

Jede Anweisung muß komplett in einer Zeile stehen. Soll über mehrere Zeilen Codiert werden, dann ist als Verbindungszeichen zwischen zwei Zeilen ein Leerzeichen, gefolgt von einem Unterstrich (" _") zu verwenden.

Eine Zeile im VBA-Code braucht keine Zeilenende-Markierung, anders als in C/C++, wo jede Zeile durch ein Semikolon abgeschlossen wird.

Ausführbare Programmanweisungen werden in VB innerhalb von Funktionen und Prozeduren codiert. Beiden ist gemein, daß ihnen Parameter übergeben werden können. Möglich ist die Weitergabe von keinem, einem oder mehreren Parametern, jeweils getrennt durch Kommata.

Prozeduren

‘Code

End Sub

Der Aufruf einer Prozedur im Programmcode erfolgt im einfachsten Falle durch:

Prozedurname Parameter1 [,Parameter2,...]

Call Prozedur(Parameter)

Funktionen

Funktionen entsprechen dem Unterprogramm-Typ function in C/C++. Wie bereits einleitend erwähnt, geben Funktionen an die aufrufenden Programmteile Werte zurück. Der Datentyp des Rückgabeparameters wird, ebenso wie die Typen der zu übergebenden Parameter (siehe Abschnitt über Prozeduren) in der Kopfzeile des Unterprogramms angegeben:

‘Anweisungen

End Function

Damit der Wert der Funktion, sprich der Inhalt des Rückgabeparameters, an das aufrufende Unterprogramm zurückgegeben werden kann, muß dieser Wert (welcher Ergebnis einer Berechnung oder eines Vergleichs sein kann) innerhalb der Funktion dem Funktionsnamen zugewiesen werden:

Funktionsname = Wert

Aufgerufen wird eine Funktion durch eine Zuweisung:

Wert = Funktionsname(Parameter)

Unterprogramme vorzeitig verlassen

‘Anweisungen

‘Anweisungen

End Sub

ByVal, ByRef

Im ersten der beiden Fälle kann das aufgerufene Unterprogramm jegliche Veränderungen am Parameter durchführen, ohne daß sich dieses auf das aufrufende Programm auswirkt.

Im zweiten Fall bewirkt eine Veränderung des Inhalts eines Parameters im aufgerufenen Unterprogramm die gleiche Auswirkung auch auf den aufrufenden Programmteil.

Ereignisprozeduren

Weitere Ereignisprozeduren siehe Online-Hilfe der Excel-IDE.

Gültigkeitsbereiche von Unterprogrammen

Ereignisprozeduren sind immer Private.

Mit Hilfe von Operatoren lassen sich, wie auch in anderen Programmiersprachen üblich, Ausdrücke formulieren. Man unterscheidet zwischen Rechenoperatoren, logischen Operatoren und Vergleichsoperatoren, siehe Tabellen der nachfolgenden Abschnitte.

Rechenoperatoren

Für Berechnungen in VBA werden die Operatoren der folgenden Tabelle benötigt:

Logische Operatoren

Die Boolesche Algebra nimmt eine sehr wichtige Stellung in Programmiersprachen ein. In VBA sind die logischen Operatoren für Boolesche Rechnungen wie folgt definiert:

Vergleichsoperatoren

Die Frage nach Gleichheit oder Ungleichheit ist immer wieder in sehr vielen Programmteilen zu finden. Der hauptsächliche Grund dafür ist, daß Vergleiche (Abschnitt 5.3.5) die nicht ohne Vergleichsoperatoren funktionieren, einen wesentlichen Bestandteil von Programmiersprachen darstellen.

Ebenso, wie zum Beispiel in C/C++, werden auch in VBA Variablen, Konstanten und Felder unterschieden. Die vorhandenen Unterschiede sollen in den nächsten drei Teilabschnitten erläutert werden.

Variablenarten

Wie andere Programmiersprachen unterscheidet auch VBA bei numerischen Variablen zwischen Variablen für ganzzahlige und für gebrochene Zahlenwerte; weiterhin gibt es Variablen für alphanumerische Texte, für Ja/Nein-Entscheidungen und für das Datum.

Zu den Namen und Eigenschaften der wichtigsten Datentypen siehe folgende Tabelle:

Weitere Datentypen der Programmiersprache VBA, die hier nicht explizit beschrieben werden sollen, sind z.B. Date, Currency, Byte, Decimal.

Neben den Standard-Datentypen sind selbstdefinierte Datentypen mit Hilfe der Type-Anweisung möglich. Mit ihr kann der Programmierer aus mehreren Standardtypen, ähnlich wie in einem Datenfeld (Abschnitt 5.3.3), die benötigte Variablenform selbst bestimmen (siehe Fachliteratur).

Deklaration und Gültigkeitsbereiche von Variablen

Variablen sollten als erste Anweisungen in Prozeduren/Funktionen, d.h. im Deklarations-bereich des Unterprogrammes, folgendermaßen deklariert werden:

Diese Form der Variablenerzeugung zu Beginn eines Unterprogrammes ist jedoch nur erforderlich, wenn der Code-Bereich mit dem Befehl Option Explicit begonnen wird (was die Sicherheit beim Programmablauf erhöht). Ansonsten kann VBA auch während der Laufzeit an irgendeiner Stelle im Programmcode automatisch Speicherplatz für eine Variable freimachen. Der Datentyp und somit der Speicherplatz der Variablen wird automatisch anhand der Erfordernisse festgelegt:

‘Anweisungen

‘aber:

Var1 = 1.717

‘In Var1 ist jetzt, anders als vorher, eine Single-Variable gespeichert

Statt die Variablen mit der Angabe des gewünschten Datentyps zu definieren, kann bei einigen Typen auch ein charakterisierendes Kurzzeichen verwendet werden. Bei Integer-Daten sieht das folgendermaßen aus:

Die möglichen Kurzzeichen entnehmen Sie der nachfolgenden Tabelle.

Diese Kurzzeichen sollten auch im Zusammenhang mit Zahlenangaben verwendet werden. Um einer Variablen vom Typ Double einen Fließkommawert zuzuweisen, müßte man folglich schreiben:

dblVar1 = 3#

Das wird um so wichtiger, wenn z.B. eine Rechenoperation folgender Art durchgeführt werden soll:

Der Datentyp Variant

Eine besondere Position nimmt der Datentyp Variant ein.

Variant ist der Standard-Datentyp in VBA. Wird bei der Definition der Variablen kein anderer Typ angegeben, dann ist die Variable automatisch vom Typ Variant:

Wie der Name schon andeutet, kann einer Variant-Variablen jeder Wert zugewiesen werden, sie passt ihre Art der internen Speicherung automatisch an die Erfordernisse des zu speichernden Wertes an. Soll ein Double-Wert gespeichert werden, so bleibt die gespeicherte Zahl gebrochen rational, bei Integerzahlen werden auch in die Variante keine Nachkommastellen geschrieben. Das ist besonders zu beachten, wenn eine implizite Typumwandlung, die in VBA möglich ist, erreicht werden soll. Wenn eine Double-Zahl einer Integer-Variablen zugewiesen wird, dann werden automatisch die Nachkommastellen abgeschnitten. Beispiel:

Bei Variantvariablen funktioniert die Umwandlung nicht, egal, welchen Wert sie vorher hatte:

V = 3

‘Anweisungen

Die Verwendung einer Varianten ist aber duchaus sinnvoll, wenn nicht im vorhinein bekannt ist, welchen Inhalt sie aufnehmen soll. Denn wenn zum Beispiel eine Funktion eigentlich eine ganze Zahl zurückliefern soll, bei bestimmten Verhältnissen aber einen Text ("Die Berechnung konnte nicht durchgeführt werden"), dann ist eine Variant-Variable die richtige Wahl. Besonders Wertvoll ist sie aber auch, weil sie, ohne Größenangabe bei der Definition, auch ein Feld aufnehmen kann (siehe Literatur).

Um herauszufinden, welche Art von Inhalt die Variante hat, kann man die von VBA bereit-gestellten Funktionen VarType und TypeName benutzen. Erstere liefert als Rückgabewert einen, den Typ charakterisierenden, ganzzahligen numerischen Wert, letztere gibt den Namen des Typs als Text zurück (siehe: Online-Hilfe).

Weiterhin kann, anders als die anderen Variablen, eine Variante auch Objekte aufnehmen (siehe Abschnitt 5.3.4, Objektvariablen)

Eine Variant-Variable kann auch die Zustände Empty (noch überhaupt nicht belegt) und Null annehmen. Null ist die Kennzeichnung für einen nicht belegten Zeiger. Hier können die Funktionen IsEmpty und IsNull zur Ermittlung des Inhalts herangezogen werden. Zur Verwendung von IsEmpty siehe Felder

Konstanten

Ebenso wie bei den Variablen gibt es auch bei der Definition von Konstanten verschiedene Gültigkeitsbereiche. Die Definition einer Konstanten in einer Prozedur/Funktion (lokale Gültigkeit) oder einem Formular/Modul (generelle Gültigkeit) sieht folgendermaßen aus:

Sollen Konstanten global gültig sein, dann muß der Definition das Schlüsselwort Public vorangestellt werden (nur in Modulen möglich):

Neben selbstdefinierten Konstanten bieten sowohl VBA, als auch Excel viele eigene Konstanten an, die z.B. bei der Parameterangabe in Funktionsaufrufen genutzt werden können. Diese Konstanten erkennt man zumeist an den ersten beiden Buchstaben, für VBA-Konstanten ist das "vb...", Excel-eigene erkennt man an "xl..."

Als Beispiele wären zu nennen vbYesNo als Übergabeparameter an den Aufruf eines Meldedialogs (MessageBox, siehe Abschnitt 6.1) oder vbHourglass als Kennzeichnung für einen sanduhrförmigen Mauszeiger. Auflistungen aller vordefinierten Konstanten hält die Online-Hilfedatei der Excel-IDE bereit.

Felder

Zum Sprachumfang von VBA gehören auch ein- oder mehrdimensionale Felder.

Mit der folgenden Anweisung können einem Integer-Feld insgesamt 11 (!) Integer-Werte zugewiesen werden:

‘Zuweisung von Zahlenwerten:

nFeld(1) = 100

nFeld(2) = 200

‘...

Ein zweidimensionales Feld wird folgendermaßen definiert:

‘zweite von 0 bis 5

Will man erreichen, daß die Zählung der Indizes bei von 0 verschiedenen Zahlen beginnt, ist es erlaubt, die Index-Grenzen anzugeben:

Überaus gut gelungen ist in VBA die dynamische Größenanpassung von Feldern. Ist es erforderlich, daß erst zur Laufzeit des geschriebenen Programms die Größe des Feldes festgelegt wird, etwa weil vorher nicht klar ist, ob ein Feld 10 oder 10000 Werte aufnehmen soll (die Speicherverschwendung bei irrtümlicher Wahl eines sehr großen Feldes wird im unglücklichsten Falle auch zu einer Verlangsamung des Programmablaufs führen), dann wird i.A. folgende Anweisung benutzt:

‘andere Anweisungen

Sogar der Datentyp läßt sich im nachhinein noch festlegen (siehe Literatur).

Oft muß vor der Zuweisung von Werten zu den Feldelementen heausgefunden werden, ob das Feld überhaupt initialisiert, sprich auf eine (beliebige) Größe festgelegt wurde. Dann kann man sich mit, oft umständlichen, Programmiertricks helfen, oder statt eines Feldes mit festgelegtem Datentyp eine Variant-Variable zur Aufnahme der Werte verwenden. Denn bei der Varianten kann man die von VBA mitgelieferte IsEmpty-Funktion verwenden: Sie gibt zurück, ob das Feld schon einmal mit einer Größe belegt wurde (Rückgabewert False), oder noch nicht benutzt wurde (True).

Objekte gehören zum Grundbestandteil einer modernen Programmiersprache. Auch VBA bedient sich der objektorientierten Programmierung.

Objekte

Objekte sind integraler Bestandteil moderner, visueller Programmiersprachen. Die Steuerung aller Eigenschaften und Zustände wird in den sog. objektorientierten Sprachen über Objekte geregelt. Objekte sind i.A. die grafisch sichtbaren, "faßbaren" Elemente eines Computerprogramms. Sie haben Attribute wie Namen, Textformatierungen und Größenwerte.

Ebenso, wie es z.B. in Excel die Anwendung selbst, Arbeitsmappen, einzelne Tabellen oder Diagramme gibt, gibt es in der VBA-Entwicklungsumgebung von Excel ein Anwendungsobjekt (Application), Arbeitsmappen-Objekte (Workbooks), Tabellen- und Diagramm-Objekte.

Die Objekte sind hierarchisch gegliedert; zu vielen Objektklassen existieren auch Unter-Klassen. Auch hier greift wieder die Analogie zum Anwendungsprogramm: Die Tabellen sind den Arbeitsmappen untergliedert, den Tabellen selbst gehören die Zellen an.

Eine andere Art von Objekten sind die sog. Auflistungen. Sie sind zu erkennen an einem "s" am Ende des Namens. Die Auflistungen sind eine Art von Objektgruppen, aus deren Mitgliedern einzelne Objekte angesprochen werden können. Zum Beispiel gibt es in Excel eine Gruppe von Tabellenblättern (Sheets), jedes Einzelne Blatt ist Mitglied dieser Gruppe.

Eigenschaften

Zugriff auf Objekt-Attribute:

Um auf ein Merkmal eines Objektes, wie zum Beispiel die Aufschrift auf einer Schaltfläche, die Größe eines Fensters oder dessen Farbe, Einfluß nehmen zu können, stehen die Eigenschaften zur Verfügung. Eigenschaften stellen sich dem Programmierer wie Variablen dar, denen die gewünschten Werte zugeordnet werden können. Sie werden in Form einer Zuweisung verwendet.

Um die Eigenschaften eines Programmelementes einstellen zu können, muß im Programmcode das Objekt, das dieses Element repräsentiert, mitsamt seinen übergeordneten Objekten, getrennt durch einen Punkt, angegeben werden:

Objekt.Subobjekt.Eigenschaft = Zugewiesener_Wert

(Um klarer zwischen Objekten und den noch zu erläuternden Methoden und Eigenschaften unterscheiden zu können, wurde in den neueren VBA-Versionen die Trennung durch ein Ausrufezeichen (!) möglich gemacht:

Objekt!Subobjekt.Eigenschaft

Da diese Art der Trennung jedoch in der Literatur nur höchst selten anzutreffen ist, werde ich nicht weiter darauf eingehen, zumal häufig die Grenze zwischen Methoden und Objekten verwischt, und es somit eher zu Programmfehlern kommen kann, wenn versehentlich die falsche Variante gewählt wurde.)

Forms.Form1.Controls.Command1.Height = 100

Forms.Form1.Controls.Command1.Width = 250

Form1.Command1.Width = 250

Wenn die Anweisung im Code-Bereich des Formulars Form1 ausgeführt werden soll (siehe Abschnitt 5.1, IDE), dann kann auch auf die Angabe des Formularnamens Form1 verzichtet werden:

Command1.Width = 250

(Die Einheit, in der hier die Breite und oben die Höhe bemaßt werden, wird in Twips angegeben; 567 Twip entsprechen je nach Bildschirmauflösung etwa einem cm.)

Methoden

Eine weitere Möglichkeit, die Merkmale eines VB-Elementes zu beeinflussen, ist die Anwendung von Methoden. Methoden sind zu beschreiben als Prozeduren eines Objektes. Sie werden, oft mit Angabe von Parametern, wie die Eigenschaften den Objekten hintenangestellt. Beispielsweise wird der Fokus (das Element, welches als nächstes eine Eingabe erwartet, hat den Fokus) auf eine Schaltfläche gesetzt mit

Command1.SetFocus()

Methoden sind Handlungsanweisungen für ein Objekt, anders als Eigenschaften, die nur eine Zustand beschreiben.

Objektvariablen

Beispiel:

C1.Height = 100

Wird die Eigenschaft der Objektvariablen geändert, ändert sich auch die entsprechende Eigenschaft des Objektes. Anders als bei numerischen oder String-Variablen, die in dieser Beziehung autark reagieren. Wird eine Zahl-Variable geändert, ist die Änderung nur auf diese einzelne Variable beschränkt.

Auch der Datentyp Variant eignet sich als Objektvariable. Zwar ist dann die Nutzung des Default-Objektes nicht mehr möglich (siehe /1/), der Programmierer wird damit aber um so flexibler, was z.B. die Anzahl vorab definierter Variablen angeht. Bei bestimmten Anwendungen ist die Speicherung eines Objektzeigers in einer Variant-Variablen sogar die einzig zulässige Art. Ob eine Variante einen Zeiger auf ein Objekt enthält, kann mit der Funktion IsObjekt erfragt werden.

Die With-Anweisung

Wenn viele Eigenschaften eines Objektes geändert werden sollen, vereinfacht oft die Programmierung einer With-Anweisung den Programmcode. Dabei wird der Objektname nur ein einziges Mal genannt. Die Eigenschaftsänderungen müssen dann, wie im folgenden Beispiel, nur mit einem Punkt beginnend zwischen die ein- und ausleitenden Schlüsselworte geschrieben werden:

.Height = 100

.Width = 250

.SetFocus

End With

Verzweigungen gehören zu den elementaren Bestandteilen jeder Programmiersprache. In diesem Kapitel sollen die Select-Case-Verzweigung und die If-Then-Verzweigung beschrieben werden.

Eine von zwei Formen der Verzweigung in VBA ist die für nur eine Alternative (einfache Entscheidung) oder wenige Alternativen geeignete If-Then-Struktur.

Der Programmcode kann beispielsweise lauten:

'Anweisungen

'Anweisungen

Auch diese Verzweigungsart kann In-Line geschrieben werden. Als Trennung zwischen mehreren Anweisungen wird der Doppelpunkt verwendet:

'Anweisungen

'Anweisungen

'Anweisungen

Die zweite Art von Verzweigung in VBA ist die Select-Case-Struktur. Sie ist übersichtlicher als die If-Then-Verzweigung, wenn eine größere Zahl von alternativen Möglichkeiten zu unterscheiden sind. Dabei wird jedoch nicht, wie in der vorangegangenen Verzweigung, eine Bedingung auf ihren Wahrheitswert überprüft, sondern es werden explizit Werte mit einer aus dem Programmcode gegebenen Variablen verglichen:

'Anweisungen

'Anweisungen

'Anweisungen

Schleifen

Schleifen sind eine weitere, in jeder Programmiersprache genutzte Strukturform. Zu Beachten ist, daß die While-Wend-Schleife, welche eigentlich überflüssig ist, nur der Vollständigkeit halber hier erwähnt wird

Um eine einzelne oder mehrere Anweisungen für eine vorgegebene Anzahl von Durchläufen auszuführen, eignet sich die For-Next-Scheife. Sie ist vergleichbar mit der Struktur For(...) der Sprache C/C++:

'Anweisungen

Next

k=2

'Anweisungen

Eine Besonderheit: Die For-Next-Schleife bricht nach ununterbrochenen Durchlauf erst ab, wenn die Zählvariable das erste Mal die Abbruchbedingung über-, bzw., bei negativen Schrittweiten, unterschritten hat.

Wenn der Zähler als Grundlage für weitere Programmanweisungen dienen soll (zum Beispiel bei der Überprüfung, ob die Schleife vorzeitig durch Exit For verlassen wurde), muß also bedacht werden, daß im Höchstfalle der Zähler um eine Schrittweite über (bzw. unter) dem Endwert liegt. Beispiel:

Next

'Anweisungen ‘i hat den Wert 3

Eine Schleifenart, die nur noch aus Gründen der Kompatibilität in VBA enthalten ist, ist die While-Wend-Schleife:

Wend

Der Nachteil bei der While-Wend-Schleife ist, daß keine Möglichkeit besteht, abhängig von einer Bedingung die Schleife vorzeitig zu verlassen.

Die Do-Loop-Schleife kann als Abweisende und als nicht abweisende Schleife verwendet werden. Desweiteren kann die Abfrage, ob die Bedingung für einen Schleifenlauf besteht, vor dem Durchlauf oder nach einem Durchlauf, also vor dem nächsten, durchgeführt werden. Es stehen also vier mögliche Arten dieser Struktur zur Verfügung.

Do-While-Loop-Schleife (abweisend), Abfrage vor Schleifendurchlauf:

'Anweisungen

'Anweisungen

Loop

Do-Loop-While-Schleife (nicht abweisend), Abfrage nach Schleifendurchlauf:

Do

'Anweisungen

'Anweisungen

Do-Until-Loop-Schleife (abweisend), Abfrage vor Schleifendurchlauf:

'Anweisungen

'Anweisungen

Loop

Do-Loop-Until-Schleife (nicht abweisend), Abfrage nach Schleifendurchlauf:

Do

'Anweisungen

'Anweisungen

VBA liefert in seinem Sprachumfang eine Reihe von vordefinierten Funktionen mit. Diese müssen nicht, wie in C üblich, dem Compiler durch Angabe von Bibliotheken im Kopfabschnitt (header) der Code-Datei "angekündigt" werden, sondern sie gehören zu den Grundelementen der Sprache und sind somit ohne weiteres verwendbar.

Typumwandlungsfunktionen

Zu den am häufigsten verwendeten Funktionen zählen die zahlreichen Typumwandlungs-funktionen, die benötigt werden, um Werte eines Zahlentyps ohne Datenverluste in eine Variable eines anderen Typs einschreiben zu können. Die wichtigsten von diesen Typum-wandlungsfunktionen folgen in der nächsten Tabelle.

Das erforderliche Argument Ausdruck ist ein Zeichenfolgenausdruck oder ein numerischer Ausdruck.

boolWert = IsNumeric(Ausdruck)

String-Funktionen

Gerade, wenn viel mit Text-Variablen gearbeitet wird, werden Funktionen benötigt, die String-Variablen und -Konstanten verarbeiten können. Auch diese gehören in VBA zu den Standard-Sprachelementen.

Right-, Left-, Mid-Funktionen: Diese liefern als Rückgabewerte Strings, deren Länge durch den bzw. die Übergabeparameter festgelegt sind:

Right(String, Laenge)

Gibt einen String zurück, der Teilmenge des übergebenen Strings ist, und mit dessen rechten Ende identisch ist. Beispiel:

Left(String, Laenge)

Gibt einen String zurück, der Teilmenge des übergebenen Strings ist, und mit dessen linken Ende (seinem Anfang) identisch ist. Beispiel:

Mid(String, Start[,Laenge])

Gibt einen String zurück, der Teilmenge des übergebenen Strings ist, und ab der übergebenen Startposition (von Links gezählt) mit diesem identisch ist. Die Länge des Rückgabe-Strings kann außer durch die Startposition auch zusätzlich durch einen optionalen dritten Parameter beeinflußt werden. Beispiel:

Um Zeichenketten von etwaigen Leerzeichen am Anfang und/oder am Ende des Strings zu trennen, bietet VBA gleich drei Funktionen an:

LTrim(Zeichenfolge)

Eliminiert Leerzeichen am Stringanfang

RTrim(Zeichenfolge)

Eliminiert Leerzeichen am Stringende

Trim(Zeichenfolge)

Eliminiert Leerzeichen an beiden Enden der Zeichenkette

Beispiel:

InStr([Start, ]Zeichenfolge1, Zeichenfolge2[, Vergleichsart])

strWert = "Mannschaft wie Flasche leer"

Funktion Nummer zwei hat folgende Syntax:

Ergebnis = Zeichenfolge Like Muster

Die Like-Funktion gibt einen boolschen Wert zurück, der charakterisiert, ob der String vor dem Funktionsnamen mit dem Muster-String nach dem Funktionsnamen identisch (True) ist. Dabei sind auch Platzhalter ("?" für ein Zeichen, "*" für mehrere Zeichen) erlaubt. Beispiel:

strWert = "Meier"

Format(Ausdruck[, Format[, firstdayofweek[, firstweekofyear]]])

Beispiele:

Zeit1 = #17:04:23#

Mathematische Funktionen

In VBA sind ebenfalls schon viele mathematische Funktionen integriert. Da die Verwendung dieser Funktionen i.A. selbsterklärend ist, sollen hier die Funktionen nur in Tabellenform erwähnt werden.

Objekte und Programmiertechniken

Die hauptsächlich auftretende Aufgabe der VBA-Programmierung ist es, in Excel vorhandene Elemente durch den Programmcode eines Makros zu beeinflussen. So greift man in einem umfangreicheren Makro des häufigeren auf Zellen, Spalten, Tabellen und Diagramme zu. Obwohl sicherlich in vielen Anwendungsfällen eigene Dialoge erstellt werden müssen, nimmt deren Programmierzeit in der VBA-Programmierung allgemein nur einen geringen Teil der Gesamtzeit ein. Dieses Kapitel beschäftigt sich daher mit Zugriffstechniken zur Verwendung der zahlreichen Excel-Objekte und Auflistungen.

Zuerst sollen einige Begriffe erläutert werden: Die aktive Zelle (ActiveCell) ist jene Zelle des Tabellenblattes, die den Zellenzeiger enthält. Wenn man mit der Maus oder den Cursor-Tasten in eine Zelle springt, so wird diese Zelle zur aktiven Zelle, sie wird mit Zahlen oder Text gefüllt, wenn man eine alphanumerische Taste drückt. Ein Bereich (Range) ist eine Gruppe von Zellen. Ein Bereich wird z.B. dazu verwendet, um dem Diagramm-Assistenten die Datenquelle für ein Diagramm mitzuteilen. Eine Auswahl (Selection) liegt vor, wenn ein Bereich ausgewählt (markiert) wurde. Sie ist daran zu erkennen, daß die Zellen der Auswahl dunkel hinterlegt sind.

Einzelne Zellen bearbeiten

Um mit einer Eigenschaft bzw. Methode auf eine einzelne Zelle zuzugreifen, hat man eine Vielzahl von Möglichkeiten, die je nach Aufgabe mal besser und mal schlechter geeignet sind.

Zugriff über das Range-Objekt: Wie bereits erwähnt, handelt es sich bei einem Bereich um eine Gruppe von Zellen. Eine einzelne Zelle ist ein Sonderfall des Bereiches. Um eine einzelne Zelle mit einem Range-Objekt zu erreichen, kann folgende Syntax verwendet werden:

Range("A3").Methode

Als Kurzschreibweise ist auch

[A3].Methode

erlaubt.

Eine zweite Möglichkeit wäre, den Umweg über eine Selektion zu gehen. Dabei wird zuerst die Zelle, deren Zellenbezug im vorangegangenen Beispiel der Range-Methode übergeben wurde, ebenfalls unter Zuhilfenahme von Range, selektiert. Anschließend wird die Methode auf das Objekt der Selektion angewandt:

Range("A3").Select

Selection.Methode

Diese Art des Zellenzugriffs eignet sich besonders, wenn schon eine Selektion vorliegt, etwa weil der Programmanwender aus einer Mehrzahl von Zellen eine Zelle auswählen soll, deren Inhalt dann bearbeitet wird.

In Bezug auf Zellen ist die Activate-Methode mit der Select-Methode gleichbedeutend. Das Beispiel könnte also auch lauten:

Range("A3").Activate

ActiveCell.Methode

Weiterhin kann eine einzelne Zelle über die Cells-Auflistung angesprochen werden:

Cells(3,1).Methode

Wie man sieht, erwartet Cells statt eines Zeichenkettenparameters (wie Range oder Selection) einen Zellenbezug, der aus zwei Zahlen besteht. Der Vorteil dabei ist, daß man Cells sehr einfach in Schleifen verwenden kann, da die Laufvariablen der Schleifen ohne Umwege in den Parameterbereich eingesetzt werden können. So wird das Bearbeiten mehrerer Zellen einer Zeile oder Spalte vereinfacht. Der Nachteil ist, daß das Cells-Objekt die Parameter in der Form {Zeile, Spalte} erwartet, und nicht wie Range in der Form {Spalte, Zeile}, wodurch eine große Fehlergefahr besteht.

Eine einzelne Zelle kann auch angesprochen werden, indem man einen vorher (über den Menübefehl "Einfügen | Namen") vergebenen Zellennamen ausnutzt:

[Zellenname].Methode

Während alle vorangegangenen Zugriffsmöglichkeiten einen absoluten Zellenbezug benötigen, arbeitet die Offset-Methode mit relativen Angaben:

[A1].Offset(3,1)

Hier begegnet uns wieder die Schreibweise {Zeile, Spalte}, anzugeben als zwei positive natürliche Zahlen.

Bereiche bearbeiten

Ähnlich wie der Sonderfall der Zellenauswahl bei einer einzelnen Zelle können auch Bereiche selektiert werden. Dabei werden dem Range-Objekt statt einer einzelnen Zelle die "Eckpunkte", genauer gesagt, die Eckzellen eines rechteckigen Bereiches übergeben, voneinander getrennt durch einen Doppelpunkt:

Range("A5:D8").Select

Eine ganze Spalte wird selektiert durch

Columns("A:A").Select,

und ein Spaltenbereich durch

Columns("A:F").Select

Wie bereits im Kapitel 5.3.4 erwähnt, wird die Excel-Anwendung durch ein Application-Objekt repräsentiert, dem alle weiteren Objekte, Methoden und Eigenschaften zur Manipulation der Anwendung untergeordnet sind. Um die nächsten Hierarchieebenen ansprechen zu können, bedient man sich in der VBA-Programmierung für Excel im wesentlichen der Arbeitsmappen, Fenster und Arbeitsblätter.

Arbeitsmappen

Mit einem Excel-Makro können nicht nur die Arbeitsmappen (Excel-Dateien) bearbeitet werden, die den gerade abgearbeiteten Code enthalten, der Zugriff ist auch auf andere Arbeitsmappen möglich, sofern diese in die Anwendung geladen wurden. Alle Arbeits-mappen (geöffnet oder nicht) werden dabei durch die Workbooks-Auflistung angesprochen. Zum Beispiel läßt sich eine neue Mappe durch

Workbooks.Add

erzeugen.

Der Zugriff auf die Mappe, deren Code gerade abläuft, ist durch das Objekt ThisWorkbook möglich. Die aktive Arbeitsmappe, d.h. die Mappe, welche momentan den Fokus besitzt, wird durch das ActiveWorkbook-Objekt angesprochen.

Fenster

In Excel können mehrere Fenster von einer Arbeitsmappe nebeneinander existieren. Dadurch lassen sich z.B. bei umfangreichen Tabellen die Spaltenüberschriften und die letzten Zeilen gleichzeitig in verschiedenen Fenstern betrachten, was die Lesbarkeit erhöhen kann.

Jeder Arbeitsmappe ist in Excel mindestens ein Fenster zugeordnet, auch wenn es zum Icon verkleinert oder unsichtbar ist. Angesprochen werden die Fenster über die Windows-Methode. Je nachdem, auf welches Objekt - Application oder ein Workbook-Objekt (z.B. ThisWorkbook) - die Methode angewandt wird, kann man alle Fenster oder nur die Fenster der Mappe bearbeiten.

Äquivalent zum Objekt ActiveWorkbook gibt es auch ein ActiveWindow.

Arbeitsblätter

Mit Sheets hat man Zugriff auf alle Blätter einer Arbeitsmappe, egal, ob es sich um ein Tabellenblatt, ein Diagramm oder um einen Dialog handelt. Sheets kann sowohl auf Application angewandt werden, wenn der Zugriff auf die Blätter der gerade aktiven Arbeitsmappe gewünscht ist, als auch mit einem Workbook-Objekt, wenn eine bestimmte Mappe bearbeitet werden soll.

Eine Verfeinerung von Sheets stellen im wesentlichen die Auflistungen Worksheets (Zugriff nur auf Tabellenblätter), Charts (Diagramme), und DialogSheets (vom Anwender erstellte Dialoge bzw. Formulare) dar. Letzteres ist nur noch aus Kompatibilitätsgründen in Excel 97 vorhanden; wie im Abschnitt 5.2 erwähnt, geschah in Excel 95 der Zugriff auf einen Dialog anders als in Excel 97, heute wird ein Dialog über seinen Namen angesprochen.

Die aktiven Blätter werden, wie üblich, mit einer Eigenschaft angesprochen, deren Name jeweils mit Active beginnt und mit dem Blatt-Typ schließt (ActiveSheet, ActiveChart, ActiveDialog).

Soll mit einem Excel-Makro der Inhalt einer Zelle, eines Blattes oder einer Mappe verändert, ausgelesen oder formatiert werden, sind oft zahlreiche Objekte im Spiel, die alle ihre eigenen Methoden und Eigenschaften mitbringen. Bei einfachen Aufgaben kann es daher nützlich sein, die anfallenden Aufgaben zuerst einmal manuell auszuführen und dabei ein Makro aufzunehmen. Das Makro kann dann als Grundlage für den eigenen Programmcode dienen und der Programmierer braucht sich nicht alle Anweisungen zu merken. Besteht Unklarheit über die Funktion eines Begriffes im erzeugten Programmtext, liefert die Excel-Hilfe meistens schnell die Erklärung (Wort markieren oder nur den Cursor darüber setzen, dann die F1-Taste drücken).

Viele Programmzeilen in einem automatisch erzeugten Makro sind allerdings überflüssig für den Programmablauf und verlangsamen somit nur die Ausführungsgeschwindigkeit. Daher ist es häufig sinnvoll, der Programmierer erzeugt den Code von Hand. Die folgenden Abschnitte versuchen, Standardanweisungen für die wichtigsten Anwendungen bei der Excel-Programmierung aufzulisten. Da viele Anweisungen selbsterklärend sind, werde ich die Erläuterungen auf ein minimales Maß begrenzen. Für eine erweiterte Liste siehe z.B. /1/.

Umgang mit Arbeitsmappen, Fenstern und Blättern

Bereits im vorangegangenen Kapitel 5.4.2.1 wurde gezeigt, daß mit

Workbooks.Add

eine neue Arbeitsmappe erstellt wird.

Das Speichern der aktuellen Mappe unter einem neuen Namen im selben Verzeichnis, in dem auch die Excel-Anwendung untergebracht ist, geschieht mit:

ActiveWorkbook.SaveAs FileName:=Application.Path & " \TestMappe.xls"

Aktivieren einer Arbeitsmappe durch Angabe ihres Namens:

Windows("TestMappe.xls").Activate

(Achtung: Select darf nicht angewandt werden!)

Öffnen einer Mappe unter Angabe eines Dateinamens mitsamt Pfad:

Workbooks.Open FileName:="C:\TEMP\AndereMappe.xls"

Aufruf des Excel-Standarddialogs zum Öffnen einer Datei:

Dateiname = Application.GetOpenFilename

Speichern der aktiven Mappe:

ActiveWorkbook.Save

Schließen der aktiven Mappe:

ActiveWorkbook.Close

Aktivieren einer Tabelle durch Angabe ihres Namens:

Sheets("Tabelle1").Select

Umbenennen einer Tabelle:

Sheets("Tabelle1").Name = "NeuerName"

Hinzufügen einer neuen Tabelle zur aktiven Arbeitsmappe:

Sheets.Add Type:= xlWorksheet

Einfügen einer Kopie der Tabelle3 an erster Stelle aller Arbeitsblätter:

Sheets("Tabelle3").Copy Before:=Sheets(1)

Löschen der ausgewählten Arbeitsblätter:

ActiveWindow.SelectedSheets.Delete

Aktivieren eines Diagramms, das in einem Tabellenblatt integriert ist:

ActiveSheet.ChartObjects("Diagramm 1").Activate

Aktivieren eines Diagrammblattes:

Sheets("Diagramm1").Select

Fenster Minimieren, Maximieren oder auf Normalgröße verändern:

ActiveWindow.WindowState = xlMinimized

ActiveWindow.WindowState = xlNormal

ActiveWindow.WindowState = xlMaximized

Horizontales und vertikales Teilen eines Fensters (die Zahlen stehen für die Anzahlen von Zeilen oberhalb, bzw. Spalten links neben der Teilungslinien):

ActiveWindow.SplitRow = 10

ActiveWindow.SplitColumn = 2

Erzeugen eines neuen Fensters der aktiven Mappe:

ActiveWindow.NewWindow

Anordnen aller nicht minimierter Fenster:

Umgang mit Zellen, Zeilen und Spalten

Einfügen neuer Spalten links neben den selektierten Spalten (die Anzahl der neuen entspricht der Anzahl der ausgewählten Spalten):

Columns("B:C").Select

Selection.Insert Shift:=xlToRight

Einfügen neuer Zeilen oberhalb der selektierten Zeile (die Anzahl der neuen entspricht der Anzahl der ausgewählten Zeilen):

Rows("6:6").Select

Selection.Insert Shift:=xlDown

Einfügen eines Textes (oder einer Zahl) in eine Zelle:

ActiveCell.FormulaR1C1 = "abcd"

Einstellen der Zeilenhöhe und der Spaltenbreite:

Selection.RowHeight = 15

Columns("D:D").ColumnWidth = 20

Formatierung des Zellentextes über das Font-Objekt:

Selection.Font.Name = "SansSerif"

Selection.Font.FontStyle = "Bold"

Selection.Font.Size = 16

‘unterstrichen)

Anwendung der Summenformel:

ActiveCell.FormulaR1C1 = "=SUM(R[-4]C:R[-1]C)"

‘(Summe der vier Zellen oberhalb der aktiven Zelle)

Eingabe einer einfachen eigenen Formel:

ActiveCell.FormulaR1C1 = "=R[3]C[-2]-R[1]C[-2]"

‘(Inhalt der Zelle, die drei Zeilen unterhalb und zwei Spalten links neben der ‘aktiven Zelle liegt, minus dem Inhalt der Zelle an Position [+1,-2])

Zahlenformatierung (zwei Nachkommastellen):

Selection.NumberFormat = "0.00"

Zahlenformatierung (Angabe der Zahl mit Tausender-Trennzeichen):

Selection.Style = "Comma"

Zahlenformatierung:

Selection.Style = "Percent"

‘(Macht aus einer Zahl eine Prozentzahl)

Einfügen einer doppelten, dicken Zellenrahmenlinie unten, in der Farbe blau:

With Selection.Borders(xlEdgeBottom)

.LineStyle = xlDouble

.Weight = xlThick

.ColorIndex = 32

End With

Zeilenumbruch in der selektierten Zelle einfügen:

Selection.WrapText = True

Inhalte einer Zelle löschen (Formatierung bleibt erhalten):

Selection.ClearContents

Formatierung einer Zelle auf den Standard zurückstellen:

Selection.ClearFormats

Zelleninhalt kopieren / ausschneiden / einfügen:

Selection.Copy

Selection.Cut

Selection.Paste

Textausrichtung mittig / links / rechts über alle Selektierten:

Selection.HorizontalAlignment = xlCenter

Selection.HorizontalAlignment = xlLeft

Selection.HorizontalAlignment = xlRight