Combobox Werte trennen

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

Betrifft: Combobox Werte trennen
von: Yilmaz H.
Geschrieben am: 24.03.2005 16:22:37
Hallo zusammen,
ich habe eine Combobox mit 2 Spalten. In der erste Spalte ist der Artikelnummer und in zweiten der Artikelname.
Mein Problem ist: Ich möchte die Artikelnummer in eine Zelle wie. z.B K4 schreiben. Leider schaffe ich das nicht.
Den zweiten Wert konnte ich mit große mühe und recherche Tätigkeiten lösen.
Hier der Beispiel Code:
Dim pos As Integer
post = Instr(1, Combobox2.text, " ")
Workbooks("PC01.xls").sheets("Rechnung").Range("E4") = Mid(combobox2.text, pos + 1)
so geht es, aber wie bekomme ich den ersten wert. Bitte schnell um Hilfe.
Danke und Gruß
Yilmaz

Bild

Betrifft: AW: Combobox Werte trennen
von: Hajo_Zi
Geschrieben am: 24.03.2005 16:29:52
Hallo Yilmaz,
das Dürfte genauso sein wie bei der Listbox
TXT_Menge = ListBox1.List(ListBox1.ListCount, 1)
TXT_Preis = ListBox1.List(ListBox1.ListCount, 2)

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


Bild

Betrifft: AW: Combobox Werte trennen
von: Yilmaz H.
Geschrieben am: 24.03.2005 18:15:25
Hallo,
leider komme ich mit dem o.g. Code nicht weiter.
Kannst Du das bitte nächer erläutern, bzw. den tatsächlichen Code aufschreiben.
Danke und Gruß
Yilmaz
Bild

Betrifft: AW: Combobox Werte trennen
von: Hajo_Zi
Geschrieben am: 24.03.2005 19:27:58
Hallo Yilmaz,
das Wort TXT_Menge ersetzen durch Range("A1") , ListBox1 durch Combobox1 und TXT_Preis durch Range("A2") dürfte docch nicht das Problem sein. Ich habe nun natürlich keine Ahnung welche Zellen Du haben willst und welchen Namen Dein Steuerelement hat. Ich will nicht auf Deinen Rechner schauen.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Combobox Werte trennen"