Нумерация страниц в Excel

Тема в разделе "Delphi - СОМ", создана пользователем alexey, 6 дек 2005.

Наш партнер Genesis Hackspace
Статус темы:
Закрыта.
  1. alexey

    alexey Гость

    Замучился уже :)
    В общем макрос работает следующим образом

    With ActiveSheet.PageSetup
    .RightFooter = "&P"
    End With

    Я его ковертирую в следующее (только нужное) через OLE
    var
    WorkSheet:OleVariant;
    ...
    WorkSheet.PageSetup.RightFooter := '&P';

    В общем этот вариант вообще не работает по страницам, НО если туда вписать следующее
    WorkSheet.PageSetup.RightFooter := '&[Страница]';
    Т.е. тоже что он пишет и в самом диалоговом окне - то тогда получается интереснее - сначала он это печатает просто как текст, но стоит лишь войти в св-ва страницы и войти-выйти в нужный колонтитул ничего не меняя, но все сохраняя -то Excel моментально начинает печать номера страницы как ни в чем не бывало.
    А самое интересное - если смотреть через макрос то там так и стоит эта же строчка
    .RightFooter = "&P"
     
Загрузка...
Похожие Темы - Нумерация страниц Excel
  1. Zhuk
    Ответов:
    18
    Просмотров:
    2.056
  2. Xalet
    Ответов:
    5
    Просмотров:
    4.251
  3. makaset
    Ответов:
    40
    Просмотров:
    13.705
  4. MaxP
    Ответов:
    13
    Просмотров:
    210
  5. Bafomet
    Ответов:
    0
    Просмотров:
    49
Статус темы:
Закрыта.

Поделиться этой страницей