EXCEL中VBA实例技巧：[1]单元格字体格式设置

来源：互联网 2023-02-20 19:37:08 91

首先说明一下，这一部分经验我尽量使用实例的方法来学习。大家最好有VB的基础。多多练习就可以了。

方法/步骤

如图所示我们想将单元格的文本的字体进行修改。原来是宋体字。

右击当前工作表，在弹出的菜单中选择“查看代码”

EXCEL中VBA实例技巧：[1]单元格字体格式设置

首先我们在窗口中输入

Public Sub chgFont()

End Sub

1、使用Public语句，来显式声明公用的变量。chgFont是我自己取的名字，大家在取名称是尽量要有含义。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

这里我们再使用WITH和 WITH。

在一个单一对象或一个用户定义类型上执行一系列的语句。

一个Range对象代表单元格区域，我这里是Range("A1").Font，代表使用这个区域A1的字体属性。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

.Name = "黑体"，这里可以将A1单元格的区域字体进行修改。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

5本页面未经许可获取自百度经验

.FontStyle字体样式，我们同样可以使用个方法进行修改。对应的字体样式如图所示。

“Bold” 加粗，“Italic”倾斜，“Bold Italic”则为倾斜加粗。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

Size属性可以修改字体的字号，这个功能其实很简单，我这里就不要解释了。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

但我们在单元格格式窗口就可以看到下划线有四种样式。怎么样设置呢？

EXCEL中VBA实例技巧：[1]单元格字体格式设置

其可以通过underline属性进行设置，具体数值代表含义，大家看一下图。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

而颜色的设置就比较麻烦。你可以使用.ColorIndex属性，但这个数值所对应的颜色如下图。需要记忆哦。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

最后我们以这段代码为例

Public Sub chgFont()

With Range("A1").Font

.Name = "黑体"

.FontStyle = "bold"

.Size = 45

.ColorIndex = 45

End With

End Sub

点击上方的运行按钮。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

这个时候你会发现A1单元格，快速的按照我们设置修改好。

EXCEL中VBA实例技巧：[1]单元格字体格式设置

(共篇)

以上方法由办公区教程网编辑摘抄自百度经验可供大家参考！

标签： excel 实例技巧单元字体

上一篇：word2003文档中插入excel工作表的方法下一篇：EXCEL2010怎样VLOOKUP函数用学号来查询其它信息

EXCEL中VBA实例技巧：[1]单元格字体格式设置

方法/步骤

热门文章

标签列表