VBA设置指定单元格字体、大小、加粗、颜色、下划线
Public Sub RngFont()
With Range("A5").Font '指定单元格
.Name = "宋体"
.FontStyle = "Bold" '字体加粗
.Size = 26 '字体大小
.ColorIndex = 3 '字体颜色
.Underline = 2 '下划线
End With
End Sub
【小智ExceL818数据分析编程思路】
RngFont过程对单元格A1的字体格式进行设置
(1)Name属性设置对象的名称，也就是字体的名称，例如“宋体”，“华文彩云”等。
(2)FontStyle属性设置字体样式。<1>Bold:粗字体<2>Italic：倾斜式<3>Bold Italic:加粗和倾斜。
(3)Size字体的大小，比如26磅
(4)ColorIndex设置字体的颜色，该颜色为指定为当前调色板中颜色的编号。
/<font>
(5)Underline设置字体的下划线类型：
<1>-4141：无<2>-4119:双下划线<3>2:单下划线<4>会计用单下划线<5>会计用双下划线
分享到:
閱讀更多 小智ExceL之企業管理 的文章
