| Вопрос: Нумерованный список в Word из VB 6 | Добавлено: 16.12.09 13:06 |
Автор вопроса:  Alex | Web-сайт: metalosplav.ru
|
|
Есть метка %pokupki% в документе Word необходимо ее заменить на нумерованный список средствами VB6
1. Куртка 2. Шапка 3. Ботинки ..... N. Наименование_товара Dim WordApp As Word.Application Dim DocWord As Word.Document Set WordApp = New Word.Application Set DocWord = WordApp.Documents.Add("list.doc") DocWord.ActiveWindow.Selection.Find.Text = "%pokupki%" DocWord.ActiveWindow.Selection.Find.Replacement.Text = pokupki DocWord.ActiveWindow.Selection.Find.Execute Replace:=wdReplaceOne В этом случае работает только замена метки на строку. А как сделать чтобы была замена на список? |
| Ответы | Всего ответов: 0 |
Страница: