excel表格怎么批量加粗中指定的关键字?

时间:2021-05-22

在工作中有事会需要将excel表格中所有指定的关键字都进行加粗,又不能进行直接的替换,那么怎么办呢?

软件名称:
MicroExcel(微表格) 3.1.1.2 中文免费安装版
软件大小:
5.16MB
更新时间:
2015-01-21立即下载

1、打开excel

2、点击视图选项卡,点击

3、输入加粗,点击创建按钮

4、在弹出窗口中输入如下代码:

Sub 加粗()

With ActiveSheet

For Each c In Range("A1:A12")

With c

cv = .Value

i = InStr(1, cv, "加粗", 1)

.Characters(i, 2).Font.Bold = True

End With

Next

End With

End Sub

//代码结束

其中

1)With ActiveSheet表示当前活动表格

2)For Each c In Range("A1:A12")中"A1:A12"表示加粗文字的范围

3) i = InStr(1, cv, "加粗", 1) 中"加粗"为需要加粗的文字

4)Characters(i, 2).Font.Bold = True中“(i, 2).”表示加粗文字的字符数

5)With c.......End With 可重复多次,分别加粗不同的文字

编辑完成后关闭窗口

5、点击宏按钮,选择加粗,点击执行按钮

6、可以看到需要加醋的文字已经被加粗

相关推荐:

在excel表格中怎么输入角标?

Excel怎么使用transpose函数转置数据?

excel表格中插入超链接怎么直接打开ppt文件?

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章