Vba Remove Carriage Return From String To Int