Excel Vba Convert Hex String To Integer