Как найти последний символ в строке в Word? - VB
Формулировка задачи:
Как найти последний символ в абзаце в Word?
и еще
как нати количесвто строк в документе Word нужно в конце каждого абзаца поставить
ну и в начале
и еще
как нати количесвто строк в документе Word нужно в конце каждого абзаца поставить
ну и в начале
заранее спасибо если скажите, подскажите код в VBA.
За ссылку на подобные проги тоже спасибо!
Решение задачи: «Как найти последний символ в строке в Word?»
textual
Листинг программы
<font color="blue">Dim</font> p <font color="blue">As</font> Paragraph
<font color="blue">Dim</font> r <font color="blue">As</font> Range
<font color="blue">Dim</font> pos <font color="blue">As</font> <font color="blue">Long</font>
<font color="blue">For</font> <font color="blue">Each</font> p <font color="blue">In</font> ActiveDocument.Paragraphs
<font color="blue">Set</font> r = p.Range
r.InsertBefore <font color="teal">"</font><p><font color="teal">"</font>
pos = r.<font color="blue">End</font>
ActiveDocument.Range(pos - <font color="darkblue"><b>2</b></font>, pos - <font color="darkblue"><b>1</b></font>).InsertAfter <font color="teal">"</font></p><font color="teal">"</font>
<font color="blue">Next</font>