VBA: Listenfelder über Arrays füllen

Artikel-ID: 506230 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Dieser Artikel wurde zuvor veröffentlicht unter D32820
Alles erweitern | Alles schließen

Problembeschreibung

Ich arbeite mit Microsoft EXCEL für WINDOWS 95, Version 7.0. Ich programmiere in VISUAL BASIC für Applikationen (VBA) Dialogfelder. In einem Listenfeld habe ich die Möglichkeit, einen Listenbereich aus Tabellen-Zellen zuzuordnen, mit dessen Werten es gefüllt wird. Kann ich dieses Listenfeld auch über eine VBA Prozedur füllen, so daß ich keinen separaten Tabellenbereich benötige?

Antwort:

EXCEL 7.0 bietet Ihnen die Möglichkeit, Listenfelder über Arrays in Variablen zu schreiben. Sie können somit zum einen bestimmen, wie viele Einträge die Variable haben soll. Zum anderen können Sie die Einträge der Variable zuordnen, und dann in einer Schleife Eintrag für Eintrag das Listenfeld mit den Einträgen füllen.
Bitte passen Sie im nachfolgenden Beispiel die Namen "Dialog1" und "Listenfeld 1" an, falls Sie andere Namen verwendet haben.

Sub ListenfelderFüllen()
Dim Liste(5) 'Anzahl der Einträge für die Variable wird bestimmt
Liste(1) = "a" 'Zuordnung der Einträge auf die Variable
Liste(2) = "b"
Liste(3) = "c"
Liste(4) = "d"
Liste(5) = "e"
DialogSheets("Dialog1").ListBoxes("Listenfeld 1").RemoveAllItems
For i = LBound(Liste) + 1 To UBound(Liste)
DialogSheets("Dialog1").ListBoxes("Listenfeld 1").AddItem Text:=Liste(i)
Next
End Sub

Weitere Informationen zum Erstellen von Dialogfeldern finden Sie in der Online-Hilfe zu VBA.

Bitte beachten Sie:

Die Verwendung des hier abgedruckten Makro- bzw. Programm-Codes geschieht auf Ihre eigene Verantwortung. Microsoft stellt Ihnen diesen Makro bzw. dieses Programm-Listing ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung. Der Makro bzw. das Programm-Listing soll lediglich exemplarisch die Funktionsweise des hier abgedruckten oder auf der Diskette enthaltenen Beispiels aufzeigen.

Microsoft, MS, VISUAL BASIC und Excel sind eingetragene Warenzeichen.
WINDOWS und WINDOWS NT sind Warenzeichen der Microsoft Corporation.

Eigenschaften

Artikel-ID: 506230 - Geändert am: Dienstag, 27. August 2002 - Version: 1.0
Die Informationen in diesem Artikel beziehen sich auf:
  • Microsoft Excel 95 Standard Edition
Keywords: 
array dialog element füllen listenfeld vba KB506230
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.
Disclaimer zu nicht mehr gepflegten KB-Inhalten
Dieser Artikel wurde für Produkte verfasst, für die Microsoft keinen Support mehr anbietet. Der Artikel wird deshalb in der vorliegenden Form bereitgestellt und nicht mehr weiter aktualisiert.

Ihr Feedback an uns

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com