Informatik :: VBA :: Zugriff auf Excelobjekte

Zugriff auf Excelobjekte

[Objektbezeichnungen] [Eigenschaften und Methoden] [Objektvariablen] [Aufgaben]

Objektbezeichnungen

Objektklasse Bezeichnung in VBA
Excel-Programm Application
Arbeitsmappe (Exceldatei) Application.Workbooks
geöffnete Arbeitsmappe AktiveWorkbook
Tabelle einer geöffneten Arbeitsmappe AktiveWorkbook.Worksheets(Nr.)
einzelne Zelle AktiveWorkbook.Worksheets(Nr).Range("Adresse") oder

AktiveWorkbook.Worksheets(Nr).Cells(Zeilennr.,Spaltennr.)

Beachte:


Seitenanfang

Eigenschaften und Methoden

Merke:
Der Zugriff auf Objekte kann nur über deren Eigenschaften oder spezielle Methoden erfolgen!!!

Wert einer Zelle der 1.Tabelle: Worksheets(1).Range("Adresse").Value

Beispiel (Wert ändern):

Worksheets(1).Range("A2").Value = 4.5

Beispiel (Wert speichern):

x = Worksheets(1).Range("C4").Value

Formel einer Zelle: Range("Adresse").Formula

Beispiel:

ActiveWorkbook.Worksheets(1).Cells(2,1).Formula = "=B3+D1"

Füllfarbe einer Zelle: Worksheets(1).Range("Adresse").Interior.Color

Beispiel:

Worksheets(1).Cells(5,7).Interior.Color = RGB(255,0,0)

Die Funktion RGB(Rotanteil,Grünanteil,Blauanteil) liefert einen bestimmten Farbwert.

Schriftfarbe einer Zelle: Range("Adresse").Font.Color

Beispiel:

Range("A2").Font.Color = RGB(0,0,255)

Öffnen einer anderen Exceldatei: Applikation.Workbooks.Open("Pfad\Dateiname")

Der Pfad zur Datei muss immer absolut und in Windows-Notation (also mit \ ) angegeben werden.
Leerzeichen und deutsche Sonderzeichen im Pfad sind verboten!!!

Beispiel:

Applikation.Workbooks.Open("C:\Uebung\Test.xls")


Seitenanfang

Objektvariablen

Merke:
Eine Objektvariable speichert alle Eigenschaften und Methoden einer Objektklasse. Sie stellt selbst wieder ein Objekt dar. Man sagt: "Sie ist eine neue Instanz der Objektklasse."

Wie jede andere Variable muss sie zunächst deklariert werden.

Beispiele:

Dim objWB As Workbook  'Dekl. der Variablen objWB vom Typ Workbook
Dim objWS As Worksheet 'Dekl. der Variablen objWS vom Typ Worksheeet

Die Wertzuweisung erfolgt durch die Set-Anweisung.

Beispiele:

Set objWB = Applikation.Workbooks.Open("Datei2.xls")
'Eigenschaften und Methoden der Datei werden der Variablen objWB zugewiesen

Set objWS = objWB.Worksheets(2)'Eigenschaften und Methoden der 2. Tab. werden der Variablen objWB zugewiesen

Jetzt kann die Objektvariable wie die entsprechende Objektklasse verwendet werden

Beispiele:

objWS.Range("A2").Value = "Hallo!" 'Der Zelle A2 wird der Wert "Hallo!" zugewiesen
objWS.Range("A2").Font.Color = RGB(255,255,255) 'Schriftfarbe der Zelle A2 wird weiß
objWS.Range("A2").Interior.Color = RGB(0,0,255) 'Füllfarbe der Zelle A2 wird blau
objWB.Save 'Datei speicheren
objWB.Close 'Datei schließen


Seitenanfang

Aufgaben