Как разнести текст по буквам в ячейки таблицы Word?

[nerv]

Про Areas из Excel - это была первая мысль. И про Intersect( selection, ...)

1. Как оказалось у Selection есть метод InRange(), кот. проверяет... ну понятно. Только он нифига не работает с множественными выделениями

2. У объекта Cell есть свойство и метод Formula (и не только у него)

3. Можно сделать финт ушами:

Selection.Font.Bold = True ' установить уникальное форматирование

а за тем по этому форматированию найти множественное выделение (об этом говорил Скрипт)