unsure what to Set object to

[CyberJar]

Hello,

I'm having a problem with this code when viewed online. Here's the code:

Private Sub UserForm_Initialize()
 
Dim OldState As Integer
OldState = Application.WindowState
Application.WindowState = xlMaximized
Me.Top = Application.Top
Me.Left = Application.Left
Me.Height = Application.Height
Me.Width = Application.Width
Application.WindowState = OldState
 
End Sub

Evidently I must explicitly define "Application". So when I add:

Dim xlApp as Excel.Application

I'm unsure of what to set it to:
Set xlApp = ????????

I tried adding "Excel.Application" to each line:
OldState = Excel.Application.WindowState
Excel.Application.WindowState = xlMaximized
etc....
but I'm still getting error 1004, object not SET. What do I set the object to? This is straight Excel/VBA.

Thank you,
CJ

[RobDog888]

What about...

Private Sub UserForm_Initialize()
 
    Dim xlApp as Excel.Application 
    Dim OldState As Integer
 
    Set xlApp = New Excel.Application
    xlApp.WindowState = xlMaximized
    Me.Top = xlApp.Top
    Me.Left = xlApp.Left
    Me.Height = xlApp.Height
    Me.Width = xlApp.Width
    xlApp.WindowState = OldState
 
End Sub

[CyberJar]

Cool Robdog,

You're amazing! This worked - using New solved it. I only added:

xlApp.Quit
Set xlApp = Nothing

Thanks,
CJ