Herbers Excel-Forum - das Archiv
Klassen in AddIn mit Excel 97 erstellen

|
Betrifft: Klassen in AddIn mit Excel 97 erstellen
von: Jürgen Schaetzke
Geschrieben am: 29.10.2003 18:15:50
Hallo,
ich möchte eigene Klassen verwenden und aufrufen in der Art
Ergebnis=Pruefen.Art.Antrag.A1Z(Tabellenname)
A1Z ist eine Public function
Ich kann zwar eine Klasse erstellen und in der Klasse eine Public function.
Wenn ich aber in die Tiefe gehen will und in der Klasse eine weitere Klasse definiere, dann erhalte ich bei der Komplilierung einen Fehler, das ein benutzerdefinierte Typ nicht erlaubt ist.
Mein Code:
Im AddIn:
Dim Pruefen as new clsCheck
In Klasse clsCheck:
public property get Art() as clsArt 'Diese Typangabe beanstandet er
Welche Möglichkeit gibt es denn, in Excel 97, Klassen mit weiteren Klassen zu erstellen?
Ich habs auch mit Implements versucht. Das hat er auch nicht akzeptiert.
Einen Beitrag habe ich zu Implements gefunden, der aussagt, das man erst einen Verweis erstellen muss. Das kann aber nicht sein, da die Klassen sich im XLA befinden und ich so keinen externen Verweis erstellen kann.
Ciao Jürgen

 |
Betrifft: AW: Klassen in AddIn mit Excel 97 erstellen
von: Michael Scheffler
Geschrieben am: 29.10.2003 18:50:35
Hi Jürgen,
ich versteh das nicht. Willst Du Eigenschaften vererben - das gehzt unter VB definitiv nicht. Wozu willst Du eine Klasse mit der Klasse erstellen?
Gruß
Micha
Betrifft: AW: Klassen in AddIn mit Excel 97 erstellen
von: Jürgen Schaetzke
Geschrieben am: 29.10.2003 19:33:15
Hallo Micha,
in VB 6.0 geht das schon. Da gibt es dafür auch die friend sub.
Hiermit werden Methoden nicht öffentlich gemacht, stehen aber für Parameterübergaben von einer Klasse an die andere zur Verfügung.
Da für alle Prüfungen mehrere Hundert Funktionen benötigt werden und es ein komplexes Projekt ist, das zudem noch erweitert werden soll, möchte ich die Programmierung etwa vereinfachen bezüglich der Zugriffe auf die Funktionen.
So sollte ein Zugriff ausehen: Pruefen.Art.Antrag.A1Z(Tabellenname)
Ciao Jürgen