Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Wenn ComboBox Dann ListBox | Herbers Excel-Forum


Betrifft: Wenn ComboBox Dann ListBox von: sockel939
Geschrieben am: 16.10.2008 15:36:46

Hallo Excelfreunde,

habe hier ne Legerverwaltung dessen Code ich gerne um einen Punkt erweitern möchte.

Und zwar soll die TextBox " Lagerbestand" aus der UserForm die Gesamtmenge aus der Tabelle "Lagerstand" wiedergeben in abhängigkeit des Wertes der in der ComboBox "Marke"
eingegeben wurde. Die Combobox holt die Daten aus dem Blatt "Entnahme".

Wer sichs anguckt weis was ich meine.

https://www.herber.de/bbs/user/56061.xls

Danke im voraus

Tom

  

Betrifft: AW: Wenn ComboBox Dann ListBox von: Chris
Geschrieben am: 16.10.2008 16:02:56

Servus,

so?

Private Sub lbxentnahme_Click()
With Me
    .e_artnr = lbxEntnahme.List(lbxEntnahme.ListIndex, 1)
    .e_menge.Value = "1"
    TextBox1.Value = lbxEntnahme.List(lbxEntnahme.ListIndex, 4)
End With
End Sub



Gruß

Chris


  

Betrifft: AW: Danke Chris von: sockel939
Geschrieben am: 17.10.2008 08:57:36

Jupp genau so, Danke Chris das rundet alles ab :-)

Gruß

Tom


Beiträge aus den Excel-Beispielen zum Thema "Wenn ComboBox Dann ListBox"