ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Macro giving runtime error on one PC and not another (https://www.excelbanter.com/excel-programming/339939-macro-giving-runtime-error-one-pc-not-another.html)

Ingrid

Macro giving runtime error on one PC and not another
 
In the following code, the macro gives a runtime error 1004: application or
object defined error at the Selection.Sort command.

Sheets("Data").Select
Cells.Select
Selection.Font.Bold = False
Selection.Sort Key1:=Range("A2"), Order1:=xlDescending,
Key2:=Range("B2") _
, Order2:=xlDescending, Header:=xlYes, OrderCustom:=1,
MatchCase:=False _
, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal,
DataOption2:= _
xlSortNormal


The macro works fine for me with Excel 2003, but not for my friend who has
Excel 2000. Is there something in the code that could be removed and still
let the macro function on his pc?

Or is there a setting in his Excel that needs to be changed to allow this to
work?

Thanks!


Ingrid

Macro giving runtime error on one PC and not another
 
Thanks so much - very helpful!

"Jim Thomlinson" wrote:

Remove the DataOption2:= xlSortNormal. It is a new feature in 2003 that did
not exist in 2000. xlSortNormal is the default so it does not make a
difference anyway...

--
HTH...

Jim Thomlinson


"Ingrid" wrote:

In the following code, the macro gives a runtime error 1004: application or
object defined error at the Selection.Sort command.

Sheets("Data").Select
Cells.Select
Selection.Font.Bold = False
Selection.Sort Key1:=Range("A2"), Order1:=xlDescending,
Key2:=Range("B2") _
, Order2:=xlDescending, Header:=xlYes, OrderCustom:=1,
MatchCase:=False _
, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal,
DataOption2:= _
xlSortNormal


The macro works fine for me with Excel 2003, but not for my friend who has
Excel 2000. Is there something in the code that could be removed and still
let the macro function on his pc?

Or is there a setting in his Excel that needs to be changed to allow this to
work?

Thanks!


Dave Peterson

Macro giving runtime error on one PC and not another
 
FYI only. It's in xl2002, too <bg.

Jim Thomlinson wrote:

Remove the DataOption2:= xlSortNormal. It is a new feature in 2003 that did
not exist in 2000. xlSortNormal is the default so it does not make a
difference anyway...

--
HTH...

Jim Thomlinson

"Ingrid" wrote:

In the following code, the macro gives a runtime error 1004: application or
object defined error at the Selection.Sort command.

Sheets("Data").Select
Cells.Select
Selection.Font.Bold = False
Selection.Sort Key1:=Range("A2"), Order1:=xlDescending,
Key2:=Range("B2") _
, Order2:=xlDescending, Header:=xlYes, OrderCustom:=1,
MatchCase:=False _
, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal,
DataOption2:= _
xlSortNormal


The macro works fine for me with Excel 2003, but not for my friend who has
Excel 2000. Is there something in the code that could be removed and still
let the macro function on his pc?

Or is there a setting in his Excel that needs to be changed to allow this to
work?

Thanks!


--

Dave Peterson


All times are GMT +1. The time now is 07:18 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com