麻辣家族討論版版 » Excel程式區 » 兩組數值去除重複的資料後排序

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

兩組數值去除重複的資料後排序

中學生 Rank: 2

帖子: 17
主題: 5
精華: 0
積分: 71
點名: 0
作業系統: window
軟體版本: google
閱讀權限: 20
性別: 男
註冊時間: 2017-6-27
最後登錄: 2024-3-14

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2023-3-19 20:30 | 顯示全部帖子

兩組數值去除重複的資料後排序

本帖最後由 henry860608 於 2023-3-19 20:31 編輯

已知A、B兩列有兩組數值，想要透過公式將兩組數值有重複的部分去除，並將資料依數值大小排序(如下面C列)

A       B
1       1
3       4
6       7
9       9
12       10
15       14
18       16
21       18
24       22
27       37
30       46
33       57
36       80

C
1
3
4
6
7
9
10
12
14
15
16
18
21
22
24
27
30
33
36
37
46
57
80

樓主熱帖

收藏

中學生 Rank: 2

帖子: 17
主題: 5
精華: 0
積分: 71
點名: 0
作業系統: window
軟體版本: google
閱讀權限: 20
性別: 男
註冊時間: 2017-6-27
最後登錄: 2024-3-14

2^#

發表於 2023-3-20 23:01 | 顯示全部帖子

好喔感謝大大熱情分享晚點就來試試看

中學生 Rank: 2

帖子: 17
主題: 5
精華: 0
積分: 71
點名: 0
作業系統: window
軟體版本: google
閱讀權限: 20
性別: 男
註冊時間: 2017-6-27
最後登錄: 2024-3-14

3^#

發表於 2023-3-21 11:35 | 顯示全部帖子

回復 4# singo1232001
不好意思大大，可以問一下這四行是甚麼意思?
小弟對SQL涉獵淺薄

q = "select a as a from [工作表1$A1:A] " & vbCrLf & " union all "
q = q & vbCrLf & " select b as a from [工作表1$B1:B]"
q = "select distinct a from (" & q & ") order by a "
s.Range("d2").CopyFromRecordset .Execute(q)

複製代碼

中學生 Rank: 2

帖子: 17
主題: 5
精華: 0
積分: 71
點名: 0
作業系統: window
軟體版本: google
閱讀權限: 20
性別: 男
註冊時間: 2017-6-27
最後登錄: 2024-3-14

4^#

發表於 2023-3-23 00:58 | 顯示全部帖子

回復 11# Andy2483

好喔，等小的參考其他大老的方法後就會傳上來給各位參考

中學生 Rank: 2

帖子: 17
主題: 5
精華: 0
積分: 71
點名: 0
作業系統: window
軟體版本: google
閱讀權限: 20
性別: 男
註冊時間: 2017-6-27
最後登錄: 2024-3-14

5^#

發表於 2023-3-23 01:00 | 顯示全部帖子

回復 11# Andy2483

好喔，等小的參考其他大老的方法後就會傳上來給各位參考

靜思自在 : 慈悲沒有敵人，智慧不起煩惱。

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