HI Amanda,

Give this a shot:

[vba]Dim aw As Window
Set aw = ActiveWindow
With aw
'Set width and height
.Width = 800
.Height = 200
'Position top left corner of window
.Left = 1
.Top = 1
End With[/vba]

HTH,