Как вставить текст в позицию курсора в текстовой области формы поля.

У меня есть текстовое поле с силовой точкой и некоторый текст в нем. Когда пользователь выбирает текст для редактирования, мне нужно добавить текст в точку курсора.Как вставить текст в позицию курсора в текстовой области формы поля.

В качестве примера:
Если текущий текст «ABCEFG» и пользователь ставит точку курсора, как «ABC | EFG» Мне нужно изменить текст, как «ABCDEFG».

Любые идеи? Заранее спасибо.

источник

2015-01-06 pRimE

With ActiveWindow.Selection.TextRange 
    .InsertAfter ("D") 
End With

источник

2015-01-06 21:02:00

могли бы вы объяснить, почему это работает – MZaragoza

ActiveWindow.Selection.TextRange возвращает выбранный диапазон текста (который не может включать в себя не текст, если вы только что нажали в текстовое поле). .InsertAfter вставляет указанные символы (символы) после текущего текстового диапазона. –

Большое спасибо. Это действительно сработало. – pRimE

Пожалуйста, обратитесь к следующей ссылке. Думайте, что это будет полезно для вашего дела.

http://www.vbaexpress.com/forum/showthread.php?32289-Alternative-way-to-determine-current-cursor-position-in-text-box

Спасибо,

источник

2015-01-06 09:09:04 Yasindu

Как вставить текст в позицию курсора в текстовой области формы поля.

ответ

Смежные вопросы