Microsoft Excel

Herbers Excel/VBA-Archiv

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

Comboxwerte addieren | Herbers Excel-Forum


Betrifft: Comboxwerte addieren von: Thomas
Geschrieben am: 31.07.2012 10:36:45

Hallo zusammen,

in einer Userform habe ich zwei Comboboxen
Cbb1 und Cbb2

In einer Listebox sollen nun die Werte der beiden Comboboxen addiert werden.

Ich habe es bisher über RowSource gelöst und dort die entsprechende Zelle eingegeben, so werden die Werte aber bei Veränderung nicht aktualisiert.

Wie schreibt man denn das direkt in eine Listbox ?

Schöne Grüße
Thomas

  

Betrifft: AW: Comboxwerte addieren von: {Boris}
Geschrieben am: 31.07.2012 10:38:33

Hi Thomas,

zeig mal Deine Datei mit dem Userform.

VG, Boris


  

Betrifft: AW: Comboxwerte addieren von: Thomas
Geschrieben am: 31.07.2012 10:47:42

Hallo Boris,

es geht um die UserForm "Seite3".

Gruß
Thomas

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


  

Betrifft: AW: Comboxwerte addieren von: {Boris}
Geschrieben am: 31.07.2012 11:12:39

Hi Thomas,

ich schließe mich Karin an: Wozu eine ListBox?
Wenn Du nur eine Ergebnisanzeige brauchst, dann tut`s auch ein einfaches Label...
Also: Klär uns auf ,-)

VG, Boris


  

Betrifft: AW: Comboxwerte addieren von: Beverly
Geschrieben am: 31.07.2012 11:08:23

Hi Thomas,

weshalb soll die Summe in einer Listbox ausgegeben werden? Soll die Summe bei jeder Änderung einer der ComboBoxen eingetragen werden sodass ein fortlaufender Nachweis der Änderungen dokumentiert wird? Oder was ist der Sinn?


GrußformelBeverly's Excel - Inn


  

Betrifft: AW: Comboxwerte addieren von: Thomas
Geschrieben am: 31.07.2012 11:12:02

Hallo Karin,

ja, so habe ich es mir gedacht, dass sich bei jeder Änderung in der Combobox die Addition in dem Listfeld aktualisiert.

Gruß
Thomas


  

Betrifft: AW: Comboxwerte addieren von: Beverly
Geschrieben am: 31.07.2012 12:18:34

Hi Thomas,

im Codemodul des UserForms diesen Code:

Private Sub cbb1_Change()
   If cbb1 = "" Then
      dblCBB1 = 0
   Else
      dblCBB1 = CDbl(cbb1)
   End If
   If cbb2 = "" Then
      dblCBB2 = 0
   Else
      dblCBB2 = CDbl(cbb2)
   End If
   ListBox1.AddItem dblCBB1 + dblCBB2
End Sub

Private Sub cbb2_Change()
   If cbb1 = "" Then
      dblCBB1 = 0
   Else
      dblCBB1 = CDbl(cbb1)
   End If
   If cbb2 = "" Then
      dblCBB2 = 0
   Else
      dblCBB2 = CDbl(cbb2)
   End If
   ListBox1.AddItem dblCBB1 + dblCBB2
End Sub


GrußformelBeverly's Excel - Inn


  

Betrifft: AW: Comboxwerte addieren - Nochmals Danke :o) von: Thomas
Geschrieben am: 31.07.2012 14:05:16

Danke!


Beiträge aus den Excel-Beispielen zum Thema "Comboxwerte addieren"