Does anyone has any ideas how to speed this macro up?

Thanks
HTML Code: