VBA for sorting columns and rows

Update:

I have finally worked out a way to sort columns but is a bit slow. The file is attached here as a zip file and dated 2014-10-31.

If anyone can help me with sorting out the rows under each of the sorted columns which maybe one or 20, 30, 40 plus. I want to keep the rows which have numbers in the sorted columns and hide the rest of the rows.

Regards








I have attached a zip file with my spreadsheet. This spreadsheet is used to have a list of projects in columns and items of work in rows for each project I have spent a great deal of time over the past few weeks to try and code this spreadsheet to do what is need but have failed to get this done.

So I am seeking help for VBA code to accomplish two things.

One to sort the projects (columns) by the criteria selected in one or all of the dropboxs in columns D. I can do this with selecting one criteria but two or more is something I have not been able to code correctly. I would like the columns to sort out and stay visible and those projects (columns) which do not meet the sort criteria and empty columns are hidden from view.

Two to sort the rows after the projects (columns) have been sorted. I would like the rows which has cells with data in them in the column for each project to be seen and all of the rest of the rows to be hidden. I have the same problem here, I can sort out the rows on one project but if there are two or more projects which have data in different row cells I have not been able to code to keep these rows visible.

I have stripped my macros and buttons out of the attached spreadsheet, basically because the code work I have done is not really doing what I need and it was not very good code.

If anyone can help me out here, I would be very grateful.