VBA--单元格的格式设置（一） / 开普饭

点击上方

蓝色

文字关注我们吧！

送人玫瑰，手有余香，请将文章分享给更多朋友

动手操作是熟练掌握EXCEL的最快捷途径！

在VBA中可以用Font对象来操作单元格内的字符串。Font对象是用来标示字体，字形，字号等字体属性的对象。它包含了设置字体的多种属性。用Font属性设置格式与“设置单元格格式”对话框中的“字体”选项卡内容相对应。

如何设置文字的字体

用NAME属性可以设置/获取单元格内的数据的字体。设置字体后能改变单元格内数据的字体。

对象.Name

对象.Name=设置值

下例中将单元格B3-B5的字体改成黑体，将单元格D3-D5的字体改成Arial Black，再把单元格C3-C5的字体设置为同单元格B1的字体。

完成之后的效果是这个样子的。

如何设置文字字号

用SIZE属性可以获取/设置单元格内文字的字号。单元格内文字的字号以像数点为单位进行改变。

对象.Size

对象.Size=设置值

下面将单元格B2的字号设置为15像数点，把单元格B3-B5的字号比现在增加两个像数点，把单元格D3-D5的字号设置为比标准字号小一个像数点。标准字号可以用StandardFontSize属性获取。

如何设置单元格文字的字形

用Bold属性可以设置/获取单元格内文字是否为粗体，用Italic属性可以设置/获取单元格内文字是否为斜体。每个属性可以是True或False两个值；True时表示设置为粗体/斜体，False时表示取消设置为粗体/斜体。

对象.Bold

对象.Bold=设置值

对象.Italic

对象.Italic=设置值

下面将单元格B1设置为粗体；将单元格C2设置为斜体；将单元格B4-B6设置为斜粗体。

如何给文字设置下划线/删除线

用Underline属性可以设置单元格内文字的下划线。用Strikethrough属性可以设置文字的删除线。两者都可以设置成True或者False；True时表示设置下划线/删除线；False时表示取消下划线/删除线。

另外，设置下划线时可以指定用什么样的线形。

对象.Underline

对象.Underline=设置值

对象.Strikethrough

对象.Strikethrough=设置值

下面将单元格A1内的文字添加为普通的下划线，给单元格D7内的文字添加会计用下划线，并且给单元格B4-B6的文字添加删除线。

-END-

长按下方二维码关注EXCEL应用之家

面对EXCEL操作问题时不再迷茫无助

VBA--单元格的格式设置（一）