Function WorklistCount()
WorklistCount = Application.ActiveSheet.PageSetup.Pages.Count
End Function
Здравствуйте, есть такая функция, она считает количество страниц на отдельном листе книги но при добавлении новой записи на том же листе переходя по странице вправо или вниз подсчет не производится, т. е. не обновляется, как это сделать
vikttur, а в первом зачем, для каждого листа нужно отдельный подсчет, я видимо в коде намудрил где то то есть пишем что нибудь на новой странице, а он считать должен именно на том листе эти страницы
Код
Function WorklistCount()
WorklistCount = Application.ActiveSheet.PageSetup.Pages.Count
Application.Volatile True
End Function