Hi

You could use something like the code below to change the size of the
excel app

Private Sub Workbook_Open()
With Application
.WindowState = xlNormal
.Height = 200
.Width = 200
End With
End Sub

Hope it helps you out

S