excel如何添加带圆圈的数字？如何实现？

Excel如何添加带圆圈的数字？实现方法详解

在Excel中，添加带圆圈的数字是一种常见的格式化技巧，可以用于强调特定的数据或使表格更加美观。以下是如何在Excel中添加带圆圈的数字以及实现这一功能的详细步骤。

一、使用内置功能添加带圆圈的数字

Excel 2013及以上版本提供了内置的“条件格式”功能，可以轻松地为数字添加圆圈。

1. 准备工作

首先，确保你的Excel版本是2013或更高版本。

2. 添加带圆圈的数字

打开Excel工作表，选中包含数字的单元格或单元格区域。

点击“开始”选项卡，然后找到“条件格式”组。

在下拉菜单中选择“新建规则”。

在弹出的对话框中，选择“使用公式确定要设置格式的单元格”。

在“格式值等于以下公式时”的文本框中输入以下公式：`=AND($A1>0,$A10,A1,"")

```

按下Ctrl+1打开“字体”对话框。

在“字体”选项卡中，勾选“效果”组中的“圆圈”复选框。

点击“确定”关闭对话框。

现在，单元格A1中的数字将显示为带圆圈的格式。

三、使用VBA宏添加带圆圈的数字

对于更高级的用户，可以使用VBA宏来自动化这一过程。

1. 准备工作

打开Excel，按下Alt+F11打开VBA编辑器。

在VBA编辑器中，插入一个新的模块（Insert > Module）。

在模块中粘贴以下VBA代码：

```vba

Sub AddCircleToNumber()

Dim ws As Worksheet

Set ws = ActiveSheet

Dim cell As Range

For Each cell In ws.UsedRange

If IsNumeric(cell.Value) And cell.Value > 0 Then

With cell.Font

.Name = "Arial"

.Size = 11

.Strikethrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Underline = msoNoUnderline

.ColorIndex = msoThemeColorDark1

.TintAndShade = 0

.Weight = msoNormal

.Italic = msoFalse

.UnderlineColor = msoThemeColorDark1

.UnderlineStyle = msoNoUnderline

.ThemeColor = msoThemeColorDark1

.TintAndShade = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = msoFalse

.Superscript = msoFalse

.Subscript = msoFalse

.Outline = msoFalse

.Shadow = msoFalse

.Emboss = msoFalse

.Engrave = msoFalse

.Condense = msoFalse

.Extend = msoFalse

.Kerning = True

.Spacing = 1

.Scaling = 100

.BaselinePosition = msoBaselinePositionAuto

.Translation = 0

.Rotation = 0

.HorizontalAlignment = msoAlignLeft

.VerticalAlignment = msoAlignTop

.WordWrap = msoFalse

.Combined = msoFalse

.ReadingOrder = msoFalse

.VerticalAlignment = msoVerticalAlignTop

.Orientation = msoTextOrientationHorizontal

.Skew = 0

.Name = "Arial"

.FontFamily = 4

.Bold = msoFalse

.Italic = msoFalse

.Underline = msoNoUnderline

.StrikeThrough = m