Herbers Excel-Forum - das Archiv

combobox mit tabelleninhalt??

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: combobox mit tabelleninhalt??
von: marc

Geschrieben am: 30.06.2008 17:04:26

hallo zusammen
habe folgenden code:

Public Sub Listenfeld2()
With Worksheets("Tabelle50")
.ComboBox2.AddItem " Herr XY"
.ComboBox2.AddItem " Herr YX"
.ComboBox2.AddItem " Einkauf"
.ComboBox2.AddItem " Verkauf"
.ComboBox2.AddItem " Rechnungswesen"
.ComboBox2.AddItem " Leer"
End With
End Sub


nun mein problem:
da die daten öfters wechseln können würde ich den inhalt "ist immer text" gerne aus einer zelle einlesen in die combobox. die aktion bleibt die gleiche auch wen der inhalt wechselt! wie kann ich den inhalt sprich anstelle von z.b. "Einkauf" den inhalt z.b. aus zelle a3 in tabelle 60 einlesen???
danke für eure antworten
gruess

Bild

Betrifft: AW: combobox mit tabelleninhalt??
von: Chris

Geschrieben am: 30.06.2008 17:12:35
Servus,

Public Sub Einlesesn ()
Dim i as Long
With Sheets("Tabelle50")
.Combobox2.Clear
For i = 1 to 5
.Combobox2.Additem .Cells(i, 1)
Next i
End with
End Sub


Hier steht I = 1 to 5 für Index der Zeilennummer (hier Zeile 1-5). Bei .Cells(i, 1) steht die 1 für die erste Spalte, also 2 wäre Spalte B u.s.w..
Für zeile2 -4, wäre dann also zu schreiben i = 2 To 4.
Jetzt kann man in die entsprechenden Zellen den wechselnden Text hineinschreiben.
Gruß
chris

Bild

Betrifft: AW: combobox mit tabelleninhalt??
von: marc
Geschrieben am: 30.06.2008 17:28:43
super danke!
gruess

 Bild
Excel-Beispiele zum Thema "combobox mit tabelleninhalt??"
ComboBox als Symbol Alle ComboBoxes auf Position 1
Werte in eine ComboBox einer UserForm übernehmen ComboBox in Abhängigkeit einer 2. ComboBox ein-/ausblenden
ComboBox mit Monatsnamen füllen Mehrspaltige ComboBox
ComboBox2 in Abhängigkeit von ComboBox1 bestücken Nur Zellen mit Inhalt in ComboBox listen
Neue UserForm bedingt nach ComboBox-Auswahl aufrufen Neues Element in ComboBox