Hi folks - I have just discovered a compatibility problem with an Excel file I developed for some of my co-workers. I'm hoping for some insight from the experienced folks here at the forum.
I'm running Excel 2003 on a Win XP platform. I recorded a few macros to use as sorting functions, and linked them to buttons on the page. I cleaned up the spurious code (all scrolling related), added screenupdating and protection code, and left everything else as is.
It all works fine on my two computers running XP (one with Excel 2003 and one with Excel 2002.
But, when I run on an older machine with Win 98 and Excel 2000, I get runtime errors.
Here's the code:
Is there anything here that would cause the runtime problem on the older systems?
Any ideas?
Thanks,
Rich
I'm running Excel 2003 on a Win XP platform. I recorded a few macros to use as sorting functions, and linked them to buttons on the page. I cleaned up the spurious code (all scrolling related), added screenupdating and protection code, and left everything else as is.
It all works fine on my two computers running XP (one with Excel 2003 and one with Excel 2002.
But, when I run on an older machine with Win 98 and Excel 2000, I get runtime errors.
Here's the code:
Code:
Sub SortButton_Volume()
'
' SortButton_Volume Macro
' Macro recorded 12/20/2003 by Richard J. Herbert
'
'
Application.ScreenUpdating = False
ActiveSheet.Unprotect ("egssales")
Columns("M:T").Select
Selection.EntireColumn.Hidden = False
Range("A19:O318").Select
Selection.Sort Key1:=Range("F19"), Order1:=xlDescending, Header:=xlGuess _
, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Columns("N:S").Select
Range("N2").Activate
Selection.EntireColumn.Hidden = True
Range("G1").Select
ActiveSheet.Protect ("egssales")
Application.ScreenUpdating = True
End Sub
Is there anything here that would cause the runtime problem on the older systems?
Any ideas?
Thanks,
Rich