|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
03.10.2011, 17:50 | #1 |
Пользователь
Регистрация: 24.09.2011
Сообщений: 36
|
Как поставить точки до конца строки?
Добрый день подскажите пожалуйста, как сделать так, чтоб от конца текста до конца строки проставлялись точки, как например в содержании книги?
|
03.10.2011, 18:04 | #2 |
Форумчанин
Регистрация: 17.11.2010
Сообщений: 222
|
В настройках Абзаца выбрать Табуляцию, в настройках Табуляции установить по правому краю, длину табуляции установить равной правому краю документа, выбрать разделитель ".". В конце каждого абзаца ставить табуляцию
|
04.10.2011, 09:54 | #3 |
Пользователь
Регистрация: 24.09.2011
Сообщений: 36
|
Большое спасибо!
Подскажите пожалуйста, почему цикл не переходит на следущую строку в таблице: Код:
Последний раз редактировалось Molotoklk; 04.10.2011 в 15:12. |
04.10.2011, 16:05 | #4 |
Форумчанин
Регистрация: 17.11.2010
Сообщений: 222
|
Потому, что в цикле нет команды перехода на другую строку.
Dim rw as Row For each rw in ActiveDocument.Tables(1).Columns(1) .Rows rw.Select Selection.ParagraphFormat.TabStops. Add Position:=CentimetersToPoints(16.75 _ ), Alignment:=wdAlignTabRight, Leader:=wdTabLeaderDots Selection.TypeText Text:=vbTab Next rw |
04.10.2011, 16:07 | #5 |
Форумчанин
Регистрация: 17.11.2010
Сообщений: 222
|
Цикл For each in Next переберает все строки в столбце 1
|
04.10.2011, 16:10 | #6 |
Форумчанин
Регистрация: 17.11.2010
Сообщений: 222
|
Здесь еще лучше ActiveDocument заменить на Selection, тогда ссылка будет на выделенную таблицу а не на Таблицу 1 документа........
|
04.10.2011, 17:08 | #7 |
Пользователь
Регистрация: 24.09.2011
Сообщений: 36
|
Сам же отвечаю на свой вопрос
Работает, если перед ActiveDocument.Tables(1).Columns(1) .Select вставить if i=1 Then Большое спасибо)) |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Не воспринимаются символы конца строки | Sam Gold | C++ Builder | 1 | 18.05.2010 16:15 |
ввод до конца строки. | ssi | Помощь студентам | 0 | 27.01.2010 09:47 |
Имеются координаты точки. Как проверить какого цвета соседние точки на форме? | Rin | Мультимедиа в Delphi | 2 | 10.11.2009 22:47 |
Количество пробелов до конца строки | Qv_1 | Microsoft Office Word | 8 | 01.06.2009 19:58 |
Потоки и символ конца строки | Deatz | Общие вопросы C/C++ | 3 | 07.05.2008 20:02 |