ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема с колонтитулами
14 сообщений из 14, страница 1 из 1
Проблема с колонтитулами
    #33612310
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
Подскажите, как прописать поле в колонтитулах с условием:
-Если кол-во страниц в документе больше 1, то отображается номер текущей страницы, если =1, то ничего

И второй вопрос:
-Если кол-во страниц в документе больше 1, то отображается значение поля, если =1, то ничего
...
Рейтинг: 0 / 0
20.03.2006, 15:48:19
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33613239
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
По первому вопросу все просто Вставка->Номера страниц... (см. рисунок).

Или программно.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
    Dim rng As Range
    Dim intPages As Integer
    
    Set rng = ActiveDocument.Content
    
    intPages = rng.Information(wdNumberOfPagesInDocument)
    
    If intPages >  1  Then
        With ActiveDocument.Sections( 1 )
            .Footers(wdHeaderFooterPrimary).PageNumbers.Add _
              PageNumberAlignment:=wdAlignPageNumberCenter, _
              FirstPage:=False
        End With
    End If
...
Рейтинг: 0 / 0
20.03.2006, 23:36:19
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33613626
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
Пользователь2По первому вопросу все просто Вставка->Номера страниц... (см. рисунок).

Или программно.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
    Dim rng As Range
    Dim intPages As Integer
    
    Set rng = ActiveDocument.Content
    
    intPages = rng.Information(wdNumberOfPagesInDocument)
    
    If intPages >  1  Then
        With ActiveDocument.Sections( 1 )
            .Footers(wdHeaderFooterPrimary).PageNumbers.Add _
              PageNumberAlignment:=wdAlignPageNumberCenter, _
              FirstPage:=False
        End With
    End If


По первому вопросу не так все просто. Этот пример на рисунке исключает отображение номера на первой странице.. Мне нужно, чтобы на первой странице отображалось количество страниц только тогда, когда ох общее количество >1..
...
Рейтинг: 0 / 0
21.03.2006, 10:28:29
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33617217
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
Abrakadabra Пользователь2По первому вопросу все просто Вставка->Номера страниц... (см. рисунок).

Или программно.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
    Dim rng As Range
    Dim intPages As Integer
    
    Set rng = ActiveDocument.Content
    
    intPages = rng.Information(wdNumberOfPagesInDocument)
    
    If intPages >  1  Then
        With ActiveDocument.Sections( 1 )
            .Footers(wdHeaderFooterPrimary).PageNumbers.Add _
              PageNumberAlignment:=wdAlignPageNumberCenter, _
              FirstPage:=False
        End With
    End If


По первому вопросу не так все просто. Этот пример на рисунке исключает отображение номера на первой странице.. Мне нужно, чтобы на первой странице отображалось количество страниц только тогда, когда ох общее количество >1..

Может еще у кого есть какие идеи?
...
Рейтинг: 0 / 0
22.03.2006, 13:45:11
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33618956
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
Abrakadabra Abrakadabra Пользователь2По первому вопросу все просто Вставка->Номера страниц... (см. рисунок).

Или программно.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
    Dim rng As Range
    Dim intPages As Integer
    
    Set rng = ActiveDocument.Content
    
    intPages = rng.Information(wdNumberOfPagesInDocument)
    
    If intPages >  1  Then
        With ActiveDocument.Sections( 1 )
            .Footers(wdHeaderFooterPrimary).PageNumbers.Add _
              PageNumberAlignment:=wdAlignPageNumberCenter, _
              FirstPage:=False
        End With
    End If


По первому вопросу не так все просто. Этот пример на рисунке исключает отображение номера на первой странице.. Мне нужно, чтобы на первой странице отображалось количество страниц только тогда, когда ох общее количество >1..

Может еще у кого есть какие идеи?


Ну пожалуйста!!!!!!!!!
...
Рейтинг: 0 / 0
23.03.2006, 08:29:41
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33618986
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Пиши колонтитулы на листе, мелким шрифтом, с любыми условиями, предварительно раздвинув нужные граници полей (вид / разметка страницы)
...
Рейтинг: 0 / 0
23.03.2006, 08:53:24
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33619127
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
talgatПиши колонтитулы на листе, мелким шрифтом, с любыми условиями, предварительно раздвинув нужные граници полей (вид / разметка страницы)

Пример с моими условиями можете привести?
...
Рейтинг: 0 / 0
23.03.2006, 10:01:47
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33619472
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Abrakadabra talgatПиши колонтитулы на листе, мелким шрифтом, с любыми условиями, предварительно раздвинув нужные граници полей (вид / разметка страницы)

Пример с моими условиями можете привести?
Программно считать кол-во заполненных строк. Переводить это в кол-во листов (в зависимости от Вашего типа принтера и установок)
...
Рейтинг: 0 / 0
23.03.2006, 11:19:51
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33619998
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
talgat Abrakadabra talgatПиши колонтитулы на листе, мелким шрифтом, с любыми условиями, предварительно раздвинув нужные граници полей (вид / разметка страницы)

Пример с моими условиями можете привести?
Программно считать кол-во заполненных строк. Переводить это в кол-во листов (в зависимости от Вашего типа принтера и установок)

Это наверное слишком сложно для меня..
...
Рейтинг: 0 / 0
23.03.2006, 13:01:27
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33620242
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Abrakadabra-Если кол-во страниц в документе больше 1, то отображается номер текущей страницы, если =1, то ничего
AbrakadabraМне нужно, чтобы на первой странице отображалось количество страниц только тогда, когда ох общее количество >1..
Так что же ты хочешь. Допустим в документе 1 страница, то на первой что? Если 10 страниц, то что на первой, второй и т.д.?
...
Рейтинг: 0 / 0
23.03.2006, 13:52:13
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33621723
Vola_33
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vola_33
Гость
Пользователь2 Abrakadabra-Если кол-во страниц в документе больше 1, то отображается номер текущей страницы, если =1, то ничего
AbrakadabraМне нужно, чтобы на первой странице отображалось количество страниц только тогда, когда ох общее количество >1..
Так что же ты хочешь. Допустим в документе 1 страница, то на первой что? Если 10 страниц, то что на первой, второй и т.д.?

Если страниц 1, то на первой ничего, если больше, то на 1 странице отображается содержимое поля слияния изAccess..
Это сложно? :)
...
Рейтинг: 0 / 0
23.03.2006, 20:02:54
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33626433
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Попробуй создать такое поле.

Код: plaintext
    { IF { NUMPAGES } >  1  { MERGEFIELD ТвоеПолеСлияния } "" }
...
Рейтинг: 0 / 0
27.03.2006, 10:23:52
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33630756
Abrakadabra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abrakadabra
Участник
Пользователь2Попробуй создать такое поле.

Код: plaintext
    { IF { NUMPAGES } >  1  { MERGEFIELD ТвоеПолеСлияния } "" }



Так уже делали.. Главное то, что они (колонтитулы) пропадают в момент слияния..
...
Рейтинг: 0 / 0
28.03.2006, 19:48:11
| Ответить | Цитировать | Написать  
Проблема с колонтитулами
    #33631519
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
Неправильно значит пишешь, у меня все ок.
...
Рейтинг: 0 / 0
29.03.2006, 10:40:38
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема с колонтитулами
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=33619472&tid=2185060]:
 0ms
get settings:
 6ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 49ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 264ms
total:  394ms
созд. / загр.: 394ms
x
x
Закрыть


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