Sub 公文自动排版()
' 设置页面参数（单位：厘米）
With ActiveDocument.PageSetup
.TopMargin = CentimetersToPoints(3.7) ' 上边距3.7cm
.BottomMargin = CentimetersToPoints(3.5) ' 下边距3.5cm
2025年03月26日
Sub 公文自动排版()
' 设置页面参数（单位：厘米）
With ActiveDocument.PageSetup
.TopMargin = CentimetersToPoints(3.7) ' 上边距3.7cm
.BottomMargin = CentimetersToPoints(3.5) ' 下边距3.5cm
2025年03月26日
这是属于Excel的效率革命，5个VBA神代码从此告别加班。
·一、数据清洗一键完成。删重复，Columns A D RemoveDuplicates，除空行CellsSpecialCells，xICellTypeBlanks Delete。
2025年03月26日
每天重复合并单元格、调整格式、计算数据？今天教你用Excel自带的"魔法棒"——宏和VBA，把3小时的工作变成3秒钟！无需编程基础，看完就能上手。
一、宏是什么？办公室里的"录音机"
想象你有一台可以记录鼠标和键盘操作的录音机——这就是“宏（Macro）”。
场景重现：
每天早上都要把A列姓名和B列电话合并成"张三 138-1234"，手动操作需要：
1. 插入新列
2025年03月26日
一、基础操作代码
1. 单元格操作
' 读写单元格值
Range("A1").Value = "数据" ' 写入值
MsgBox Range("A1").Value ' 读取值
' 批量填充公式