Hi Bigme,
My previous modified code has a limitation. To be more specific, there is no column header in ListBox. To get the output you have shown, I have implemented three sub-procedures named ShowList, FilterAndCopyData and DeleteSheetTemp. All you need is to paste these in module1. Later...