Thanks, I've found some code on google and tried it out. Works some
what. It does enlarge based  on the resolution  but it doesn't lock
in to the display like when you maximize a window  but it works for
me.

Private Sub UserForm_Initialize()

'Set the window size to maximum
Application.WindowState = xlMaximized
frmVA.Width = Application.Width
frmVA.Height = Application.Height