Is column Sorted, with possible duplicates

[jomili]

I've been looking all over, with no success. I want either a formula or a VBA function to determine if a column is sorted. I've attached the best candidates I've found, both a formula and function based on that formula. However, while it works well to tell me if a column is sorted, it fails if the column contains duplicates. Is there a way to determine if a column of values, which may or may not contain duplicates, is sorted alphabetically?

I appreciate any help I can get.

[Fluff13]

How about

Please Login or Register  to view this content.

[jomili]

Much Better! However, the function only shows it's sorted if it's A-Z, Z-A results in Unsorted. is there a way to show either version as sorted?

[Fluff13]

How about

Please Login or Register  to view this content.

Used like IsRangeSorted(B2:B25,"Z")
for sorting Z to A

[jomili]

Hmmm. I hate having to decide between two good options. While I like the option of being able to choose what sort I want to check for, my immediate use for this is in another macro where I want to highlight rows containing duplicate values in alternating colors. Of course that kind of highlighting only makes sense if the data is sorted, so I need to check to ensure the data is sorted, but in this context it doesn't matter if it is ascending or descending.

I think you've given me enough to enable me to take it from here. Thank you SO MUCH for doing the hard work and pointing me in the right direction!

[jomili]

Fluff13,
I tried to Add Reputation, but it tells me I need to spread some around before I give to you again. Apparently you're working WAY too hard! Thanks.

[jomili]

Fluff13, it took me a little bit, but I think I've got it working to do either way. if the first condition results in UNSORTED, then we check the second. Feel free to suggest any improvements I could do to it, but so far this seems to be doing the trick. All your idea.

Please Login or Register  to view this content.

[Fluff13]

Glad you sorted it & thanks for the feedback