I have been running the below code in an Excel Macro without any issues to
copy selective rows of data to a temp1 worksheet based upon a autofilter
selection. After I went to Office 2003 Professional for Office XP Pro, I
get a run-time error '1004' on the line for the UsedRange.Copy. Does any
one know of a fix or why this is happening?

'Filter and copy code:
If Worksheets(GLBalance).FilterMode = True Then
Worksheets(GLBalance).ShowAllData
End If
Worksheets(GLBalance).Range(ColGLBalCompanyCode & "1").AutoFilter _
field:=1, _
Criteria1:=szCompanyCode
Worksheets(GLBalance).Range(ColGLBalYear & "1").AutoFilter _
field:=3, _
Criteria1:=nYear
Worksheets(GLBalance).Range(ColGLBalPeriod & "1").AutoFilter _
field:=4, _
Criteria1:="<=" & szPeriod
Worksheets(Temp1).Cells.ClearContents
ActiveWorkbook.Worksheets(GLBalance).Activate
ActiveWorkbook.Worksheets(GLBalance).Cells.Special Cells(xlCellTypeVisible).S
elect
ActiveWorkbook.Worksheets(GLBalance).UsedRange.Cop y _
Destination:=ActiveWorkbook.Worksheets(Temp1).Rang e("A1")