Доброго времени суток, уважаемые коллеги, перечитал форумы, почитал литературу, не нашел ответа возможно ли присвоить значение из ячейки конкретной странице на активном листе?
Этот код присваивает колонтитулу активного листа значение из ячейки А1:
Помогите, пожалуйста, на примере задать код таким образом, чтобы в колонтитул страницы №2 попадало значение из ячейки А1 при сохранении/печати или изменении значений на активном листе.
Этот код присваивает колонтитулу активного листа значение из ячейки А1:
| Код |
|---|
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftFooter = ActiveSheet.Range("A1").Text
End With
End Sub
|
Пытался по манипулировать стандартными средствами Excel в части исключения колонтитула с первой страницы и разными колонтитулами на четных и нечетных страницах.
Пытался вписать в код, найденное на сайте MS:
| Код |
|---|
Dim objPage As Page Set objPage = ActiveWorkbook.ActiveWindow _ .Panes(1).Pages.Item(2) |
