excel写代码怎么写

坦白讲，每次有人问我“Excel里头怎么写代码”，我脑子里都不是先蹦出什么Sub、Dim或者For Next这些技术词儿。

我脑子里浮现的，是一个具体的画面。

下午三点，办公室里空调的风有点无力，咖啡因的效果也快过去了。你盯着屏幕上密密麻麻的表格，几千行数据，老板的要求是把里面所有“华东区”的、“销售额大于五万”的、“利润率为正”的数据行，都给标成黄色，然后复制到一个新的Sheet里，每个区域还得单独建个文件夹存起来。

你的手指在Ctrl+C和Ctrl+V之间跳着绝望的探戈，眼睛在找筛选按钮，大脑在计算今天得加班到几点。

这就是“为什么”要在Excel里写代码的全部意义。为了终结这种绝望。

所以，“怎么写”这个问题，得从“怎么想”开始。你得先把自己从一个表格操作员，切换成一个流程设计师。你不再是那个亲自下场搬砖的人，你是那个画图纸、指挥吊车和挖掘机的人。

这个吊车和挖掘机，就是VBA。

全称是Visual Basic for Applications。别被这个名字吓到，听着挺唬人，其实它就是微软塞在Office全家桶里的一套“内部指令系统”。它像个懂Excel所有操作的幽灵，潜伏在每个单元格背后，你只要用它能听懂的语言下命令，它就能帮你干活，而且速度快到飞起，还不会抱怨。

那么，这个幽灵藏在哪儿？

你得先把它从封印里放出来。打开Excel，找到“文件” -> “选项” -> “自定义功能区”，然后在右边的框里，把那个叫“开发工具”的选项给勾上。

点下确定的那一刻，你的Excel菜单栏上会多出一个全新的、充满神秘感的选项卡。恭喜你，你已经拿到了进入新世界的钥匙。

对于一个纯新手，我绝对不会建议你上来就去啃那些厚厚的语法书。那会让你从入门到放弃，只需要半小时。

我们要用最赖皮、也最直观的方式开始——录制宏。

“开发工具”选项卡下面，有个像红色录音键一样的按钮，就叫“录制宏”。你点它一下，Excel就会像个忠实的跟屁虫，把你接下来在界面上所有的鼠标点击、键盘输入，全都偷偷翻译成VBA代码，一句一句记录下来。

你就按老板的要求，手动操作一遍：筛选、标色、复制、粘贴、新建Sheet……等你干完了，再点一下那个“停止录制”的按钮。

然后，奇迹发生了。

你按Alt + F11，会弹出一个全新的、看起来像上世纪9urato软件的窗口，这就是VBE（Visual Basic编辑器）。在左边的工程窗口里，你会找到一个叫“模块”的东西，双击它，右边就会出现刚才Excel帮你“翻译”好的代码。

那一堆Selection.AutoFilter Field:=...、Range("A1").Select之类的东西，就是你刚才所有操作的“代码化身”。

第一次看到它，你可能会觉得这都是些什么天书。但别慌，这就是我们学习的起点。录制宏最大的价值，不是生成多完美的代码（实际上它生成的代码很啰嗦、效率也不高），而是它告诉了我们，某个具体的操作，用VBA的语言该怎么说。

你想知道“选中A1单元格”怎么写？录一下就知道了，Range("A1").Select。 你想知道“把单元格背景变成黄色”怎么写？录一下就知道了，是类似With Selection.Interior ... .Color = 65535 ... End With这样的结构。

这就是你的第一本活字典。

看懂了录制的代码，下一步就是改造和优化它。录制的代码充满了.Select和.Activate，就是“选中”和“激活”，这在VBA里是效率极低的坏习惯。我们真正的高手，都是直接在后台操作数据，屏幕上连动都不动一下，任务就完成了。

比如，录制的代码可能是： Range("A1").Select Selection.Value = "你好"

而我们自己写的，应该是： Range("A1").Value = "你好"

看，少了一步“选中”，直接对A1单元格这个对象（Object）进行“赋值（Value）”这个操作（Method/Property）。这就是从模仿到创造的第一步。你要开始理解VBA的思维方式：对象.属性 = 值 或者 对象.方法(参数)。

Worksheets("Sheet1") 就是一个对象。 Range("A1:B10") 也是一个对象。 .Value、.Font.Color、.Address 这些是它们的属性。 .Copy、.Paste、.ClearContents 这些是它们的方法。

当你能看懂这套逻辑，你就可以开始写真正属于你自己的代码了。这时候，三大核心结构你必须得认识一下：

1. 变量（Variables）：Dim i As Integer

   这玩意儿就是一个临时的“盒子”，用来存放数据。比如你要数数，总得有个东西记着你数到几了吧？Dim i As Integer 就是声明了一个叫 i 的盒子，专门用来装整数。你可以把单元格里的值放进去，i = Range("A1").Value，也可以在代码里对它进行加减乘除。

2. 循环（Loops）：For...Next

   这绝对是VBA里最伟大的发明，是自动化的灵魂。回到我们开头那个任务，要处理几千行数据，难道要写几千行代码？当然不。

   vb For i = 1 To 5000 ' 在这里写对第 i 行进行处理的代码 ' 比如，判断第 i 行的 A 列单元格的值 If Cells(i, "A").Value = "华东区" Then ' 如果是，就执行某些操作... End If Next i

   For i = 1 To 5000 ... Next i 这个结构，会像个永不疲倦的机器人，把你框在中间的代码，重复执行5000遍。每一次，变量 i 的值都会自动加1。这样你就可以通过 Cells(i, "A") 这样的写法，依次访问从第1行到第5000行的每一个单元格。

   那种看着屏幕上的数据一行行自己变色、自己跳动，而你悠闲地喝着茶的感觉，试过一次就再也回不去了。

3. 判断（Conditionals）：If...Then...Else...End If

   如果说循环是让代码动起来的肌肉，那判断就是让代码变聪明的大脑。它负责做决定。

   vb If Range("B2").Value > 50000 And Range("C2").Value > 0 Then ' 条件都满足了，就把这一行标成黄色 Range("B2").EntireRow.Interior.Color = vbYellow Else ' 条件不满足，就不变色，或者标成别的颜色 End If

   这个结构，就是把我们日常的逻辑思维，翻译成了代码。有了它，你就能让程序根据不同的数据情况，执行不同的操作。

掌握了变量、循环和判断，你就已经拿到了百分之八十的VBA场景的通关门票。剩下的，就是不断地通过“录制宏”去查字典，通过搜索引擎去解决你遇到的具体问题，比如“VBA如何新建文件夹？”（答案是MkDir语句），“VBA如何获取最后一行行号？”等等。

写代码的过程，其实更像是在搭乐高积木。你知道了每一种积木块（语法结构）的形状和功能，接下来就是根据你的设计图（业务需求），把它们一块块拼起来。

中间肯定会出错，代码会变红，会弹出各种看不懂的报错窗口。别怕，这是每个人的必经之路。学会用Debug.Print在“立即窗口”里输出变量的值，看看程序跑到哪一步跟你的预期不一样了。学会把你遇到的报错信息，原封不动地扔到搜索引擎里。你会发现，你踩过的每一个坑，前面都有无数人已经踩过，并且留下了解决方案。

从那个被重复性事务所折磨的下午，到你第一次按下“运行”按钮，看着一个复杂的报表在几秒钟内自动生成，那种成就感，那种从繁琐中被解放出来的快感，是任何语言都难以形容的。

你写的不再是冷冰冰的代码，你写的是自由，是效率，是你本该用来思考、创造，而不是用在机械操作上的，宝贵的时间。