2022年11月28日
WORD VBA 办公助手
摘要： Sub 设置页面() ' ' 设置页面和页码 宏 ' ' With Selection.PageSetup .LineNumbering.Active = False .Orientation = wdOrientPortrait .TopMargin = CentimetersToPoints(2 阅读全文
posted @ 2022-11-28 01:52 沭水之虾 阅读(116) 评论(0) 推荐(0) 编辑
WORD VBA 设置页面
摘要： Sub 设置页面() ' ' 设置页面和页码 宏 ' ' With Selection.PageSetup .LineNumbering.Active = False .Orientation = wdOrientPortrait .TopMargin = CentimetersToPoints(2 阅读全文
posted @ 2022-11-28 00:24 沭水之虾 阅读(176) 评论(0) 推荐(0) 编辑
WORD VBA 插入页码
摘要： Sub 插入页码() ActiveDocument.PageSetup.OddAndEvenPagesHeaderFooter = False '关闭奇偶页相同（防止上回启用奇偶页不同后没有关闭此项设置） With ActiveWindow.ActivePane.View .SeekView = w 阅读全文
posted @ 2022-11-28 00:22 沭水之虾 阅读(742) 评论(0) 推荐(0) 编辑