Excel Macros code correction

I have a macro which isn't working like expected, need someone to resolve it. Will help with more details on chat.