excel表格怎么批量加粗字體
excel表格怎么批量加粗字體
excel中有想要加粗的關(guān)鍵文字,但是內(nèi)容很多,該怎么批量加粗呢?接下來學(xué)習(xí)啦小編舉例簡單的例子告訴大家excel表格批量加粗文字的方法,希望看完本教程的朋友都能學(xué)會并運(yùn)用起來。
excel表格批量加粗文字的方法
1、打開excel
2、點(diǎn)擊視圖選項(xiàng)卡,點(diǎn)擊宏
3、輸入加粗,點(diǎn)擊創(chuàng)建按鈕
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
//代碼結(jié)束
其中
1)With ActiveSheet表示當(dāng)前活動表格
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).”表示加粗文字的字符數(shù)
5)With c.......End With 可重復(fù)多次,分別加粗不同的文字
編輯完成后關(guān)閉窗口
5、點(diǎn)擊宏按鈕,選擇加粗,點(diǎn)擊執(zhí)行按鈕
6、可以看到需要加醋的文字已經(jīng)被加粗
猜你感興趣: