Excel VBA 批量设置各工作表的打印页页脚 附知识点

2020-10-18


应用场景 批量设置工作薄中各工作表的打印页页脚 知识要点 1:PageSetup 对象  代表页面设置说明 2:PageSetup.LeftFooter 属性  返回或设置工作簿或节的左页脚上 3:PageSetup.RightFooter 属性  返回或设置页面右边缘与页脚 Sub 批量设置页脚()     Dim Sht As Object     For Each Sht In Sheets         If Sht.Name <> "总表" Then '如果不是总表             With Sht.PageSetup     '页面设置                 .LeftFooter = "&D" '左边显示日期                 .RightFooter = "第&P页 总&N页" '右边显示页数             End With         End If     Next End Sub

扫描二维码分享到微信

在线咨询
联系电话

18039559935