Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Userform Listbox Höhe dynamisch anpassen
21.01.2019 13:11:45 Kalle
NotSolved
21.01.2019 13:41:41 Gast52384
NotSolved
21.01.2019 13:56:31 Kalle
Solved
21.01.2019 13:50:32 Gast84655
NotSolved
21.01.2019 17:52:09 Kalle
Solved

Ansicht des Beitrags:
Von:
Kalle
Datum:
21.01.2019 13:11:45
Views:
159
Rating: Antwort:
  Ja
Thema:
VBA Userform Listbox Höhe dynamisch anpassen

Hallo, ich bin neu hier und würde gern Hilfe bekommen bei einem komischen Problem. Ich möchte die Höhe einer Userform an den Bildschirm anpassen (Me.Height = Y – 20), das klappt. Dann auch die Höhe einer Listbox1 angepasst werden (ListBox1.Height = Me.Height – ListBox1.Top – 50), das klappt nur, wenn anschließend eine MsgBox läuft. Das kann wohl nicht sein. Der Code:

Private Sub UserForm_Initialize()

Y = Application.Height

Me.Top = 0

Me.Height = Y - 20

ListBox1.Height = Me.Height – ListBox1.Top - 50

'MsgBox "123"                  'ListBox1.Height reagiert nicht

MsgBox "123"                  'ListBox1.Height reagiert korrekt , aber MsgBox ist natürlich unerwünscht!

End Sub

Kann mir jemand helfen? Vielen Dank schon im voraus, Kalle

 

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot VBA Userform Listbox Höhe dynamisch anpassen
21.01.2019 13:11:45 Kalle
NotSolved
21.01.2019 13:41:41 Gast52384
NotSolved
21.01.2019 13:56:31 Kalle
Solved
21.01.2019 13:50:32 Gast84655
NotSolved
21.01.2019 17:52:09 Kalle
Solved