|
|
|
|
|
OFF: Как в ворде написать сзади текста слово образец, да ещё и под углом? |
☑ |
|
0
А что такое 1С
09.08.05
✎
13:12
|
сабжЪ
|
|
|
1
Скользящий
09.08.05
✎
13:12
|
Рисунок вставь
|
|
|
2
France
09.08.05
✎
13:14
|
ключ - "Вставь"..
|
|
|
3
Grant
09.08.05
✎
13:14
|
WordArt
|
|
|
4
kolys_new
09.08.05
✎
13:14
|
(0) Объект wordArt. В свойствах Положение\за текстом, вращение 45
|
|
|
5
miki
09.08.05
✎
13:15
|
Варианты:
1. Объект WordArt
2. Объект "картинка" с прозрачным фоном.
3. Это умеет делать нормальный принтер сам.
|
|
|
6
Воинствующий кролик
09.08.05
✎
13:15
|
Это можно сделать при печати в свойствах принтера.
|
|
|
7
Скользящий
09.08.05
✎
13:21
|
(0) Еще вариант. Берешь ручку - пишешь образец, потом вставляешь в принтер.
|
|
|
8
А что такое 1С
09.08.05
✎
13:30
|
Пасиб, WordArt помог
|
|
|
9
smaharbA
09.08.05
✎
14:58
|
;))
Set obj = ActiveDocument.Shapes.AddTextEffect(msoTextEffect1, "Òåêñò ïîëóïðîçðà÷íûé," & vbCrLf & " íà çàäíåì ïëàíå...", "Arial Black", 36, msoTrue, msoFalse, 1, 1, ActiveDocument.Paragraphs(1).Range)
ActiveDocument.Shapes(1).Rotation = -45
ActiveDocument.Shapes(1).RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin
ActiveDocument.Shapes(1).RelativeVerticalPosition = wdRelativeVerticalPositionMargin
ActiveDocument.Shapes(1).Left = 0
ActiveDocument.Shapes(1).Top = ActiveDocument.Shapes(1).Width / 2 * Cos(45)
ActiveDocument.Shapes(1).Fill.ForeColor = &H9F9F9F
ActiveDocument.Shapes(1).Fill.Transparency = 0.8
ActiveDocument.Shapes(1).ZOrder (msoSendBehindText)
|
|
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн