Shorten a very long Formula

Hi All

I have this formula that works, but it's sooo looooong, there has to be a better way of doing it, can some-one with better knowledge shorten it. PFA. If a Macro is the better way to go then that will be fine.

Thanks in advance