Macro to delete cells, copy value down list

[Hedge redarT]

Hi everyone.

I have 2 columns of data, from HV4:HV133 and HW4:HW133. In cells HV2 I have =INDIRECT("HV4") and in HW2 =INDIRECT("HW4")

There is a formula in HY1 with the answer corresponding to the text in cells HV2 and HW2.

The macro I am in need of is to
- delete HV4 & HW4 to shift up through the list / columns
- copy HY1 answer seperate column
repeat down columns ( HV4:HV133, HW4:HW133 ) until list is completed.

Hopefully I have explained it well enough.

Thanks in advance!!

 

[Hedge redarT]

bump