WithName(
thisRow.[Original Text].Split(''),
CharacterList,
WithName(
CharacterList.Find(CharacterList.Filter(CurrentValue!=' ').First()),
FirstNonSpaceIndx,
WithName(
CharacterList.Find(CharacterList.Filter(CurrentValue!=' ').Last()),
LastNonSpaceIndx,
thisRow.[Original Text].Middle(FirstNonSpaceIndx, LastNonSpaceIndx-FirstNonSpaceIndx + 1)
)))