Настройка нескольких заголовков страниц одновременно с массивом VBA

Question

Вот где я получаю ошибку.

Есть идеи?

Application.Sheets(Array("Sheet1","Sheet2")).PageSetup.RightHeader = "HELLO"

Спасибо !!!

Answer 1

что-то порядка

Option Explicit

Sub aa()
    Dim str As Variant
    For Each str In Array("Sheet1", "Sheet2")
        Application.Sheets(str).PageSetup.RightHeader = "HELLO"
    Next str
End Sub