RUNTIME ERROR -2147319784 (80028018)

[Guest]

Method select of object range failed

Hi, The code below works OK using Excel 2000 but Gives run
time error code in Excel 2002 w.xp.I changed f. WinNt
Excel 2000 (german) to win xp Excel 2002(engl.).

I tried to copy the simple code to a new workbook . its
works fine / but in the "old" workbooks all makros gives
runtime errors:

Sub TEST()
Range("A1:Y125").Select
Selection.PrintOut Copies:=1
Range("A1").Select
ActiveWindow.SmallScroll Down:=-150
End Sub