Need help writing the attached Excel VBA Macro.

Can someone assist?

Thanks