使用阵列VBA一次设置多个页面标题

时间:2019-06-21 19:40:59

标签: vba

这是我得到错误的地方。

有什么想法吗?

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

谢谢!

1 个答案:

答案 0 :(得分:0)

类似

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