PJChen

　暱稱: PJ

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

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

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2019-12-7 20:50 | 只看該作者

帶出對應值

Dear,

飛比.sheet的料號跟這個工作表相同時
且飛比.sheet的EU:EX欄,出現711 (會在EU:EX欄中變動,不是固定的)
則從飛比.sheet的FK:FN欄,找到對應的值,帶入到F欄中
飛比.sheet的EY:FJ欄是盤點數據
若711出現在CK_1,則把相對應的日期1的日期帶入C欄的日印
也就是711是一個依據,帶出
如同現在C欄及F欄帶出的範例值(當然這裡的料號也會變動)
請問要在這2欄如何下公式?

帶出對應值.rar (22.96 KB)

樓主熱帖

Andy2483

　暱稱: 厚臉皮的學生

碩士班 Rank: 5 Rank: 5

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

12^#

發表於 2023-1-5 15:05 | 只看該作者

本帖最後由 Andy2483 於 2023-1-5 15:09 編輯

回復 6# PJChen

謝謝前輩發表此主題與範例
今天學習 http://forum.twbts.com/thread-23571-1-1.html 此帖初次學到Switch 函數,
後學藉此帖練習VBA Switch 函數,請參考
謝謝准提部林前輩

執行前:

執行結果:

Option Explicit
Sub 帶出對應值_1()
Dim Brr, i&, j&, K%, S$
Brr = Range([比菲多!Q4], [比菲多!A65536].End(3))
For i = 1 To UBound(Brr)
ReDim T(1 To 5)
For j = 1 To 5
T(j) = Val(Replace(Brr(i, j), "W", 1))
Next
K = Switch(T(2) > 0, 6, T(3) > 0, 9, T(4) > 0, 12, T(5) > 0, 15, T(1) > 0, 1)
Brr(i, 1) = Brr(i, K)
Next
[W:W].ClearContents
[比菲多!W4].Resize(UBound(Brr), 1) = Brr
Set Brr = Nothing: Erase T
End Sub

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

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

11^#

發表於 2022-1-7 12:21 | 只看該作者

回復 10# PJChen

TEXT(???,"正數;負數;零;文字")

TEXT(IF(B4:E4="",-1,B4:E4),"1;;1;!1")
空格--轉成-1
正數以1表示, 負數"", 零以1表示, 文字以1表示

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

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

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

10^#

發表於 2022-1-6 21:10 | 只看該作者

回復 9# 准提部林

准大,

執行沒問題了,能否幫忙解說下語法?
=IFERROR(CHOOSE(MATCH(1,--TEXT(IF(B4:E4="",-1,B4:E4),"1;;1;!1"),),F4,I4,L4,O4),A4)

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

9^#

發表於 2022-1-6 20:29 | 只看該作者

回復 8# PJChen

=IFERROR(CHOOSE(MATCH(1,--TEXT(IF(B4:E4="",-1,B4:E4),"1;;1;!1"),),F4,I4,L4,O4),A4)

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

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

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

8^#

發表於 2022-1-6 19:46 | 只看該作者

回復 7# 准提部林
准大好,
以下紅色是手誤,之前打錯了,以下為正確！
B欄數值>=0,則帶出F欄的值
當B欄<0,則看C欄,依此類推

這二個寫法,當B欄為0,會帶出I欄的值,而不是F欄

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

7^#

發表於 2022-1-6 13:24 | 只看該作者

本帖最後由准提部林於 2022-1-6 13:26 編輯

回復 6# PJChen

=IFERROR(CHOOSE(MATCH(1=1,--TEXT(B4:E4&0,"0;;;!1")>0,),F4,I4,L4,O4),A4)
或
=IFERROR(CHOOSE(MATCH(1,--TEXT(B4:E4&0,"1;;;!1"),),F4,I4,L4,O4),A4)

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

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

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

6^#

發表於 2022-1-5 20:11 | 只看該作者

回復 5# 准提部林
准大好,

我修改了檔案,用以測試
當B:E出現W的文字時,無法帶出正確的對應值

數值大於等於0_則帶出對應日期_r1.rar (41.54 KB)

TOP

准提部林

版主 Rank: 7 Rank: 7 Rank: 7

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

5^#

發表於 2022-1-5 13:33 | 只看該作者

回復 4# PJChen

陣列公式
=IFERROR(CHOOSE(MATCH(1=1,--(B4:E4&0)>0,),F4,I4,L4,O4),A4)

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

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

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

4^#

發表於 2022-1-4 22:53 | 只看該作者

回復 2# 准提部林
准大好,
想請教一個類似的對應問題,

數值大於等於0_則帶出對應日期.rar (38.4 KB)
1.. B:E為判斷的來源,小於0 或者B:E全空白,則帶出A欄的日期
2.. 列3著色相同的,是對應的欄位
3.. B欄數值>=0,則帶出F欄的值
當B欄值>0,則看C欄,依此類推
4.. B:E有時會有文字W及特別的數字711
這2個值視為符合條件
例如:B26=711,則帶出1/18
B29=W,則帶出對應值1/18
5.. 原本想用match,但B4的索引值,要如何讓它可以
小於0 或者B空白,則跳C4,依此類推....
S3=CHOOSE(MATCH(B4,B4:E4,),F4,I4,L4,O4)

TOP