How to copy specific rows of filtered data using VB

Hi,

I filtered a column using specific criteria, I dont want to copy the whole filtered data, but I want to copy only 2nd and 3rd row of the filtered data to another workbook. Can you please help on that?

I have attached my worksheet with VB code. I filtered column 4 with FilteredBucket1 data, I want to copy column 2 and 3 to anithere work book.




Thanks in Advance,
Menaka B