在Excel中，我們可以使用各種形狀來美化電子表格或圖表。其中，空心圓是常用的一種形狀，但有時(shí)候我們可能需要將空心圓變成實(shí)心黑色，以滿足特定的需求。下面將介紹幾種實(shí)現(xiàn)這一目標(biāo)的方法。方法一: 使用條件

在Excel中，我們可以使用各種形狀來美化電子表格或圖表。其中，空心圓是常用的一種形狀，但有時(shí)候我們可能需要將空心圓變成實(shí)心黑色，以滿足特定的需求。下面將介紹幾種實(shí)現(xiàn)這一目標(biāo)的方法。

方法一: 使用條件格式

1. 首先，在Excel中選擇需要更改空心圓為實(shí)心黑色的單元格。

2. 然后，點(diǎn)擊"開始"選項(xiàng)卡的"條件格式"按鈕，并選擇"新建規(guī)則"。

3. 在彈出的"新建格式規(guī)則"對(duì)話框中，選擇"使用公式確定要格式化的單元格值"。

4. 在"公式"框中輸入以下公式: AND(OBJECT("形狀")"自定義", OBJECT("形狀").ShapeStyle-1)

這個(gè)公式會(huì)判斷所選單元格中的形狀是否為圓，并且判斷其線條的顏色是否為黑色。

5. 在"格式"選項(xiàng)卡中選擇"填充"，并選擇黑色。

6. 點(diǎn)擊"確定"按鈕完成設(shè)置，此時(shí)所選單元格中的空心圓將變?yōu)閷?shí)心黑色。

方法二: 使用宏

1. 首先，在Excel中按下"Alt F11"組合鍵打開VBA編輯器。

2. 在VBA編輯器中，點(diǎn)擊"插入"選項(xiàng)卡的"模塊"按鈕，插入一個(gè)新的模塊。

3. 在模塊中輸入以下代碼:

Sub FillCircle()

Dim shp As Shape

For Each shp In

If shp.Type msoShapeOval And RGB(0, 0, 0) Then

RGB(0, 0, 0)

End If

Next shp

End Sub

這個(gè)宏會(huì)遍歷當(dāng)前工作表中的所有形狀，判斷其類型是否為圓，并且判斷線條的顏色是否為黑色，然后將形狀的填充顏色設(shè)置為黑色。

4. 關(guān)閉VBA編輯器，并返回Excel界面。

5. 在Excel中按下"Alt F8"組合鍵打開宏對(duì)話框，選擇剛才創(chuàng)建的宏"FillCircle"，然后點(diǎn)擊"運(yùn)行"按鈕。

此時(shí)，所選單元格中的所有空心圓都將變成實(shí)心黑色。

通過以上兩種方法，我們可以在Excel中將空心圓變成實(shí)心黑色，滿足我們對(duì)圖表美化的要求。

文章演示示例:

步驟:

1. 選擇需要更改的空心圓單元格。

2. 點(diǎn)擊"開始"選項(xiàng)卡的"條件格式"按鈕，并選擇"新建規(guī)則"。

3. 在彈出的對(duì)話框中選擇"使用公式確定要格式化的單元格值"。

4. 輸入公式: AND(OBJECT("形狀")"自定義", OBJECT("形狀").ShapeStyle-1)。

5. 在"格式"選項(xiàng)卡中選擇"填充"，并選擇黑色。

6. 完成設(shè)置后，空心圓變?yōu)閷?shí)心黑色。

宏演示:

1. 打開VBA編輯器，插入新模塊。

2. 輸入以下代碼:

Sub FillCircle()

Dim shp As Shape

For Each shp In

If shp.Type msoShapeOval And RGB(0, 0, 0) Then

RGB(0, 0, 0)

End If

Next shp

End Sub

3. 關(guān)閉編輯器，按下"Alt F8"打開宏對(duì)話框。

4. 選擇宏"FillCircle"，點(diǎn)擊"運(yùn)行"。

5. 空心圓變?yōu)閷?shí)心黑色。

通過以上方法，你可以輕松地在Excel中將空心圓變成實(shí)心黑色，實(shí)現(xiàn)圖表美化的效果。