VBA UserFormdynamic调整事件与多页

早上好！

我开始阅读这个：

http://www.andypope.info/vba/resizeform.htm

虽然这是非常丰富的信息，但我想知道是否有人能够指出我正确的方向来帮助解决我的问题。 我想dynamic设置一个用户窗体的高度和宽度值取决于select多页（大概是点击事件）。 会是这样的吗？

Sub pageX_click height.value = 23 width.value = 50 End Sub 

我认为这可能比这更复杂，但如果有人愿意指引我正确的方向，我可以鼓励，直到我find正确的解决scheme。

其他问题 – 由于大小不同，我需要静态设置每次打开哪些页面？ 那样我不会得到随机大小问题/错误？

Answer 1

这是解决scheme，它的字面意思就像我想的那样简单

  Private Sub MultiPage1_Change() If MultiPage1.Value = 0 Then ToolBoxForm.Height = 560.25 ToolBoxForm.Width = 652.5 End If 'lather, rinse, repeat for each page End Sub