2

当我运行 VBA 代码来设置和格式化 Excel 页面的页脚时,我收到 1004 运行时错误 - “无法设置 PageSetup 类的 CenterFooter 属性”。代码如下:

With Sheets("Letter").PageSetup
        .LeftFooter = "&""Arial,Regular""&6" & Sheets("Footer").Range("A1")
        .CenterFooter = "&""Arial,Regular""&6" & Sheets("Footer").Range("E2")
        .LeftHeader = "&""Arial,Regular""&8" & Sheets("Footer").Range("I5")
End With

代码引用名为“页脚”的电子表格中的特定单元格,以获取左页脚和中页脚以及页面左页眉的措辞。

当我运行代码时,它会拾取左页脚,但会在 .CenterFooter 行上弹出错误窗口。如果我评论那条线,LeftFooter 和 LeftHeader 工作完美。

我还注意到,如果我像下面那样简化代码,取出格式化部分,它可以完美地工作:

With Sheets("Letter").PageSetup
        .LeftFooter = Sheets("Footer").Range("A1")
        .CenterFooter = Sheets("Footer").Range("E2")
        .LeftHeader = Sheets("Footer").Range("I5")
End With

我在 VBA 编码方面相对较新,因此如果您的答案易于理解,我将不胜感激。

显然问题在于我试图链接到页面页脚的单元格中的文本长度。如果文本和格式文本的长度超过 256 个字符则会出现错误消息。尽量缩短页脚和页眉文本以避免此类问题。

4

0 回答 0