Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Wie füllt man eine Combobox





Frage

Hallo ich bin Anfänger in Sachen VBA. Mein Problem ist, dass ich nicht weiss, wie ich die Daten die ich in TabelleX habe in meiner Combobox angezeigt bekomme. Online Hilfe gibt dann Ratschläge wie Ausdruck.AddItem(Text, Index) Ich versteh dieses text & index nicht und werde aus der Hilfe auch nicht schlau..... hilfe! Folgende Angaben noch dazu. Ich hab ein UserForm erstellt mit 3 Commandbuttons zum auswählen des gewünschten. Nach der Auswahl gelange ich zu 3 Comboboxen. Diese muss ich mit Daten hinterlegen Ich möchte aus TabelleX Spalte B und Zeile 3 genauso wie B4, B5 in meiner Combobox angezeigt bekommen um sie auswählen zu können. Allerdings bleibt meine Box leer und solangsam bin ich ratlos. Hoffenltich könnt ihr mir hier helfen Danke schonmals im Vorraus Grüße Adii

Antwort 1 von Hajo_Zi

Hallo Adi,

Eigenschaftren, RowSource Tabelle1!A1:A23

Gruß Hajo

Antwort 2 von adii

Hallo Hajo

vielen Dank für die schnelle Antwort.

Müsste ich jetzt im Eigenschaftsfeld wenn ich vorher meine ComboBox (ComboTralalala) einfach anklicke, einfügen =TabelleX!B3:B7 oder wenn ich auf mein Combofeld doppelklicke erscheint dieses

Private Sub ComboTralalala_Change()

End Sub

hier rein wie folgt einfügen

Syntax

object.RowSource [= String]

Sorry vielleicht stell ich mich wirklich ungeschickt an, aber das ist alles Neuland für mich

Grüße

Antwort 3 von Hajo_Zi

hallo Adi,

die Frage verstehe ich jetzt nicht. Die Werte sind mit Aufruf der UserForm drin.

Gruß Hajo

Antwort 4 von fedjo

Hallo Adii

Tasten Alt +F11, UserForm, Combobox, rechte Mouse Taste, Eigenschften, RowSource Tabelle1!A1:A23

Gruß
fedjo

Antwort 5 von adii

Mhh wie müsste denn der Syntax befehlen lauten?

Private Sub ComboTralalala_Change()
TabelleX![B3:B7] = RowSource
End Sub

oder eher

Private Sub ComboTralalala_Change()
TabelleX.RowSource [=B3:B7]
End Sub


Grüße

Antwort 6 von Hajo_Zi

Hallo Adi,

warum muss man das per VBA machen?
Option Explicit

Private Sub UserForm_Activate()
ComboBox1.RowSource = "Tabelle1!A1:A23"
End Sub

Gruß Hajo

Antwort 7 von adii

Hallo Hajo

Der Grund liegt darin begründet, dass hier mehrere Tabellenblätter miteinander verglichen werden sollen und das am besten mit nur 1-2 klicks

Grüße und nochmals vielen Dank

Antwort 8 von adii

Hallo fedjo & hajo

mittlerweile läufts *jippie*

Der Tag ist gerettet - werde heute abend ein Bierchen auf Euch trinken ;)

Grüße

Antwort 9 von Hajo_Zi

Hallo Adi,

dem schließe ich mich doch gleich an. Ich vermute aber wir trinken in verschiedenen Kneipen?

Gruß Hajo

Antwort 10 von Adii

Das vermute ich auch, da ich auf ne Privatparty gehe. Aber lass es dir trotzdem schmecken ;)

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: