|
Cells(20, 25).Value = Worksheet.Function("=sum(range("U3:U115")-sum(range("w3:w115"))-sum(range("x3:x115")) _
-sum(range("y3:y115"))-sum(range("z3:z115"))-sum(range("aa3:aa115"))-sum(range("ab3:ab115")))
VBA中应用worksheet.function功能,后面的公式是这样写吗?正确是怎么样写?谢谢
回复 jiangslly 的帖子
- Sub jianyan() '目的:检验根据加工厂竖向求得的工资是否与根据汇总得到的工资是否相等
- Dim r As Integer, c As Integer, d As Integer
-
- Sheet4.Select
- Sheet4.Cells(20, 25).Value = s
- With Sheet12
- For i = 3 To 115
- s1 = s1 + .Range("V" & i)
- For j = 24 To 29
- s2 = s2 + .Cells(i, j)
- Next j
- Next i
- End With
- Sheet4.Cells(20, 25).Value = s1 - s2
- '根据加工厂竖向求的的数据填入到加工厂汇总表cells(20,25)进行检验
- End Sub
复制代码
|
|