本技巧的目的: 掌握使用代码来设置单元格格式的方法
- 未设置时：
- 用代码设置后：
- 未设置时：
- 用代码设置后边框后：
- 用代码设置尺寸后：
1. 代码助手
- 私信回复 代码助手即可下载 VBA代码助手专业版
- 使用代码助手后，输入中文：单元格 + 空格 即可显示代码，方便快速输入代码
- 还可以收藏自己需要的代码，方便下次使用。
2. 字体设置
- 使用录制宏方法得到基础代码：
- 停止录制后得到以下代码：
专栏
郑广学Excel VBA 175例案例精讲
作者：郑广学网络服务工作室
68币
221人已购
查看
- 注释：
- Name: 字体名称
- FontStyle: 字体样式
- Size: 字号
- Strikethrough: 文字中间是否有水平删除线
- Superscript: 是否上标字符
- Subscript: 是否下标字符
- OutlineFont : 是否空心字体
- Shadow: 是否有阴影(如果指定的字体是阴影字体)
- Underline: 下划线类型
- Color: 字体颜色
- Bold: 字体是否加粗
- TintAndShade: 字体颜色变深或变浅
- ThemeFont: 主题字体
- 去掉未设置的属性，代码如下：
- With Sheet6.Range(“B5”).Font Sheet6 工作表 B5 单元格 字体设置
- .Name = “微软雅黑” ‘字体名称
- .Size = 16 字体大小
- .Underline = xlUnderlineStyleSingle 单下划线
- .Color = -10477568 字体颜色
- .Bold = True 加粗
- End With
- With: 开始对输入的对象执行这之后的代码
- 示例中为对 Sheet6 工作表-B5 单元格-字体 进行设置
- 中间代码前面加上 . 代表都使用: Sheet6 工作表-B5 单元格-字体
- End With：执行结束
- 设置前：
- 设置后：
- 3. 单元格内部颜色填充
- 录制宏以后得到以下代码:
- 注释:
- Pattern: 内部图案
- PatternThemeColor: 图案的主题颜色
- Color: 主要颜色
- TintAndShade: 使颜色变深或变浅
- PatternTintAndShade: 淡色和底纹图案
- 修改后代码:
- With Sheet6.Range(“B5”).Interior Sheet6 工作表 B5 单元格 单元格内部格式
- .Pattern = xlVertical 单元格内部图案
- .PatternThemeColor = xlThemeColorAccent3 单元格图案的主题颜色
- .Color = 49407 单元格颜色
- End With
- 设置前:
- 设置后:
- Interior单元格内部格式 PatternColorIndex: 设置内部图案的颜色:
- 可指定为下图的当前调色板中颜色的编号:
- xlColorIndexAutomatic （自动填充）、 xlColorIndexNone （无内部填充）
4. 单元格区域添加边框
- 录制宏以后得到以下代码:
- 注释:
- Border: 设置边框
- LineStyle: 边框的线型
- TintAndShade: 使颜色变深或变浅
- Weight: 边框的粗细
- Color: 以RGB值指定边框的颜色
- ColorIndex: 设置边框颜色
- ★★★注意: 指定Color参数可以设置颜色为当前调色板之处的其它颜色，不能同时指定ColorIndex参数和Color参数。
- 修改代码:
- 注释:
- 使用单元格区域变量 和 颜色变量，方便后面快速改动。
- 设置前:
- 设置后:
- 5. 单元格的行高列宽
- 同样用录制的宏方法得到以下代码：
- 注释：
- View：设置在窗口中显示的视图
- RowHeight ：磅为单位 设置指定区域的行高
- ColumnWidth ：磅为单位 设置指定区域的列宽
- 修改代码为：
- 设置后：
专栏
郑广学Excel VBA 175例案例精讲
作者：郑广学网络服务工作室
68币
221人已购
查看
更详细的讲解请到我视频专栏学习
主题授权提示：请在后台主题设置-主题授权-激活主题的正版授权，授权购买：RiTheme官网
声明：本站所有文章，如无特殊说明或标注，均为本站原创发布。任何个人或组织，在未征得本站同意时，禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益，可联系我们进行处理。本站所有文章,如遇付费下载内容。需要付费之后获取提款吗之后网盘观看学习和下载，不会产生第二次费用。
