How to make a VBA Userform - Full Screen

[michaeldh]

Mr Excel,

I have created a userform in Visual Basic which automatically pops up when a workbook is opened. I would like it to appear in full screen mode ie self adjust to the users PC display settings / acceleration.

Is there a way to do this...if not I will have to design the form a little smaller to suit all needs (not the best solution but).

If you could help, I would be most appreciative.

Michael.

 

[Colo]

Hi Michael,

Please try this code.
If you want to keep the ratio, zoom property makes it possible.

<pre>
Private Sub UserForm_Initialize()
With Application
.WindowState = xlMaximized
Zoom = Int(.Width / Me.Width * 100)
Width = .Width
Height = .Height
End With
End Sub
</pre>

 

[okriskao]

Thanks Colo for answering Michael's question! I needed to do this with my project too!

 

[Zahid Marwat]

Thank you Sir Colo for the solution. I need the same for my small project.
God bless you.

 

[ColdGeorge]

Hello Colo

Handy code, thanks.

ColdGeorge

 

[oldmanwilly]

for some reason i get the error runtime 380, could not set the zoom property please enter a value between 10 and 400?

 

[steve the fish]

Your userform is too small compared to the size of your screen. Make it bigger if you want to use this method.