恳请大神们帮忙看下这个指定条件要求显现的数字

qiongmei6

我想在附件的ab列求得一个代码，就是当n列是属于合同工的时候，如果c列是办公室，则ab列单元格对应出现1000，当n列是属于合同工的时候，如果c列是教师，则ab列单元格对应出现500，当n列是属于合同工的时候，如果c列是不是教师也不是办公室，则ab列单元格对应出现200，，当n列是属于非合同工的时候，则ab列单元格对应出现空白，目前的ab列就是我希望得到的最后结果，这个之前是发过两个条件的，现在三个条件了，就不知道咋改了，谢谢各位大神的帮忙

cjc209

=IFS(AND(N3="合同工",C3="办公室"),1000,AND(N3="合同工",C3="教师"),500,AND(N3="合同工",C3<>"办公室",C3<>"教师"),200,TRUE,"") 下拉

qiongmei6

我这个地方不能用公式，恳请大神用代码解决

ykcbf1100

附件供参考。。。

ykcbf1100

参与一下。。。

1. Sub ykcbf()  '//2024.2.2
   
2.     r = Me.Cells(Rows.Count, 2).End(3).Row
   
3.     arr = Me.Range("a1").Resize(r, 28)
   
4.     For i = 3 To UBound(arr)
   
5.         If InStr(arr(i, 14), "合同工") Then
   
6.             Select Case arr(i, 3)
   
7.                 Case Is = "办公室"
   
8.                     arr(i, 28) = 1000
   
9.                 Case Is = "教师"
   
10.                     arr(i, 28) = 500
    
11.                 Case Else
    
12.                     arr(i, 28) = 200
    
13.             End Select
    
14.         Else
    
15.             arr(i, 28) = ""
    
16.         End If
    
17.     Next
    
18.     Me.Range("a1").Resize(r, 28) = arr
    
19. End Sub
    

复制代码