Deleting Duplicate Ranges

Hi,

See the example, but basically this is what I'm looking to do: delete sets of columns that repeat themselves so there is only one of the duplicate sets left. Each set contains two columns, so set 1 occupies columns A and B, set 2 occupies C and D, etc. If set 3 is equal to set 1 (as in the example) I would like to delete it. All columns are filled with strings (contrary to the example, realized this after, sorry!)

I tried writing something myself in module 1, but basically the main issue is the line
Range1.Value=Range2.Value
I'm guessing you can't use the value property like this but I can't figure out how to write an alternative.

Thanks for your help in advance!