Filtering rates from rows

[Drewgarry007]

Hi there,
I have a list of exchange rates in column D in sheet1 and have a second list of exchange rates in column Q in sheet2 in the same workbook.

I need a vba code that will allow me to compare the two lists of rates and if there is a rate in column D sheet1 that does not exist in column Q sheet2 then I want to delete that entire row in sheet1.

Can you pls help? Is there some sort of loop or vlookup I can use?

Many thanks!

 

[Drewgarry007]

hey Peter,

It seems that when I copied the data into sheet2 using text import wizard and selecting Delimiters/Semicolon the data goes into the sheet with some spaces either side of some of the text in the colums!! I used the below code to take these spaces out and now your formula works fine

Sheets("sheet2").Select
With ActiveSheet.UsedRange
.Value = Evaluate("if(row(" & .Address & "), trim(" & .Address & "))")
End With

Thanks for all your help again peter!!

 

[Peter_SSs]

When you do the Text to Columns, try selecting both Semicolon and Space as delimiters and also select 'Treat consecutive delimiters as one'. Then you may not need to use this last code.