Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: alecks_lp
With objSel '--------вставка скопированной таблицы .PasteAndFormat Type:=wdPasteDefault '--------войти в таблицу .MoveUp unit:=wdLine, Extend:=wdMove '------------работа со списком End With Set objTab = objSel.Tables(1) - определить таблицу objTab.Cell(3, 1).Select - определить ячейку для нумерации With objWord.ListGalleries(wdNumberGallery).ListTemplates(1).ListLevels(1) -------- .StartAt = 1 End With
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.