[發問] 想請問問, 想統計不重複清單數量,當A欄範圍不固定時,公式要如何改?

版主 Rank: 7 Rank: 7 Rank: 7

ML089

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

3^#

發表於 2021-8-9 17:26 | 只看該作者

當A欄範圍不固定時，可設 "名稱" 為動態範圍，比較好寫公式

上功能表 - 公式 - 名稱管理員 - 增加 AA 名稱公式如下
=OFFSET(Sheet1!$A$2,,,COUNTA(Sheet1!$A:$A)-1)

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

帖子: 163
主題: 27
精華: 0
積分: 193
點名: 0
作業系統: winsows 10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
註冊時間: 2010-12-20
最後登錄: 2024-5-9

4^#

發表於 2021-8-10 09:59 | 只看該作者

回復 2# samwang

不好意思!公司會擋壓縮~~

peter460191

帖子: 163
主題: 27
精華: 0
積分: 193
點名: 0
作業系統: winsows 10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
註冊時間: 2010-12-20
最後登錄: 2024-5-9

5^#

發表於 2021-8-10 11:35 | 只看該作者

回復 3# ML089

版主,不好意思!
不是很了解要怎麼定義,已請人幫我代壓縮檔案了,可是還是無法上傳至網頁
我重新上傳一個圖檔請幫忙一下,謝謝了 ~~

peter460191

samwang

大學生 Rank: 4

帖子: 976
主題: 7
精華: 0
積分: 1018
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 50
性別: 男
註冊時間: 2013-4-19
最後登錄: 2024-10-30

6^#

發表於 2021-8-10 12:23 | 只看該作者

回復 4# peter460191

Sub test()
Dim Arr, xD, xD1
Set xD = CreateObject("Scripting.Dictionary")
Set xD1 = CreateObject("Scripting.Dictionary")
Arr = Range("A1:B" & [A65536].End(3).Row)
For i = 2 To UBound(Arr)
xD(Arr(i, 1)) = ""
xD1(Arr(i, 2)) = ""
Next
[D3] = xD.Count
[E3] = xD1.Count
End Sub

帖子: 163
主題: 27
精華: 0
積分: 193
點名: 0
作業系統: winsows 10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
註冊時間: 2010-12-20
最後登錄: 2024-5-9

7^#

發表於 2021-8-10 12:44 | 只看該作者

回復 6# samwang
謝謝 samwang的指導,用VBA可以統計出來
但還是想問如果只用公式或陣列,有辦法可統計出來嗎?

peter460191

版主 Rank: 7 Rank: 7 Rank: 7

ML089

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

8^#

發表於 2021-8-10 17:23 | 只看該作者

回復 5# peter460191

1
固定範圍公式
=SUMPRODUCT(1/COUNTIF(A2:A40,A2:A40))

2
不固定範圍公式
=SUMPRODUCT(1/COUNTIF(OFFSET(A2,,,COUNTA(A:A)-1),OFFSET(A2,,,COUNTA(A:A)-1)))

3
定義名稱 AA = OFFSET($A$2,,,COUNTA(A:A)-1)

4
不固定範圍公式，採用"名稱"簡化
=SUMPRODUCT(1/COUNTIF(AA,AA))

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

帖子: 163
主題: 27
精華: 0
積分: 193
點名: 0
作業系統: winsows 10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
註冊時間: 2010-12-20
最後登錄: 2024-5-9

9^#

發表於 2021-8-11 11:07 | 只看該作者

回復 8# ML089
非常謝謝版主,可以統計出來,也都了解先定義後簡化公式的用法了,您太厲害了~~

peter460191