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

best. Wert aus ListBox

Betrifft: best. Wert aus ListBox von: Frank H.
Geschrieben am: 08.11.2012 18:56:40

Hallo Zusammen!

Auf einer UF befindet sich eine ListBox. Wenn diese gefüllt ist soll der letzte Wert aus Spalte 4 der ListBox in TextBox12 erscheinen. Wie müsste ich das realisieren?

Danke im Voraus!

Gruß Frank H.

  

Betrifft: AW: best. Wert aus ListBox von: Uduuh
Geschrieben am: 08.11.2012 19:15:48

Hallo,
Textbox12=listbox1.list(listbox.listcount-1,3)

Gruß aus’m Pott
Udo



  

Betrifft: AW: best. Wert aus ListBox von: Frank H.
Geschrieben am: 08.11.2012 19:22:47

Hallo Udo!

Funzt bestens! Danke und 'nen schönen Abend!

L. G. Frank H.


  

Betrifft: AW: best. Wert aus ListBox von: Frank H.
Geschrieben am: 08.11.2012 20:33:53

Hallo Udo!

Ich hoffe du liest dies noch! Es kann aber auch vorkommen, dass die ListBox leer ist und da bekomme ich 'ne Fehlermeldung, wie kann ich diese abfangen!

So funktioniert es nicht!

If ListBox1 = "" Then
TextBox12 = 1
Else
TextBox12 = ListBox1.List(ListBox1.ListCount - 1, 3) + 1
End If

Bitte nochmals um Hilfe!

Gruß Frank H.!


  

Betrifft: AW: Die Hoffnung ... von: Gerd L
Geschrieben am: 08.11.2012 20:52:08

Hallo Frank!

If ListBox1.ListCount = 0 Then
    TextBox12 = 1
Else
    TextBox12 = ListBox1.List(ListBox1.ListCount - 1, 3) + 1
End If

Gruß Gerd


  

Betrifft: AW: Die Hoffnung ... von: Frank H.
Geschrieben am: 08.11.2012 21:06:24

Hallo Gerd!

Peinlich, peinlich! Das hätte ich auch selber hinbekommen können! Aber dir gebührt nun mein Dank!

Danke!

Gruß Frank H.


 

Beiträge aus den Excel-Beispielen zum Thema "best. Wert aus ListBox"