|
выделение текста в ворд
| ☑ |
0
Domanoff26
01.11.13
✎
17:03
|
раньше выделял только ячейки в таблице, и присваивал им шрифт(Табл.Сell(1,1).range().text = ...), но теперь нужно конкретный текст в этой ячейке выделить и назначитьт ему шрифт например, как это делается подскажите плиз
|
|
1
Domanoff26
01.11.13
✎
17:16
|
неужели никто не форматировал тексты в ворде
|
|
2
Domanoff26
05.11.13
✎
10:13
|
вверх
|
|
3
1dvd
05.11.13
✎
10:14
|
воспользуйся записью макрОсов в вёрде
|
|
4
Михаил 1С
05.11.13
✎
10:20
|
Не, ну ты дальше воспользуйся поиском по тексту ячейки.
|
|
5
Михаил 1С
05.11.13
✎
10:20
|
Мануал тебе - msdn от фирмы МелкоСофт.
|
|
6
Domanoff26
05.11.13
✎
10:40
|
(3) не понятно как писать такой макрос
|
|
7
vicof
05.11.13
✎
10:51
|
(6)
|
|
8
Domanoff26
05.11.13
✎
12:17
|
(7) вот как это перевести в бейсик 1са
Selection.MoveLeft Unit:=wdCharacter, Count:=6, Extend:=wdExtend
|
|
9
Domanoff26
12.11.13
✎
10:39
|
кароч не понятно ка как макросу это написать
|
|
10
mikecool
12.11.13
✎
10:42
|
(8) читай, как описаны параметры метода MoveLeft
а всякие wdCharacter - это числовые константы, значения можно посмотреть в отладке любого макроса
|
|
11
Nina2005
12.11.13
✎
11:30
|
я так делаю
Word = Новый COMОбъект("Word.Application");
Word.Documents.Add(ИмяФайлаВорд);
Документ=Word.ActiveDocument;
MyRange=Документ.Bookmarks(НазваниеЗакладкиВВорде).Range();
MyRange.Text = Значение;
MyRange.Font.Shading.BackgroundPatternColor = 4390143;
|
|
12
Nina2005
12.11.13
✎
11:31
|
MyRange.Font.Shading.BackgroundPatternColor = 4390143 - это жёлтенький)))
|
|