工作中发生事情，需要将excel表格中指定的关键字全部加粗，但不能直接替换。那我该怎么办呢？
1.打开excel。
2.单击视图选项卡，然后单击宏。
3.输入bold并单击创建按钮。
4.在弹出窗口中输入以下代码：
子粗体()
带活动表
对于范围内的每个c(' A1:A12 ')
用c
cv=。价值
I=InStr(1，cv，' bold '1)。Characters(i，2).Font.Bold=True
以…结尾
然后
以…结尾
末端接头
//代码结束
在…之中
1)用ActiveSheet表示当前活动的表。
2)范围中每个c的“A1:A12”表示粗体文本的范围。
3)I=instr(1，cv，' bold '1)中的' bold '是要加粗的文本。
4)”(我，2)。”in characters (I，2).Font.Bold=True表示粗体文本中的字符数。
5)用c.end with可以重复多次，分别加粗不同的单词。
编辑后关闭窗口。
5.单击宏按钮，选择粗体，然后单击执行按钮。
6.可以看到需要加粗的文字已经加粗了。
