VBA to 2-step sort multiple columns

[jebersohl]

Link to cross-post:
http://chandoo.org/forum/threads/vba...7/#post-203641
https://www.mrexcel.com/forum/excel-...ml#post4814278

I have an Excel spreadsheet that I need to sort 3 columns and varying rows (see below). What I would like is VBA code to sort all columns and rows through item 'P' by Quantity (largest to smallest). Then I need to sort all 3 columns a second time by Sort Order (smallest to largest) neglecting the items with zero quantities. The number of items will always be the same so the first sort range will always be the same.

Here is a link to a spreadsheet similar to the one I will be using: https://app.box.com/s/zxvg9acycxrqv067vfc8kct4rroww6qp

I tried to record a macro for this but it only works for this specific example (Items may not always have quantities and/or the quantities will change value so the second sort range (rows) will change). Here is what the macro recorded:

Please Login or Register  to view this content.

Can someone provide help? Thanks!

[Marc L]

Your post does not comply with Rule 8 of our Forum RULES. Do not crosspost your question on multiple forums without including links here to the other threads on other forums.

Cross-posting is when you post the same question in other forums on the web. The last thing you want to do is waste people's time working on an issue you have already resolved elsewhere. We prefer that you not cross-post at all, but if you do (and it's unlikely to go unnoticed), you MUST provide a link (copy the url from the address bar in your browser) to the cross-post.

Expect cross-posted questions without a link to be closed and a message will be posted by the moderator explaining why. We are here to help so help us to help you!

Read this to understand why we ask you to do this, and then please edit your first post to include links to any and all cross-posts in any other forums (not just this site).

[jebersohl]

Marc - cross-post noted. thanks

[jindon]

Try

Please Login or Register  to view this content.

[jebersohl]

Jindon, I apologize for not responding. I overlooked the notification of your response in my email. I did try your code but for some reason it hung up here: "M = ary(Int((LB + UB) / 2), ref)"

Please see this link for a (close) solution to my request. I do not need further assistance: http://chandoo.org/forum/threads/vba...7/#post-203740

In the end, I used the code provided in the link and manipulated it for my use.

Thank you for your time and effort.

[jindon]

So you are doing completely wrong.