Macro to select all, delete all, paste, insert formula and drag it down

[ricdamiani]

Hi All,

Can someone please help me on writing the macro below? Steps are:
1) Select all
2) Delete
3) Paste
4) Insert in E2 formula =CONCATENATE(YEAR(D2),"/",CHOOSE(MONTH(D2),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"))
5) Drag it down

Thanks,

Rick