If specific value is found swap the value of two cells

[djfscouse]

Hi,

This is what I need, I have attached a excel 2003 file named test.xls that if the VBA finds the value 121 in the SHIP_TO_CODE column then for that row I want to swap the values in REFORDERNO and PRODUCTID.
An example of the expected file after running the VBA is also attached and I have highlighted the changes in that file.

Thanks for any help,

David

[AB33]

Wrong code

[djfscouse]

Wrong code?

[AB33]

After I posted the code, I realised it does not give you the correct result.
Sorry!

[AB33]

This time, I have got it.

Please Login or Register  to view this content.

[djfscouse]

Thanks AB33 it worked great!