Thema Datum  Von Nutzer Rating
Antwort
14.01.2018 17:44:01 Thomas
NotSolved
Blau Automatische Höhe einer Listbox
16.01.2018 15:20:52 Gast80223
NotSolved
17.01.2018 17:54:24 Thomas
NotSolved
18.01.2018 07:57:09 Gast44515
NotSolved
18.01.2018 21:34:36 Gast25873
NotSolved

Ansicht des Beitrags:
Von:
Gast80223
Datum:
16.01.2018 15:20:52
Views:
582
Rating: Antwort:
  Ja
Thema:
Automatische Höhe einer Listbox

Hallo,

 

Bei Dingen die von der Schriftgröße und Textlänge abhängen arbeite ich immer gern mit einem versteckten Label oder Textbox.

füge also  ein Label auf deine Userform mach die Visibiliti auf false und Autosize auf true

 

Dann teste folgenden Code

Private Sub UserForm_Activate()
    Dim s As String

    Set Label1.Font = ListBox1.Font
    Label1.Width = 500
    Label1.Height = 5
    DoEvents
    For Each i In Range("Personal").Rows
        ListBox1.AddItem i.Cells(1, 1).Text
        s = s & i.Cells(1, 1).Text & vbCrLf
    Next
    Me.Label1.Caption = s
   ListBox1.Height = Label1.Height + 4
     
     
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
14.01.2018 17:44:01 Thomas
NotSolved
Blau Automatische Höhe einer Listbox
16.01.2018 15:20:52 Gast80223
NotSolved
17.01.2018 17:54:24 Thomas
NotSolved
18.01.2018 07:57:09 Gast44515
NotSolved
18.01.2018 21:34:36 Gast25873
NotSolved