Resize userform VBA

Option 1) Change your screen resolution, and test

Option 2)

Private Sub UserForm_Activate()
UserForm1.Width = Application.Width * 0.95
End Sub