方法如下：

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字型加粗的單元格，按下快捷鍵ctrl+B：應用或取消加粗格式。

選擇excel字型加粗的單元格，單擊工具欄的加粗按鈕。

選擇excel字型加粗的單元格，右鍵“設定單元格格式”對話方塊，字型選項卡中設定加粗、傾斜和下劃線等效果。

excel表格批次加粗文字的步驟1、開啟excel2、點選檢視選項卡，點選宏3、輸入加粗，點選建立按鈕4、在彈出視窗中輸入如下程式碼：Sub 加粗()With ActiveSheetFor Each c In Range("A1:A12")With ccv = .Valuei = InStr(1, cv, "加粗", 1).Characters(i, 2).Font.Bold = TrueEnd WithNextEnd WithEnd 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、可以看到需要加醋的文字已經被加粗

1、本次演示所用的工具為Excel辦公軟體，使用的版本為office家庭和學生版2016。

2、新建Excel表格，並在新建的表格中輸入演示所用的文字。

3、我們首先選中第2行的演示所用文字，然後選中，接著使用快捷鍵CTRL+B，可以發現被選中的文字已經變成了粗體。

4、選中第3行的演示所用文字，然後選中，接著使用快捷鍵CTRL+2，可以發現快捷鍵CTRL+2同樣可以加粗文字。

5、如果我們想批次加粗字型，只需要講我們想加粗的文字選中，然後使用快捷鍵CTRL+B或者CTRL+2都可以得到我們想要的結果。