Thema Datum  Von Nutzer Rating
Antwort
Rot ListBox befüllen
 12.04.2022 17:52:02 Tim
Solved
12.04.2022 20:38:46 Gast45846
Solved

Ansicht des Beitrags:
Von:
Tim		 Datum:
12.04.2022 17:52:02		 Views:
1551		 Rating:
     
Antwort:
 Nein
Thema:
ListBox befüllen

Hallo,

ich bin noch komplett neu und tue mich leider sehr schwer damit.

Vielleicht könnt ihr mir ja helfen.

Ich habe eine UserForm und in dieser UserForm ist eine ListBox die ich befüllen möchte mit 2 Spalten.

Das Funktioniert auch soweit ganz gut, leider werden mir aber auch die Leeren Zeilen mit angezeigt.

Vielleicht könnt Ihr mir ja helfen, wie ich das in meinem Code einbauen kann, dass die Leeren Zeilen nicht mit angezeigt werden.

Mein aktueller Code ist:

 

Private Sub UserForm_Initialize()

    'ListBox befüllen       'Additem
    
    ListBox1.ColumnCount = 2
    ListBox1.ColumnWidths = "70;80"
    
    Dim Zeile As Long
    
    For Zeile = 1 To Datenbank.ListObjects("Datenbank_PersDat").DataBodyRange.Rows.Count
        ListBox1.AddItem Datenbank.ListObjects("Datenbank_PersDat").DataBodyRange(Zeile, 1)
        ListBox1.List(ListBox1.ListCount - 1, 1) = Datenbank.ListObjects("Datenbank_PersDat").DataBodyRange(Zeile, 2)
    Next Zeile

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
 12.04.2022 17:52:02 Tim
Solved
12.04.2022 20:38:46 Gast45846
Solved