Force Display of Userform Listbox Vertical Scroll Bar

Dear Forum,

I'm trying to force a listbox on an Excel 365 userform to display the vertical scrollbar by default. This is due to the fact that when my workbook shows the form on different monitors, sometimes the vertical scrollbar doesn't show, even when there are data below the visible area.

I have researched many postings on the web and on this forum, but haven't found success. My best guess is that I need an API call, similar to the code below. However, what I have tried isn't working, because I need to get the hWnd of the listbox itself, which I can't seem to do. I'm not super-familiar with using API calls in VBA, which I'm sure is part of the problem. Though I have used them from time to time.

Does anyone have any insight on this?

This is the code I have put in the header of the Userform module.

Please Login or Register  to view this content.

And I tried to set the hWnd using this code, which won't compile, and lists the hwnd member as the problem.

Please Login or Register  to view this content.

Any help would be much appreciated. This thread has NOT been cross-posted.

Thanks!

Brian

ActiveX controls embedded in a Userform have no handles in VBA world. Consequently, the Win API is unlikely to help. In addition, the ListBox does not have a ScrollBars-like property (such as in TextBox or Frame controls) that allows you to force scroll bars to be visible.
One solution would be to put the ListBox in a Frame and display the Frame control's scroll bar. But this will require some extra programming work to achieve an effect similar to the ListBox itself.

Artik

Got it. Thanks, Artik.

Brian

I've never faced your problem, so the suggestions below are blindfolded shots.
Try different ways to "shake" the ListBox control. E.g.
1. Decrease the height of the control to 0.75, and then revert to the original height.
2. Similarly, just increase the height to eg 500 and restore.
3. Hide and show the control.

Use DoEvents and/or Me.Repaint for all these activities. See if there is a difference when you "shake" the control in the Userform_Initalize and Userform_Activate events. Or maybe the ListBox1_Enter event?

Artik