单元格字体格式设置

muerjun

单元格字体格式设置
       在VBA中可以对单元格的字体格式进行各种设置，如下面的代码所示。复制内容到剪贴板代码:#001  Public Sub RngFont()
#002      With Range("A1").Font
#003          .Name = "华文彩云"
#004          .FontStyle = "Bold"
#005          .Size = 18
#006          .ColorIndex = 3
#007          .Underline = 2
#008      End With
#009  End Sub

muerjun

代码解析：
       RngFont过程对单元格A1的字体格式进行设置。
       其中第3行代码设置字体为“华文彩云”，应用于Font对象的Name属性返回或设置对象的名称。
       第4行代码设置字体为加粗，FontStyle属性返回或设置字体样式。设置为“Bold” 加粗字体，设置为“Italic”倾斜字体，也可以设置成“Bold Italic”。
       第5行代码设置字体的大小为18磅，Size属性返回或设置字体大小。
       第6行代码设置字体的颜色为红色，应用于Font对象的ColorIndex属性返回或设置字体的颜色，该颜色可指定为当前调色板中颜色的编号