Hi,
Is it possible to expand/contract a user form?
I want the user form to display a standard set of items but i then want the user form to expand to the right and display further entry options when the user clicks a "more options" button (can use a spinner control?).
Any suggestions on how I could do this?
Thanks,
Somewhere in the dark and nasty regions where nobody goes, stands an ancient castle.
Deep within this dank and uninviting place lives Berk, overworked servant of The Thing Upstairs.
But thats nothing compared to the horrors that lurk beneath The Trap Door.
Here's code that allows the user the ability to resize the form....
http://www.andypope.info/vba/resizeform.htm
If you'd rather set the size yourself, you can manipulate the .width and .height properties of the userform.
A simpler approach is to use the caption property, then toggle the height and width.
[vba]
Private Sub OptionsButton_Click()
If OptionsButton.Caption = "Options >>" Then
Me.Height = 164
OptionsButton.Caption = "<< Options"
Else
Me.Height = 128
OptionsButton.Caption = "Options >>"
End If
End Sub
[/vba]
The attachment is from John Walkenbach.
Thats exactly what i'm looking for.Originally Posted by david000
Thank you.
Somewhere in the dark and nasty regions where nobody goes, stands an ancient castle.
Deep within this dank and uninviting place lives Berk, overworked servant of The Thing Upstairs.
But thats nothing compared to the horrors that lurk beneath The Trap Door.
Posting Permissions
Reply With Quote
