[發問] 多重條件式統計與加總

b9208

各位先進們好！
多重條件式統計與加總
如附件，雖然可以用 {=SUM(  )}完成
但請先進們可否用VBA程式來執行
非常感謝指導
B.rar (5.4 KB)

下載次數: 19

2010-5-11 23:27

b9208

各位先進前輩
次數統計問題己解決，但數量加總懇請協助指導。
例如：
[E35]之值為單號=ABS and 地區=WZ and 品名=K 符合上述三條件之銷售數量加總。
請看附件B1
下列程式如何修改成可以加總
For i = 5 To 11
For m = 35 To 42
.Cells(m, i) = f(.Cells(10, i) & .Cells(m, 3) & .Cells(m, 4))
Next m
Next i

感謝

B1.rar (20.62 KB)

下載次數: 8

2010-5-14 17:16

b9208

各位先進前輩
上網查詢到使用 Application.Evaluate("sumproduct()")
程式碼如下：但執行後儲存格內為〞#NAME?〞
懇請前輩們指導。
m = Sheets("Re").Range("C65536").End(xlUp).Row
For i = 5 To 11
    For j = 35 To 42        
        Cells(j, i) = Application.Evaluate("sumproduct((MID(Re!C7:C100, 5, 3) = cells(34, i))*(Re!K7:K100 = cells(j, 3))*(Re!AM7:AS100 = cells(j, 4))*(Re!BA7:BG100))")
    Next j
Next i

b9208

抱歉上信沒有附加檔案 B2.rar

B2.rar (20.85 KB)

下載次數: 14

2010-5-15 14:15

HUNGCHILIN

這種類型資料彙整
照正常來說 使用樞紐分析比較快

但看了data
data排列要再修正
才會更好執行
長期來說修正data使用樞紐會更方便

b9208

感謝阿吉兄
熱心指導說明，但〞樞紐分析〞超出小弟的能力太多了。
還是感謝您

PD961A

感謝阿吉兄
熱心指導說明，但〞樞紐分析〞超出小弟的能力太多了。
還是感謝您
b9208 發表於 2010-5-16 00:26

    您好
其實樞紐分析
比VBA整理資料快很多
也沒那麼複雜
照步驟做....不會太難! B2-2樞紐分析概圖.rar (136.33 KB)

下載次數: 19

2010-5-16 19:50

謝謝!

b9208

各位前輩
以下使用R1C1方式可用，供大家參考。

For i = 5 To 11
    For j = 35 To 42
       Cells(j, i).FormulaR1C1 = "=SUMPRODUCT((MID(Re!R7C3:R100C3, 5, 3) =R34C)*(Re!R7C11:R100C11 =RC3)*(Re!R7C39:R100C45 =RC4)*(Re!R7C53:R100C59))"
       Cells(j, i) = Cells(j, i).Value
    Next
Next

請指導一下：上式中 R34C 及 RC3 代表什麼，因書中R OR C 後面有數字，如 R5C7, R10C70.....
例如
Cells(35, 5).FormulaR1C1 ====> R34C = ?,     RC3 = ?
Cells(36, 5).FormulaR1C1 ====> R34C = ?,     RC3 = ?
Cells(35, 6).FormulaR1C1 ====> R34C = ?,     RC3 = ?

Hsieh

回復 8# b9208


    這方法就是寫公式,何必多此一舉
R1C1表示法
R1C1→A1
RC1→同列A欄
R1C→同欄第一列
R[1]C→同欄下一列
RC[1]→同列向右一欄

Hsieh

回復 8# b9208


    若真的不去改變資料庫格式,不嫌麻煩的話
參考附件 B2.rar (20.77 KB)

下載次數: 35

2010-5-18 23:25