Нумерация листов

[Kefirrr]

Добрый день!
Подскажите, есть ли возможность (не программно, программно вроде разобралась) проставлять нумерацию листов в определенные ячейки?(что-нить вроде "=страница()"
у меня документ, предположим на 2 листа. я сделала шапку (печать заголовка) на каждом листе, в эту шапку входит нумерация (в файле выделено желтым). Но, т.к. это шапка,а не колонтитулы она полностью повторяет оригинальное значение, а хотелось бы, чтобы нумерация автоматом менялась.
Заранее спасибо

[IgorGO]

получить имя листа формулой - задача стара, как Ексель, которому на днях было 30 лет!!!

=ПРАВСИМВ(ЯЧЕЙКА("имяфайла"); ДЛСТР(ЯЧЕЙКА("имяфайла"))-ПОИСК( "]";ЯЧЕЙКА("имяфайла")))

[27102014]

Игорь, доброго вечера!
Здесь речь о нумерации
Не знаю стандартного способа нумерации, есть пользовательская функция

Function PageNumber(cel As Range) As Long
    Dim ws As Worksheet, rgBreaks As Range, hBreak As HPageBreak
    Dim vBreak As VPageBreak, i As Long, j As Long, k As Long, n As Long
    Set ws = cel.Parent
    For Each hBreak In ws.HPageBreaks
        If hBreak.Location.Row > cel.Row Then Exit For
        i = i + 1
    Next
    For Each vBreak In ws.VPageBreaks
        If vBreak.Location.Column > cel.Column Then Exit For
        j = j + 1
    Next
    PageNumber = j * ws.VPageBreaks.Count + i + 1 
End Function

[IgorGO]

а чтобы это было возле номера страницы пихаем эту формулу в колонтитул и готово!

[Kefirrr]

Всем спасибо. Думала есть встроенная функция.