尝试将积累的知识碎片输出, 这是 "进击的AccessEr" 的原创文章
昨天分享了如何增加 快速访问工具栏, 其中提到了如何将 宏 代码增加到快速访问工具栏中
今天开始分享我常用的 宏代码, 都是超级简单, 稍微上心通过录制宏也可以实现, 我分享的目的一是为了记录, 另一是为了多和大家交流, 增强自己的驱动力
- 分享代码 : 一键设置选中区域字体及字号
- 主要意义 : 通过提前设置好字体和字号, 一键修改工作表, 可以快速提升效率, 并能保持管理文件统一性, 提升职场能力 (不要小看单纯字体统一这件小事, 体现的可是 ...)
Sub SelectCellsFont()
'一键设置选中区域字体及字号
Dim rng As Range
Set rng = Selection
With rng.Font
.Name = "微软雅黑"
'字体名任意修改, 放置想用的字体
.Size = 9
'字号同样任意修改, 放置想用的字号
End With
End Sub
期待大家的鼓励, 一天更新一篇...
知行合一