Question

请高手帮忙写个Excel公式

销售业绩,需要同时满足两个条件，比如1到10出勤，业绩1到9，按10块单价计算，出勤10到15，业绩10到15，按15计算，以此类推，假如出勤10到15，业绩1到9，就按10单价计算。请高手予以解答

Answer 1

可以做个表格，显示具体分了哪几段。再用if()套用，来判断结果。下图可以用公式判断。

追问

完整的对应是这样的，怎么写公式

追答

模糊查找公式：
=INDEX(Sheet1!$C$3:$G$6,LOOKUP(C2,{1,10,15,20},{1,2,3,4}),LOOKUP(B2,{0,1,10,16,22},{1,2,3,4,5}))

Answer 2

请施工队帮忙修整一条公路，其中一段有坑，其中一段翻浆，有的地方支路也断了，以此类推。
反正我就不告诉你哪条路要修，哪有坑，哪翻浆，哪条支路断了，你自己猜去吧。

追答

这就是你问的问题

追问

。。。

就是有几种定额，每种定额必须达到次数和业绩的双重条件，有可能存在比如10次只能做到业绩1个，就按10单价计算

追答

还是不告诉这条路在哪，那么我也只能把材料给你你自己去修路了
=if(and(a1>10,a2>9),15*a2,10*a2)

追问

大神，你直接说我哪里没讲清楚，我脑子不好使啊，别用隐喻

追答

如果a1是出勤a2是业绩，那么就像我那么写，如果你无法说清楚在哪，那么就请上截图

追问

一、a列出勤次数 b列业绩
二、1到10次出勤0个业绩，c列显示0
1到10次出勤1到10个业绩，c列显示10，11到15出勤，11到15业绩，c列显示15，16到20出勤，16到20业绩，c列显示20，21出勤以上，20业绩以上，显示30，11到15出勤，业绩1到10，或者16以上，c列应该显示10。
我这么说，可能明白?谢谢大神!

追答

还是没说清楚，1，出勤是不是一定比业绩多（我推测的）2，你的倒数第二句话--11到15出勤，业绩1到10，或者16以上，c列应该显示10。--什么东西16以上，业绩还是出勤。
如果出勤比一定业绩多的话，那么还看什么出勤，直接看业绩就行了
如果出勤不一定比业绩多的话，你给的条件里并没写出勤20以下业绩20以上应该怎么算单价，也没写16到20出勤，15以下或21以上业绩怎么算单价，不是我说你啊，还有很多调价都没写，这个需求漏洞百出让人怎么帮。
代码都给你写好了，完全按你的需求来，但是怎么看都不符合逻辑。你要是觉得没问题就把代码拿走，你要是觉得需求还能说的更清楚一点那你就再组织下语言，说清需求。

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Column
Case Is > 2
Case Else
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
If Cells(i, 1) < 1 Or Cells(i, 2) < 0 Then
ElseIf Cells(i, 1) < 11 And Cells(i, 2) = 0 Then
Cells(i, 3) = 0
ElseIf Cells(i, 1) < 11 And Cells(i, 2) < 11 Then
Cells(i, 3) = 10
ElseIf Cells(i, 1) < 16 And Cells(i, 2) < 11 Then
Cells(i, 3) = 10
ElseIf Cells(i, 1) < 16 And Cells(i, 2) < 16 Then
Cells(i, 3) = 15
ElseIf Cells(i, 1) < 16 Then
Cells(i, 3) = 10
ElseIf Cells(i, 1) < 21 And Cells(i, 2) < 16 Then
ElseIf Cells(i, 1) < 21 And Cells(i, 2) < 21 Then
Cells(i, 3) = 20
ElseIf Cells(i, 1) >= 21 And Cells(i, 2) >= 20 Then
Cells(i, 3) = 30
End If
Next
End Select
End Sub

'下图是我的测试结果

或者说我再猜测下你的需求，是不是这样的

猜测三：按出勤和业绩里面最低的来，哪个低算哪个，然后最低的那一项满足为0的话单价是0，1-10的话单价是10，11-15的话单价是15，16-20的话单价是20，21以上的话单价是30。

像我这样说是不是一句话就讲清楚了。

如果是猜测三的话代码应该修改为

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Column
Case Is > 2
Case Else
For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row
Mini = Cells(i, 1)
If Cells(i, 1) > Cells(i, 2) Then Mini = Cells(i, 2)
Select Case Mini
Case Is < 1
Cells(i, 3) = 0
Case Is < 11
Cells(i, 3) = 10
Case Is < 16
Cells(i, 3) = 15
Case Is < 21
Cells(i, 3) = 20
Case Else
Cells(i, 3) = 30
End Select
Next
End Select
End Sub

'

测试结果如下

追问

完整的对应表是这样的

追答

早发这个图早解决了

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Select Case Target.Column
Case Is > 2
Case Else
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Int(Cells(i, 1)) < 1 Or Int(Cells(i, 2)) < 1 Then
Cells(i, 3) = 0
ElseIf Int(Cells(i, 1)) < 10 Or Int(Cells(i, 2)) < 10 Then
Cells(i, 3) = 10
ElseIf Int(Cells(i, 1)) < 16 Or Int(Cells(i, 2)) < 15 Then
Cells(i, 3) = 15
ElseIf Int(Cells(i, 1)) < 22 Or Int(Cells(i, 2)) < 20 Then
Cells(i, 3) = 20
ElseIf Int(Cells(i, 1)) >= 22 Or Int(Cells(i, 2)) >= 20 Then
Cells(i, 3) = 30
End If
Next
End Select
End Sub

用法和测试结果都在上面的图里