Вниз
Скачать: CL | DM;

Word Отступ слева   Найти похожие ветки 

← →
Andrewtitoff ©   (2009-02-16 11:34) [0]

Здравствуйте!, подскажите пожалуйста как в word-е задать отступ слева для отдельного участка текста?


← →
Andrewtitoff ©   (2009-02-16 11:57) [1]

Пробовал так:

s:="некоторый текст"+#13#10;
b:=length(s)-и;
e:=1;

WordDocument1.Range(e,b).Select;
WordDocument1.Sections.PageSetup.LeftMargin:=20;

Задает отступ для всего документа точно так же как и

WordDocument1.PageSetup.LeftMargin:=20;


← →
Andrewtitoff ©   (2009-02-16 11:58) [2]

b:=length(s)-и; - просто очепятался там: b:=length(s)-1;


← →
KilkennyCat ©   (2009-02-16 12:10) [3]

Включите запись макроса. Задайте отступ. Посмотрите код получившегося макроса.
Это не всегда, но довольно-таки часто помогает.


← →
Andrewtitoff ©   (2009-02-16 13:19) [4]

Спасибо!
Макрос выглядит так:

Sub Макрос3()
"
" Макрос3 Макрос
" Макрос записан 16.02.2009 Felix
"
   Selection.TypeText Text:="Строка1"
   Selection.TypeParagraph
   Selection.TypeText Text:="Строка2"
   Selection.TypeParagraph
   Selection.TypeText Text:="Строка3"
   Selection.TypeParagraph
   Selection.TypeText Text:="Строка4"
   Selection.TypeParagraph
   Selection.MoveUp Unit:=wdLine, Count:=1
   Selection.MoveUp Unit:=wdLine, Count:=3, Extend:=wdExtend
   With Selection.ParagraphFormat
       .LeftIndent = CentimetersToPoints(10.16)
       .SpaceBeforeAuto = False
       .SpaceAfterAuto = False
   End With
   Selection.MoveDown Unit:=wdLine, Count:=3
End Sub

Аделать оказалось можно так:

WordDocument1.Range(e,b).Select;
WordParagraphFormat1.ConnectTo(WordApplication1.Selection.
 ParagraphFormat);
  WordParagraphFormat1.LeftIndent := 500;


← →
Anatoly Podgoretsky ©   (2009-02-16 13:25) [5]

> KilkennyCat  (16.02.2009 12:10:03)  [3]

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


← →
Anatoly Podgoretsky ©   (2009-02-16 13:27) [6]

> Andrewtitoff  (16.02.2009 13:19:04)  [4]

Приведеное решение никак не связано с вопросом и с его расшифровкой.
Это совсем другой вопрос.


← →
Andrewtitoff ©   (2009-02-16 16:21) [7]

2 Anatoly Podgoretsky
Как это не задается?, Вы что конгда в ворде нечатаете - не можете у разных участков текста задавать разные отступы?..., ну а то что внутри строки - конечно может но это просто нужно учитывать в программе...
Как это не связанно?, это как раз и есть прямое решение ну или если точнеее один из вариантов решения...


← →
Anatoly Podgoretsky ©   (2009-02-16 23:12) [8]

Нельзя для отдельных участков текста, это параметр параграфа.


← →
AndreyV ©   (2009-02-17 00:16) [9]

> [8] Anatoly Podgoretsky ©   (16.02.09 23:12)
> Нельзя для отдельных участков текста, это параметр параграфа.

Разве не абзаца?


← →
Германн ©   (2009-02-17 00:24) [10]


> Разве не абзаца?

Хм. А что "абзац" в переводе МС отличается от "параграфа"?
В русской традиции применения этих терминов между ними есть очень большая разница. А вот в переводах часто вместо первого используется второе.


← →
Anatoly Podgoretsky ©   (2009-02-17 07:21) [11]

> AndreyV  (17.02.2009 0:16:09)  [9]

Абзац это синоним параграфа.


← →
Дуб ©   (2009-02-17 08:36) [12]


> Anatoly Podgoretsky ©   (17.02.09 07:21) [11]

Абзац синоним привета.

"Полный параграф" - не звучит. Значит не синонимы. :)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.008 c
2-1234773241
Andrewtitoff
2009-02-16 11:34
2009.04.05
Word Отступ слева


4-1207513836
Alex
2008-04-07 00:30
2009.04.05
Расстояние между иконками в Virtual ListView.


2-1234454001
SultanOFF
2009-02-12 18:53
2009.04.05
Считывание с реестра акробатически избегая ошибки возможно???


15-1233818205
Slider007
2009-02-05 10:16
2009.04.05
С днем рождения ! 1 февраля 2009 воскресенье


1-1209401121
KiLLiR
2008-04-28 20:45
2009.04.05
Свойство MaxDate DateTimePicker а д.б. сегодняшним




   Наверх