Delete NOT filtered Rows having non specific dates from a Column Cells

File format - Excel 97-2003 (version)

Rows in Column C, have dates in dd-mmm-yy format.



Seek a macro that will
1) check date in Cell C2, C3, C4 which would always have unique dates. (three different dates), and check these three dates in each row in Column C (apply filter ?)
2) keep only those rows where Dates are matches with either of dates given in Cell C2, or C3, or C4, (pass on date value to some variable, and then compare?)
3) Delete all rows where Cell in Column C has date other than what is given (passed on to some variable in 1 above !) in C2,C3,C4.

How macro should be written to filter and do the job and again unfilter it to show all resultant data having only rows where dates are repetative of what is given in Cell C2,C3,C4.

Sample file attached.
Current value in
Cell C2 has 30-Aug-2014 (displayed as dd-mmm-yy)
Cell C3 has 27-Sep-2014 (displayed as dd-mmm-yy)
Cell C4 has 25-Oct-2014 (displayed as dd-mmm-yy)

Only rows having these dates should be retained, and rest entire rows be deleted. (Finally, unfilter it to show all resultant data)

Thanks

Try this.

Please Login or Register  to view this content.

You need to put the dates in C2,C3,C4, you don't have any dates in those ranges in the sample you provided.

Ignore this please-----------------------------

Originally Posted by davesexcel

Try this.

Please Login or Register  to view this content.

This code does not delete entire ROW, as required to be done, it simply lifts up those cells.

It only deletes those cells where those three dates are not matching, and moves it up, causing disturbance in data arrangement, since corresponding data in adjacent columns are retained (not deleting rows)

Originally Posted by analystbank

File format - Excel 97-2003 (version)

Rows in Column C, have dates in dd-mmm-yy format.

.
.
.

Only rows having these dates should be retained, and rest entire rows be deleted. (Finally, unfilter it to show all resultant data)

Thanks

How 'UnionRng' be modified suitably to select entire row and delete it.

Your workbook sample should match the question.

Please Login or Register  to view this content.

Originally Posted by davesexcel

Your workbook sample should match the question.


[/CODE]

Noted, thank you, Sir. This thread is solved, now.