Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Word. Как заменить символ


Автор: Гость_suvor 5.11.2005, 20:08
Вот открыл я Word документ. Как мне заменить символ (с известным номером) на другой или скажем изменить его цвет не разрушая всей разметки ? Если написать например

txt=Word.Content.text
mid(txt,n,1)="a"
Word.content.text=txt

то символ конечно заменяется но вся разметка летит к черту. Спасибо. Сувор

Автор: likhobory 7.11.2005, 16:40
Код

'работаем со 2 символом
With Word.ActiveDocument.Range(1, 2)
  .Text = "MyText"
  .Font.Color = 255
End With

Автор: Гость_Suvor 8.11.2005, 10:48
Спасибо likhobory!

Автор: Guest 17.11.2005, 12:30
Hi Likhobory and everybody! Решил новый топик не создавать потому как вопрос туда же.
Как считать позицию курсора в открытом Word документе? То есть аналог для Text1.Sellstart ?
И как вывести в окно только часть документа, но с сохранением разметки?
И, если не секрет, где вообще про этот Word можно почитать? В MSDN ничего толкового не нашел и в сети тоже. Спасибо. Сувор

Автор: likhobory 18.11.2005, 17:59
Цитата(Guest @ 17.11.2005, 12:30)
Как считать позицию курсора в открытом Word документе?

selection.range.start
неплохой ресурс: http://word.mvps.org/FAQs/MacrosVBA/

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)