还在为复杂的Excel公式发愁?想学VBA但无从下手?AI工具来帮你!
作为一名Excel新手,你是否遇到过这些情况:
今天就教你用DeepSeek和豆包这两个AI工具,轻松搞定Excel难题!
案例一:AI帮你写公式
场景描述
小李是公司新人,负责统计月度销售数据。他有一张销售明细表,需要:
AI帮忙怎么做
第一步:打开DeepSeek或豆包
第二步:直接描述你的需求
我有一张Excel表格,A列是销售员名字,B列是销售额。请帮我写一个公式,统计每个销售员的总销售额。
第三步:AI秒回公式
=SUMIF(A:A,"张三",B:B)
这就是传说中的SUMIF函数!AI不仅给出公式,还解释了每个参数的意思:
完整案例演示
问题1:统计张三的总销售额 → =SUMIF(A:A,"张三",B:B) → 结果:23000
问题2:找出最高销售额 → =MAX(B:B) → 结果:23000
问题3:计算平均客单价 → =AVERAGE(B:B) → 结果:14500
💡 提示:把具体需求描述得越详细,AI给的公式越精准!
案例二:AI帮你写VBA代码
场景描述
小王每天需要把100多条客户记录按地区分类,复制到不同的工作表中。手动的操作要半小时!
AI帮忙
直接告诉AI你的需求:
我需要一段VBA代码,能够:
AI秒回的代码:
Sub 按地区自动分类()
Dim ws As Worksheet
Dim lastRow As Long
Dim i As Long
Dim dict As Object
Dim area As String
Set ws = ActiveSheet
lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
Set dict = CreateObject("Scripting.Dictionary")
' 提取所有地区
For i = 2 To lastRow
area = ws.Cells(i, 1).Value
If Not dict.Exists(area) Then
dict.Add area, ""
End If
Next i
' 每个地区创建工作表并复制数据
For Each area In dict.Keys
Dim newWs As Worksheet
Set newWs = Worksheets.Add(After:=Worksheets(Worksheets.Count))
newWs.Name = area
ws.Rows(1).Copy newWs.Rows(1)
Dim newRow As Long
newRow = 2
For i = 2 To lastRow
If ws.Cells(i, 1).Value = area Then
ws.Rows(i).Copy newWs.Rows(newRow)
newRow = newRow + 1
End If
Next i
Next
MsgBox "分类完成!共创建 " & dict.Count & " 个工作表"
End Sub
代码使用方法
⚠️ 新手注意:第一次运行可能需要启用宏,在Excel提示时点击"启用内容"即可。
案例三:复杂公式AI帮你搞定
场景描述
财务小张需要计算员工绩效:
- 实际工资 = 基本工资 + 绩效奖金 - 请假扣款
- 如果实际工资>8000,交税5%
这涉及嵌套IF函数,新手根本写不出来!
AI帮忙
提问: Excel表格中,A列是基本工资,B列是绩效奖金,C列是请假扣款。请帮我写一个公式,计算实际工资,如果超过8000元需要扣除5%的税。
AI回复:
=(A2+B2-C2)*IF(A2+B2-C2>8000,0.95,1)
公式解读:
(A2+B2-C2) ' 先算出基本工资+奖金-扣款
IF(A2+B2-C2>8000, ' 判断是否超过8000
0.95, ' 超过则打95折(交5%税)
1) ' 不超过则全额
* (A2+B2-C2) ' 最后乘以工资
更多实用提示
提问公式需求的万能模板
我的表格结构是:[描述列的内容]
我想要:[描述你想要的结果]
条件是:[如果有条件的话]
常见公式问题AI都能解答
总结
AI工具真的是Excel小白的救星!
- 公式不会
- VBA不懂
- 复杂逻辑
推荐工具:
- 🧠 DeepSeek - 推理能力强,适合复杂问题
💬 你学会了吗?
如果你有具体的Excel问题,欢迎在评论区留言,下期可能就帮你解决!
本文适合Excel新手入门,高手请绕道~