Hi,

Try this in a general module and adjust the numbers to get what you want

Sub resize()
With Application
.WindowState = xlNormal
.Left = 450
.Top = 1
.Width = 500
.Height = 500
End With
End Sub

Mike

"macroapa" wrote:

Hi,

I am trying to write some vba code that when run will resize the Excel
window and repostition the window (to the top right of the screen).

I have found simliar code that works for MSAccess, but I'm struggling
to re-write it for excel.

Any help appreciated.

Thanks.