Macro sorts
 

I have been having problems with macros seeming to work, then at a later
date, failing and coming up with an error.

The latest instance is where I develop the macro using the record feature. I
select a single column of a spread sheet, then sort it. When I run the
macro it errors out on the sort. If I then manually do the sort, it asks me
if I want to expand the columns. I answer NO then it proceeds as expected.
I'M guessing that this intermediate question is the problem. How do I get
around it.

I have included the code that's failing.

Columns("C:C").Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Thanks for any assistance,

Craig

Macro sorts
 

Which line does it fail on. I can't make it fail on my computer. (2003)

"C Brandt" wrote:

I have been having problems with macros seeming to work, then at a later
date, failing and coming up with an error.

The latest instance is where I develop the macro using the record feature. I
select a single column of a spread sheet, then sort it. When I run the
macro it errors out on the sort. If I then manually do the sort, it asks me
if I want to expand the columns. I answer NO then it proceeds as expected.
I'M guessing that this intermediate question is the problem. How do I get
around it.

I have included the code that's failing.

Columns("C:C").Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Thanks for any assistance,

Craig

Macro sorts
 

I'm running Excel 2003, and it didn't fail right away for me either. I
haven't figured out the sensitivity issue yet.

When I run this manually, it asks the question, how is that resolved when
under macro control?

Craig

"bj" wrote in message
...
Which line does it fail on. I can't make it fail on my computer. (2003)

"C Brandt" wrote:

I have been having problems with macros seeming to work, then at a later
date, failing and coming up with an error.

The latest instance is where I develop the macro using the record
feature. I
select a single column of a spread sheet, then sort it. When I run the
macro it errors out on the sort. If I then manually do the sort, it asks
me
if I want to expand the columns. I answer NO then it proceeds as
expected.
I'M guessing that this intermediate question is the problem. How do I
get
around it.

I have included the code that's failing.

Columns("C:C").Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Thanks for any assistance,

Craig

Macro sorts
 

bj

It fails on the sort. I left the column selection in there to ensure that it
was understood that the sort was on a single column.


Craig

"bj" wrote in message
...
Which line does it fail on. I can't make it fail on my computer. (2003)

"C Brandt" wrote:

I have been having problems with macros seeming to work, then at a later
date, failing and coming up with an error.

The latest instance is where I develop the macro using the record
feature. I
select a single column of a spread sheet, then sort it. When I run the
macro it errors out on the sort. If I then manually do the sort, it asks
me
if I want to expand the columns. I answer NO then it proceeds as
expected.
I'M guessing that this intermediate question is the problem. How do I
get
around it.

I have included the code that's failing.

Columns("C:C").Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Thanks for any assistance,

Craig

Macro sorts
 

That there is not a range section in the line after the selection of column
C indicates you did not expand the response when you first made the macro.

the macro would only do the selection unless the range were established

try deleting the selction line and changing the selcond line to
Range("C:C").Sort Key1:=Range("C2"), Order1:=xlAscending,
"C Brandt" wrote:

I'm running Excel 2003, and it didn't fail right away for me either. I
haven't figured out the sensitivity issue yet.

When I run this manually, it asks the question, how is that resolved when
under macro control?

Craig

"bj" wrote in message
...
Which line does it fail on. I can't make it fail on my computer. (2003)

"C Brandt" wrote:

I have been having problems with macros seeming to work, then at a later
date, failing and coming up with an error.

The latest instance is where I develop the macro using the record
feature. I
select a single column of a spread sheet, then sort it. When I run the
macro it errors out on the sort. If I then manually do the sort, it asks
me
if I want to expand the columns. I answer NO then it proceeds as
expected.
I'M guessing that this intermediate question is the problem. How do I
get
around it.

I have included the code that's failing.

Columns("C:C").Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending,
Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Thanks for any assistance,

Craig

Macro sorts
 

I've never seen code pause to ask you this question. In my experience, excel
just trusts the code to know what it's doing.

But maybe this would help:

application.displayalerts = false
columns("C:C").sort key1:=....
application.displayalerts = true

(Just a guess. Your code worked fine--no prompts--for me in xl2003.)

C Brandt wrote:

I have been having problems with macros seeming to work, then at a later
date, failing and coming up with an error.

The latest instance is where I develop the macro using the record feature. I
select a single column of a spread sheet, then sort it. When I run the
macro it errors out on the sort. If I then manually do the sort, it asks me
if I want to expand the columns. I answer NO then it proceeds as expected.
I'M guessing that this intermediate question is the problem. How do I get
around it.

I have included the code that's failing.

Columns("C:C").Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Thanks for any assistance,

Craig

--

Dave Peterson