直式改橫式搜尋的公式 - Excelㄧ般區

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

11^# 跳轉到 »

發表於 2019-9-13 09:32 | 只看該作者

回復 10# papaya

"a" ~ "z" 比數字大即可

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

12^#

發表於 2019-9-13 10:15 | 只看該作者

回復 11# 准提部林

感謝您的說明。
瞭解了!

中秋快樂^^

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

13^#

發表於 2019-9-22 13:56 | 只看該作者

回復 9# 准提部林
符合條件的值齊聚1個儲存格

符合條件的值齊聚1個儲存格.rar (2.88 KB)
准提版主:
不好意思，我想將Sheet1!L1的公式，再進階為如Sheet2的L1︰將符合條件的值，齊聚放置在1個儲存格，
這樣就毋需再預留許多個儲存格。

請問您︰Sheet2!L1的函數公式要如何編撰？
謝謝您！

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

14^#

發表於 2019-9-22 17:33 | 只看該作者

回復 13# papaya

箱號確認只有1~9箱??? 且為純數字???

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

15^#

發表於 2019-9-22 20:51 | 只看該作者

本帖最後由 papaya 於 2019-9-22 21:00 編輯

回復 14# 准提部林
准提版主 :
謝謝回應。

1_每日出貨箱數不一定，但目前的出貨數不會超過100箱，也就是箱號最多為1~99號。
2_箱號都為純數值編號。
3_同數量的重複個數最多10個。
以上敬請賜教!
謝謝您^^

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

16^#

發表於 2019-9-23 09:55 | 只看該作者

回復 15# papaya

我還用舊版excel, 無法串接太多文字,
建議用vba

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

17^#

發表於 2019-9-23 12:25 | 只看該作者

回復 16# 准提部林
准提版主 :
謝謝您的回應。

VBA非常棒，但是我不懂，怕不好(會)維護。
我有仔細查看公司以往的紀錄，重複數量的最高紀錄是6個，
如果不行，看貴EXCEL版能容許有幾個，就幾個。其它不足的，我再想辦法。

原有的表格是模擬題，所以將查詢表移到A8:B8
如圖示 :

再次感謝您^^

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-26

18^#

發表於 2019-9-23 19:52 | 只看該作者

回復 17# papaya

用VBA自訂函數, 與公式用法相同:

符合條件的值齊聚1個儲存格V1.rar (7.29 KB)

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

19^#

發表於 2019-9-23 23:38 | 只看該作者

本帖最後由 papaya 於 2019-9-23 23:50 編輯

回復 18# 准提部林
准提版主:
真棒的解答。
這樣我只要不動程式碼，只要改公式查詢的位址就可以了。
感謝您耐心的解題和指導。

Andy2483

　暱稱: 厚臉皮的學生

大學生 Rank: 4

帖子: 1446
主題: 40
精華: 0
積分: 1470
點名: 0
作業系統: Windows 7
軟體版本: Excel 2010 & 2016
閱讀權限: 50
性別: 男
來自: 台灣
註冊時間: 2020-7-15
最後登錄: 2024-10-21

20^#

發表於 2023-5-31 08:58 | 只看該作者

回復 18# 准提部林

謝謝論壇,謝謝前輩
後學藉此帖學習前輩的方案,方案學習心得註解如下,請前輩再指導

執行結果:

Function GetCTNo(xA As Range, xB As Range, xNo)
'↑自訂函數GetCTNo(),宣告變數:(xA,xB)是儲存格變數,xNo是通用型變數
'函數結果是字串
Dim i%, TT$
'↑宣告變數:i是短整數,TT是字串變數
For i = 1 To xA.Count
'↑設順迴圈!i從1 到xA變數數量(儲存格數量)
If xA(i) = xNo Then TT = TT & "," & xB(i)
'↑如果xA i迴圈儲存格的值與 xNo變數相同!
'就令TT變數將xB i迴圈儲存格的值納入到後方,以逗號間隔
Next i
GetCTNo = Mid(TT, 2)
'↑令GetCTNo函數回傳 TT變數從第2字元開始的後方字串
End Function

用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流