Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.04.2009, 15:55   #1
Mack Sim
Новичок
Джуниор
 
Регистрация: 22.04.2009
Сообщений: 2
По умолчанию Как определить “Index” для коллекции “Words”?

Здравствуйте.

Такой вопрос: Как узнать “Index” для коллекции “Words” выделенного в документе слова?
Например, я могу выделить слово следующим образом:

Код:
Application.ActiveDocument.Words(Index).Select
А как можно узнать это индекс через объект Selection если, например, пользователь выделил слово вручную?

З.Ы.: Если вопрос поднимался, сорри, не нашел.
Mack Sim вне форума Ответить с цитированием
Старый 22.04.2009, 16:37   #2
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Т.е. тебе нужен номер этого слова в документе? Тогда выдели слово и набери в окне Immediate
Код:
?ActiveDocument.Range(ActiveDocument.Range.Start, Selection.Range.End).Words.Count
Т.е. мы берем диапазон от начала документа до конца выделенного слова и считаем количество слов в нем.
Лучше день потерять — потом за пять минут долететь!©

Последний раз редактировалось viter.alex; 22.04.2009 в 16:40.
viter.alex вне форума Ответить с цитированием
Старый 22.04.2009, 18:10   #3
Mack Sim
Новичок
Джуниор
 
Регистрация: 22.04.2009
Сообщений: 2
По умолчанию

Да! Спасибо, это то что нужно!
Mack Sim вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Index List ofbounds (16) Johnson Общие вопросы Delphi 4 17.07.2008 19:54
При запуске ComboBoxEx пишет List index out of bounds -1. dx+ Общие вопросы Delphi 6 12.06.2008 22:32
Index и Match в Excel. sokpet Помощь студентам 1 14.01.2008 13:46
Коллекции Mike777 Общие вопросы Delphi 0 19.02.2007 11:38