ActiveDocument.Words(1).Characters( 3)

[chugo]

Привет всем!

Я решаю задачу но остановился на не приятном месте и не как не решить надеюсь на вашу помощь

Хочу виделить 3-й символ первого слова

Пример пример
ActiveDocument.Words(1).Characters( 3).select

Выделяется правильно НО если в слове находится знак переноса "¬" то после него выводится ошибка про то что не правильное обращение к коллекции.

Можно ли обойти эту ошибку?

[viter.alex]

Можно, проверяя код символа. У мягкого переноса он равен 31

If AscW(ActiveDocument.Words(1).Characters(3).Text) <> 31 Then
  ActiveDocument.Words(1).Characters(3).Select
End If

А зачем выделять-то?

[chugo]

viter.alex Спасибо!


-----------------------------------

i = 3
If AscW(ActiveDocument.Words(1).Characters(i).Text) <> 31 Then
  i = i + 1
  ActiveDocument.Words(1).Characters(i).Select
End If

т.е. в этом коде уже хочу обратится к "и"

Пр¬имер пример

Опять такая же ошибка Как видно после символа мягкого перенося тупит.




===================
Отвечаю сам:
Такая ошибка на Русских и Английских языках не наблюдается.

Ошибку выдает на Грузинских кодировках, почему не понятно... (если разберусь напишу)

Грузинские символы на UTF8 начинаются с-ChrW(4304) до ChrW(4336)

Может какая нибудь идея есть?