Größe einer Textliste dynamisch erzeugen

[AlexS78]

Hi,

ich möchte eine Textliste erzeugen.
Die Größe der Liste soll aus der Anzahl der Dokumente in einer Ansicht bestimmt werden.

Dim Anzahl As Integer
Anzahl = view.EntryCount
Dim Produktliste (Anzahl) As Variant

Leider kommt dabei nur eine Fehlermeldung zustande.
Wenn man die Größe direkt eingibt klappts.

Dim Produktliste (30) As Variant

Kann jemand helfen?

Danke
Alex

[Untitled]

Hi

Probier mal

Code

Dim Produktliste()
Anzahl = xxx
ReDim Produktliste(Anzahl)

des sollte klappen.

Grüsse
Moritz