Разбивка ФИО (access)

SELECT
UserInfo.Имя AS ФИО,
Left(UserInfo.Имя,InStr(1, UserInfo.Имя," ") - 1) AS [Фамилия],
Mid(UserInfo.Имя,InStr(1, UserInfo.Имя," ") + 1, InStr(InStr(1, UserInfo.Имя," ") + 1, UserInfo.Имя," ") - InStr(1, UserInfo.Имя," ") - 1) AS [Имя],
Mid(UserInfo.Имя,InStr(InStr(1, UserInfo.Имя," ") + 1, UserInfo.Имя," ")+1) AS [Отчество]
FROM
UserInfo