返回列表 上一主題 發帖

application.sumif

回復 1# t8899
  1. Option Explicit
  2. Sub EX()
  3.     Dim S_ALL As Single, I As Integer
  4.     I = 2
  5.     Do While Cells(I, "A") <> ""
  6.         If Month(Cells(I, "A")) = 9 Then S_ALL = S_ALL + Cells(I, "B")
  7.         I = I + 1
  8.     Loop
  9.     MsgBox S_ALL
  10. End Sub
複製代碼
工作表上的加總
用資料庫加總函數,加總
   

資料庫準則設立
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 3# t8899
工作表SUMIF 的準則: 只可以用"> < = <>"的條件式計算,不可以用  MONTH(???)=? 的函數式計算.

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

        靜思自在 : 君子如水,隨方就圓,無處不自在。
返回列表 上一主題