Maximise Excel Code

[4pbn]

Hi all, what is the code that will maximise an Excel Form when the Command Button is clicked. My code is shown below:

Private Sub Command1_Click()
Dim xlApp As Excel.Application

Set xlApp = New Excel.Application
Workbooks.Open FileName:="C:\Forms\Forms.xls"
Workbooks.Application.Visible = True

End Sub

Thanks for your help.

 

[AskMan]

Hi, I think you could use the following code

xlApp.Windows("Forms.xls&quot.wWindowState = xlMaximized

I've written "Forms.xls", but it is the caption of your form

Hope this could help you