外挂培训,偷丝,4008-000-000
应用场景
批量设置工作薄中各工作表的打印页页脚
知识要点
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
如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!! 点击进行留言回复
同一个Excel 文件中的任意多个工作表合并到一个表中的神技
Excel 根据身份证直接算出退休年月 用哪个函数 如何区别男女
Excel 中如何选择正确的地图类型及各种地图类型的应用场景
根据入职日期用Excel 计算工龄补贴 满1年补贴50满2年补贴100
Excel 微图表对数据进行可视化处理实现数据与图表的一体化衔接
被雪藏的datedif()函数的典型用法 适用最新版本的Excel
EXCEL 数据分析之合并单元格后按合计得分排序的整个心路历程
Excel-VBA批量将表达式转换为运算结果把代表的汉字给替换掉
网友评论