AI避无可避,那就来吧,让Excel公式飞吧
- 2026-11-10 04:55:13
AI避无可避,那就来吧,让Excel公式飞吧明天去给某公司讲AI办公提效的课程，备课过程中，用AI写公式，很有意思。这次给大家更新一下数据处理思维，让AI先行。 Excel公式很强大，但是平时用的不多，也不知道哪些函数适合现在你正在处理的数据。能不能让AI帮我们找公式？我们只要套用公式就好。还有一种就是我不想找公式，让AI直接给我创造公式，简单粗暴实现目的。今天给大家更新一下案例。 一、让AI帮忙写公式（Excel函数库里有的函数） 第一步把要写公式的数据截取一部分给AI大模型，让DeepSeek（或者通义千问）进行分析，（到目前为止我自己的经验写代码，这两个大模型都可以）给出公式：提示词：分析阅读图片，给出出生日期和工龄的公式，其中工龄按照年月的形式。 
通义千问给出的公式截图 
第二步把公式放到相应单元格里结果如下： 
提效70%。 二、让AI帮我创造公式。 有人比较懒或者有创意，看看AI的创造能力如何？我就带大家领略一下AI带给大家的震撼。 看到这样的数据，大家可能会有难度，Excel可以不带单位求和没问题，但是像这种情况，大家不会一个数一个数相加吧，那就太慢了，让AI来试试。 第一步把图片直接扔给AI。 
第二步告诉AI你想做什么，提示词： 
结果： 
当光标变成实心十字架后，双击，整列合计。 
合计的值会动态的随着费用变化而变化，结果如下： 
一个好用的AI自创的中文公式就做好了，如果想永久使用，加载到函数库里就行了。AI时代来临，提效势不可挡，不要排斥，在不泄露数据的基础上，用一用可以提早下班。快去试试吧！！！ 
请阅读以上的图片
1、帮我创建一个 Excel vba 函数、将我选中的单元格区域的数值提取出来并求和；
2、函数名称定义为：提取数值并求和222。
AI经过1秒钟的思考，给你一段VB代码
Function 提取数值并求和222(rng As Range) As Double
Dim cell As Range
Dim match As Object
Dim total As Double
Dim str As String
Dim i As Long
total = 0
' 创建正则表达式对象
Set match = CreateObject("VBScript.RegExp")
match.Global = True
match.Pattern = "\d+\.?\d*" ' 匹配整数或小数
' 遍历每个单元格
For Each cell In rng
str = cell.Value
If match.test(str) Then
Set matches = match.Execute(str)
For i = 0 To matches.Count - 1
total = total + Val(matches(i).Value)
Next i
End If
Next cell
提取数值并求和222 = total
End Function
第三步把代码放到VB编辑器里
第四步关闭VB编辑器，在相应单元格里输入=函数名，回车即可
本文来自网友投稿或网络内容，如有侵犯您的权益请联系我们删除，联系邮箱：wyl860211@qq.com 。
