Why One Macro Works and The Other Doesnt?

**changedsoul** · 08-29-2012, 10:11 PM

Does anyone see why this Macro doesnt work?

I have two Macros. One created Through the Recorder, the other Taken from the net and tweaked a bit.
I am trying to get the to sort the worksheet by color.

Macro 1: This one works fine. (Generated from the recorder)

Please Login or Register  to view this content.

This One as taken from the net and Worked Awsome for Selecting the cells I wanted, but doesnt make it to the sorting, it errors out with:

Run Time error '1004'
The Sort reference is not valid. Make sure that its within the data you want to sort, and the first Sort By box isnt the same or blank

This happens as soon as I run the .Apply line:

Here is the code:

Please Login or Register  to view this content.

Any Ideas? I even tried pasting the exact code from the Recorded Macro right after "myUsedRange.Select" and got the same error.

**patel45** · 08-30-2012, 03:09 AM

try this

Please Login or Register  to view this content.

otherwise attach your file

**changedsoul** · 08-30-2012, 07:07 PM

Nope, sorry, this doesnt work. I get another runtime error. This time on: Set Rng = ActiveSheet.Selection.
test.xlsm

**Andy Pope** · 08-31-2012, 05:04 AM

Selection is a property of the activewindow.
Also the modify the SortFields to be a single column and not the whole range.

Please Login or Register  to view this content.

**changedsoul** · 08-31-2012, 06:21 AM

Ahhh Thanks for pointing that out to me. After looking at the Auto generated macro from the recorder, I noticed the range was only in column A. The changes worked perfectly. Thanks again.

**Cutter** · 08-31-2012, 07:55 PM

@ changedsoul

Based on your last post it seems that you are satisfied with the solution(s) you've received but you haven't marked your thread as SOLVED. I'll do that for you now but please keep in mind for your future threads that Rule #9 requires you to do that yourself. If your problem has not been solved you can use Thread Tools (located above your first post) and choose "Mark this thread as unsolved".
Thanks.

Also, as a new member of the forum, you may not be aware that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of those who helped.