1樓：
[原創]
public function tjqh(r1 as range, tj, optional r2)
dim arr1, arr2, i as long, j as long, s as double, f as boolean
arr1 = r1.value
if ismissing(r2) then
arr2 = r1.value
else
arr2 = r2.value
end if
s = 0
if not (tj like "[= ,< , <= ,> ,>= , <> ]" & "*") and isnumeric(tj) then
tj = "=" & tj
end if
for i = 1 to ubound(arr1)
for j = 1 to ubound(arr1, 2)
if not (tj like "[= ,< , <= ,> ,>= , <> ]" & "*") then
if arr1(i, j) = tj then s = s + val(cstr(arr2(i, j)))
else
if evaluate(val(arr1(i, j)) & tj) then s = s + val(cstr(arr2(i, j)))
end if
next j
next i
tjqh = s
end function
把**貼上到模組中，然後在工作表中就可象輸入sumif函式一樣使用這個自定義的tjqh函式。
=tjqh(條件區域,條件[,求和區域])
2樓：匿名使用者
舉例如下，自己根據需要修改
sub ss()
for i = 1 to n 'n你自己賦值啦if cells(i,1)="你自己設" thensum=sum+cells(i,2)
end if
next
end sub
3樓：匿名使用者
range("d1") = "=sumif(a2:a6,""b"",b2:b6)"
excel vba呼叫excel函式示例-sumif()條件求和
4樓：excel小奇
1、示例**：
sub test1()
dim x as long
x = worksheetfunction.sumif(range("a2:a9"), range("c2").value, range("b2:b9"))
range("d2").value = xend sub
2、如下圖：
3、以上**的作用是：呼叫工作表函式sumif，求a2:a9範圍內符合c2單元格條件，對應的b2:b9範圍內數值之和，結果輸出到d2單元格。
5樓：朱仕平
range("d1") = worksheetfunction.sumif(range("a:a"), range("b2"), range("c:c"))
這個是與函式
d1單元格輸入函式
=sum(a:a,b2,c:c)
是一樣的
6樓：太極健
range("d1") = function.sumif(range("a:a"), range("b2"), range("c:c"))
vba在excel中使用sumif公式查詢對應項
7樓：楊華山
public sub 條件求和()
for han = 1 to sheets("sheet2").usedrange.rows.count
xingming = sheets("sheet2").cells(han, 1)
shuju = 0
for y = 1 to sheets("sheet1").usedrange.rows.count
xingming1 = sheets("sheet1").cells(y, 1)
if xingming = xingming1 then
shuju = shuju + sheets("sheet1").cells(y, 2)
end if
next y
sheets("sheet2").cells(han, 2) = shuju
next han
end sub
8樓：匿名使用者
碼中專「 cells(a, 1)」表示第
屬a行第1列
9樓：匿名使用者
i = sheets("sheet1").usedrange.rows.count 'i為sheet1中的有效行數
回for a = 1 to sheets("sheet2").usedrange.rows.count
sheets("sheet2").cells(a, 2) = "=sumif(sheet1!
答r1c1:r" & i & "c1,rc[-1],sheet1!r1c2:r" & i & "c2)"
next
請問誰知道Excel中，可否使計算的結果只保留整數位，且如有小數的話無論是多少都向前進一位
roundup 0,0 直接輸入這個公式就可以。如果結果是整數如25，輸入公式後結果為25如果有小數位，無論多少，如25.03，得出結果為26 用這個函式就可以 roundup number,num digits number 為需要向上舍入的任意實數。num digits 四捨五入後的數字的位數。...
用excel中SUMIF 進貨 B B, 甲 ,進貨 C C是什麼意思
呵呵 你這個是跨 條件求和！意思是說，在當前頁面統計 請看註釋 語法sumif range,criteria,sum range sumif 函式語法具有以下引數 引數 為操作 事件 方法 屬性 函式或過程提供資訊的值。range 必需。用於條件計算的單元格區域。每個區域中的單元格都必須是數字或名稱...
請問EXCEL中的Sumif函式引用是如何選定的呢？如 D 6 I 268,謝謝
sumif 條件求和 這個函式要求的格式是sumif 引數1，引數2，引數3 引數1 就是公式中的 明細 d 6 i 268，這是查詢的範圍，你想在多大範圍內查詢，就寫多大範圍 引數2 就是公式中的彙總！f7，這是查詢的內容，就是說在上面說的查詢的範圍內查詢這個東東 引數3 就是公式中的 明細 i ...