Macros and advanced filter

Here is my solution. I included an additional worksheet that includes all copied data from "Raw Data" and a button with an additional macro which allows you to dump all the copied data from "Raw Data" back into "Raw Data" in order to debug or prove to yourself that it works. The additional macro saves you from having to copy-and-paste raw data again and again if you want to run the macro multiple times with different scenarios.

Please Login or Register  to view this content.

A small improvement may be made to the attached compared to the above code. I forgot to include the following "if" statement in the first two macros but it's in the third. It does display a message saying data is not found, though (MsgBox ("Error: " & DatToFind & " is not found"))... it just looks funny when the cell is empty.

Please Login or Register  to view this content.

As of 1:15 PM EST I fixed another small bug in the above code but not the attached document that only applies to a case where data isn't found. I extended the If-Else statement from right before where the data is written to the end of the sub (else you get an error) for the first subroutine. The other two were already taken care of.

Forgive the indenting; the correction was done on my phone (so let me know if there are any issues). I'm sure you can easily make the two modifications I described above.