Excel Vba How To Separate Two Names From String To Timestamp