excel圈数字怎么打出来

讲真，每次有人在群里问“excel圈数字怎么打出来”，我都能想象到屏幕那头抓耳挠腮的样子。这问题，简直是Excel新手村的第一个小Boss，看似简单，却能把人绕进去，搞得晕头转向。

想当年，我也是这么过来的。老板一个眼神，一句“把报告里这几个数，给我圈一下，显眼点”，我就懵了。圈？用啥圈？画笔吗？Excel里哪有画笔？

于是，我走上了绝大多数人都会走的第一条弯路，一条充满了血与泪的弯路。

那条最笨、最折腾的路：插入形状

你是不是也这么干过？

【插入】->【形状】->【椭圆】。然后按住Shift键，小心翼翼地在那个数字上画一个完美的圆形。画完一看，嘿，数字被盖住了。

没关系，小问题。右键点击圆形，设置形状格式，把“填充”改成“无填充颜色”，再把“线条”的颜色调成红色或者你想要的颜色，顺便加粗一下，显得专业。

好了，一个圈有了。然后，你试着拖动这个圈，想把它精准地套在那个数字上。这一步，简直就是对耐心和眼力的终极考验。放大到200%，鼠标一毫米一毫米地挪，好不容易对准了，你一改单元格的行高或者列宽，得，圈和数字，瞬间就成了牛郎和织女，天各一方，完美错位。

更要命的是，如果你有十几个数字要圈……那一刻，你想砸电脑的心都有了。每一个圈都是一个独立的“漂浮物”，跟你的数据半毛钱关系没有，它们只是“看起来”在一起。这种方法，我称之为“体力活儿”，纯粹是行为艺术，费力不讨好，而且极度、极度不专业。谁用谁知道，那种调整对齐到崩溃的感觉。

稍微聪明点的办法：自带的“带圈字符”

折腾了半天，终于有人告诉你，别傻了，Excel里有现成的啊！

没错，就是通过【插入】->【符号】。在弹出的对话框里，字体选普通文本，子集拉到“带括号的字母数字”。你会惊喜地发现，哇，①②③④⑤……⑳，这不就来了吗？

这个方法，在处理1到20以内的小数字时，简直是神器。一键插入，它就是一个字符，跟着单元格走，行高列宽随便调，它都稳如泰山。对于制作一些简单的序号列表，标记前20名的项目，足够了。

但是，它的局限性也明晃晃地摆在那儿。

首先，只能到20。你想圈个“21”，对不起，没有。这就很尴尬了，难道超过20的数据就不配拥有姓名吗？

其次，它的样式是固定的，圈是黑色的实心圈，你想换个红圈、虚线圈？没门。它本质上就是一个已经设计好的特殊字符，不是让你自定义的图形。

所以，这个方法，我管它叫“小聪明”，能解决一部分燃眉之急，但一旦你的需求稍微复杂一点，它就立刻歇菜。

真正的高手，都玩看不见的“代码”：VBA宏

好了，接下来要说的，才是真正能让你在办公室里“横着走”的技巧。当别人还在吭哧吭哧画圈、找符号的时候，你啪啪啪几下操作，所有数字瞬间被完美地圈上，那感觉，简直不要太爽。

这就是VBA（Visual Basic for Applications）。

别一听代码就头大，你根本不需要懂！你只需要当一个“代码的搬运工”就行了。

听我指挥，一步一步来：

1. 首先，按下快捷键 Alt + F11，你会进入一个看起来很高级的“Microsoft Visual Basic for Applications”窗口。别怕，这里就是Excel的“后台”。

2. 在左侧的工程窗口里，找到你的工作簿名字，右键点击，选择【插入】->【模块】。这时，右边会出现一个空白的框框，这就是给你贴代码的地方。

3. 把下面这段“咒语”原封不动地复制进去：

   vb Sub CircleSelectedCells() Dim C As Range Dim Shp As Shape If TypeName(Selection) <> "Range" Then Exit Sub For Each C In Selection ' 先删除单元格里可能已经存在的圈 For Each Shp In C.Parent.Shapes If Not Intersect(Shp.TopLeftCell, C) Is Nothing And Shp.AutoShapeType = msoShapeOval Then If Shp.Width = C.Width And Shp.Height = C.Height Then Shp.Delete End If End If Next Shp ' 添加新的圈 Set Shp = C.Parent.Shapes.AddShape(msoShapeOval, C.Left, C.Top, C.Width, C.Height) With Shp .Fill.Visible = msoFalse ' 无填充 .Line.ForeColor.RGB = RGB(255, 0, 0) ' 红色线条，可以自己改颜色 .Line.Weight = 1.5 ' 线条粗细 End With Next C End Sub

4. 好了，关闭这个VBA窗口，回到你的Excel表格。

现在，见证奇迹的时刻到了。选中你想要加圈的任意一个或多个单元格，然后按下快捷键 Alt + F8，会弹出一个“宏”对话框。你会看到我们刚才保存的那个“CircleSelectedCells”，选中它，点击【执行】。

Biu！

你选中的所有单元格，瞬间都被套上了一个完美的、大小自适应的、红色的圆圈。你调整行高列宽，那个圈会跟着变！因为这段代码的核心逻辑就是，在每个选中的单元格上，画一个和单元格一样大小的、透明的圆圈。

这才是降维打击！这才是终极解决方案！

你可以把这个宏保存在你的个人宏工作簿里，以后任何Excel文件都能随时调用。这已经不是在解决“excel圈数字怎么打出来”的问题了，这是在提升你的工作流。

一个歪门邪道，但有时候很好用：特殊字体

最后，再分享一个有点像“黑魔法”的技巧，知道的人不多。

有些特殊的字体，它本身就包含了带圈的数字，而且数量可能比系统自带的要多。比如，你可以去网上搜一些叫“Number Font”或者类似的字体，安装到你的电脑系统里。

安装好之后，在Excel里，你只需要输入数字，比如“58”，然后把这个单元格的字体设置为你下载的那个特殊字体，它可能就会自动显示为带圈的⑤⑧。

这个方法的优点是一劳永逸，跟用普通字体一样简单。缺点也很明显：

• 资源难找：找到一个好用、免费、且数字齐全的字体，需要花点时间。
• 兼容性问题：你把这个文件发给别人，如果他的电脑上没有安装这个字体，那他看到的就不是带圈数字，而是一堆乱码或者普通的数字。

所以，这个方法适合自娱自乐，或者在输出为PDF、图片等固定格式的场景下使用。

兜兜转转一大圈，从最原始的画图，到有限的符号，再到无所不能的VBA，最后还有奇特的字体玩法。关于excel圈数字怎么打出来这个问题，其实映照出了我们使用工具的四个层次：蛮干、巧干、精干、和巧思。

下次再有人问起，你大可以云淡风轻地打开VBA编辑器，告诉他，别画了，我教你个一秒搞定的。那个瞬间，你在他眼里的形象，绝对不止两米八。