Thema Datum  Von Nutzer Rating
Antwort
Rot Listbox befüllen
 25.03.2019 20:45:05 Ralf
NotSolved
25.03.2019 21:04:19 Gast12133
NotSolved
25.03.2019 21:35:02 Gast43556
NotSolved
25.03.2019 21:40:19 Gast4750
NotSolved
26.03.2019 08:18:16 Ralf
NotSolved
26.03.2019 12:03:42 Gast63661
NotSolved

Ansicht des Beitrags:
Von:
Ralf		 Datum:
25.03.2019 20:45:05		 Views:
901		 Rating:
     
Antwort:
  Ja
Thema:
Listbox befüllen
Guten Abend,
 
ich habe in meiner Excel eine Listbox eingefügt die ich gerne mit Zelleninhalten des gleichen Excel Datenblatts befüllen möchte. Die erste Varante über eine Scheilfe mit Abbruchbedingung funktioniert soweit. Allerdings würde ich die Listbox gerne über eine definition des Zellenbereichs befüllen lassen. Bei der Initialisierung einer Userform habe ich dies schön öfters über den Befehl .RowSource gesehen. Wenn ich das jetzt versuche auf mein Sub Listbox1_click() zu übertragen funktioniert das leider nicht.
 
Kann mir jemand helfen?
Private Sub ListBox1_Click()
Dim a As Integer
ListBox1.Clear

Dim b As String
 For a = 1 To 10
 b = Cells(a, "Z").Value
 ListBox1.AddItem b
 If Cells(a, "A") = "" Then
 Exit For
 End If
Next a
End Sub
_________________________________
private Sub ListBox1_Click()

ListBox1.RowSource = "Z1:Z10"

End Sub
 

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Listbox befüllen
 25.03.2019 20:45:05 Ralf
NotSolved
25.03.2019 21:04:19 Gast12133
NotSolved
25.03.2019 21:35:02 Gast43556
NotSolved
25.03.2019 21:40:19 Gast4750
NotSolved
26.03.2019 08:18:16 Ralf
NotSolved
26.03.2019 12:03:42 Gast63661
NotSolved