Если вы уверены, что города разделены одним и только одним пробелом, вы можете использовать функцию разделения, которая возвращает массив элементов (каждый элемент города). Я не знаю источника данных, но в названии есть города с пробелами, с. е. "Сан Пауло". Аппроксимация разбиения по пространству не всегда верна.
Для генерации выходной таблицы вы можете использовать следующий алгоритм (не проверенный):
nameAttr = rs!name_attr
do while nameAttr = rs!name_attr
cities = split(rs!visted_places_attr, " ")
for each city in cities
rsTarget.AddNew
rsTarget!name_attr = nameAttr
rsTarget!visited_place_attr = city
rsTarget.Update
next
rs.MoveNext
if rs.eof then exit do
loop