powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Число страниц в Worde?
5 сообщений из 5, страница 1 из 1
Число страниц в Worde?
    #32674166
andreyR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Создаю из Visual FoxPro объект Word, в нём колонтитул, добавляю номер страницы

oWord.ActiveDocument.Sections(1).Footers(1).PageNumbers.Add

А какой метод добавляет общее число страниц? Никак не могу найти
...
Рейтинг: 0 / 0
Число страниц в Worde?
    #32674533
Фотография Stepler
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
andreyRСоздаю из Visual FoxPro объект Word, в нём колонтитул, добавляю номер страницы

oWord.ActiveDocument.Sections(1).Footers(1).PageNumbers.Add

А какой метод добавляет общее число страниц? Никак не могу найти
№ страницы - Type:=wdFieldPage, кол-во стр - Type:=wdFieldNumPages; аналогично у тебя...
...
Рейтинг: 0 / 0
Число страниц в Worde?
    #32674845
andreyR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Stepler andreyRСоздаю из Visual FoxPro объект Word, в нём колонтитул, добавляю номер страницы

oWord.ActiveDocument.Sections(1).Footers(1).PageNumbers.Add

А какой метод добавляет общее число страниц? Никак не могу найти
№ страницы - Type:=wdFieldPage, кол-во стр - Type:=wdFieldNumPages; аналогично у тебя...

Этот Type - свойство какого метода? Add? не получается. Если не сложно, набросайте код: в нижний колонтитул вставить
Page wdFieldPage of wdFieldNumPage
на Visual Basice.
Спасибо.
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Число страниц в Worde?
    #36996380
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
andreyR,

Код: plaintext
appWord.NormalTemplate.AutoTextEntries("Стр. <№> из <всего>").Insert Where:=.Footers(wdHeaderFooterPrimary).Range, RichText:=True
...
Рейтинг: 0 / 0
Число страниц в Worde?
    #36996388
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Более полно:


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
        With docWord.Sections( 1 )
        ' нижний колонтитул
            
            appWord.NormalTemplate.AutoTextEntries("Стр. <№> из <всего>").Insert Where:=.Footers(wdHeaderFooterPrimary).Range, RichText:=True

            .Footers(wdHeaderFooterPrimary).Range.Select
            appWord.Selection.ParagraphFormat.Alignment = wdAlignParagraphRight

        End With
    
        'Так закрываем окно редактирования колонтитула
        With docWord.ActiveWindow
            .ActivePane.Close
            .View = wdPrintView
        End With

...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Число страниц в Worde?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]