У нас есть m-файлы, и мы используем систему свойств для отображения свойств документа в документах Excel. Но мы хотим, чтобы некоторые свойства отображались в «заголовке» excel.
Поэтому я создал кнопку, которая обновляет свойства заголовка при каждом его нажатии.
Но у меня сейчас проблема, потому что я хочу заполнить все 3 заголовка (LeftHeader, CenterHeader, RightHeader) свойствами, но мой макрос только заполняет CenterHeader, и я понятия не имею, почему ..
Вот мой макрос:
Sub AddHeaderToAll_FromMETADATASheet()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
With ws.PageSetup
.LeftHeader = ""
.CenterHeader = ""
.RightHeader = ""
.LeftHeader = "&6" & Worksheets("METADATA").Range("B24").Value
.RightHeader = "&6" & Worksheets("METADATA").Range("B25").Value
End With
Next ws
End Sub