返回列表下一主題上一主題發帖

[發問] 依每月最後的日期加總

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2020-3-9 21:50 | 顯示全部帖子

[發問] 依每月最後的日期加總

Dear,
請問可以非陣列的一致性公式,統計三個客戶的個別數量嗎?
依A欄每月最後的日期(不一定是月底,只抓每月最後一個日期)
分別統計C欄三個客戶數量
1) 大
2) 美
3) 佳
C欄若有其他字,則

依A欄每月最後的日期_分別統計數量.rar (11.62 KB)

樓主熱帖

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

2^#

發表於 2020-3-10 20:16 | 顯示全部帖子

回復 4# ML089
回復 6# hcm19522

感謝...這兩個解法都可以,
能否請教,我其他檔案也有不少是用陣列公式的,如果要像這樣直接打在VBA中,陣列公式要怎麼改才能用??
      xRow = Cells(Cells.Rows.Count, "A").End(xlUp).Row
         Range("D2:D" & xRow).Formula = "=IF(MAX((MONTH(A$2:A$146)=MONTH(A2))*(C$2:C$146=C2)*A$2:A$146)=A2,SUM((MONTH(A$2:A$146)=MONTH(A2))*(C$2:C$146=C2)*B$2:B$146),"")"
         Range("D2:D" & xRow).Value = Range("D2:D" & xRow).Value

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

3^#

發表於 2020-3-11 19:29 | 顯示全部帖子

回復 8# ML089
這個公式很特別,請教TEXT(A3:A33....為什麼是33 ??
D2 =IF(SUMPRODUCT((TEXT(A2,"yyyymm")=TEXT(A3:A33,"yyyymm"))*(C2=C3:C33))=0,
SUMPRODUCT(B$2:B2,(TEXT(A2,"yyyymm")=TEXT(A$2:A2,"yyyymm"))*(C2=C$2:C2)),"")

TOP

PJChen