返回列表 上一主題 發帖

[發問] IF多重判斷，請幫忙，謝謝!(VBA寫法轉成函數寫法)

chiang0320

帖子
45 
主題
15 
精華
0 
積分
92 
點名
0  
作業系統
? 
軟體版本
? 
閱讀權限
20 
註冊時間
2016-3-17 
最後登錄
2019-11-19 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2016-5-2 12:44 | 只看該作者

[發問] IF多重判斷，請幫忙，謝謝!(VBA寫法轉成函數寫法)

1.jpg

寫在G3儲存格

將此VBA寫法改成函數寫法

If Sheets("工作表1").Cells(I, "D") < 0.5 Then

Sheets("工作表1").Cells(I, "G") = "新人"

ElseIf Sheets("工作表").Cells(I, "F") = "陳奕迅" Or Sheets("Assy1").Cells(I, "F") = "劉德華" Then

Sheets("工作表").Cells(I, "G") = "leader"

ElseIf Sheets("工作表1").Cells(I, "F") = "張學友" Or Sheets("工作表").Cells(I, "F") = "郭富城" Then

Sheets("工作表1").Cells(I, "G") = "leader(代)"

ElseIf Sheets("工作表1").Cells(I, "F") = "李焜耀" Or Sheets("工作表1").Cells(I, "F") = "郭台銘" Or Sheets("工作表1").Cells(I, "F") = "小蝦" Then

Sheets("工作表1").Cells(I, "G") = "訓練員"

ElseIf Sheets("工作表1").Cells(I, "F") = "邰智源" Or Sheets("工作表1").Cells(I, "F") = "黎明" Then

Sheets("工作表1").Cells(I, "G") = "LAB專員"

ElseIf Sheets("工作表1").Cells(I, "F") > 0.5 Then

Sheets("工作表1").Cells(I, "G") = "老鳥"

End If

Next
收藏 分享

ML089

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

論壇榮譽勳章論壇贊助勳章熱烈參與勳章2014馬年全勤獎章2015羊年全勤獎章2016猴年全勤獎章
3#
發表於 2016-5-4 07:23 | 只看該作者
IF函數最多只能用7層，所以更多得層數就可以使用查詢函數如VLOOKUP、LOOKUP...等較簡單

G3=IF(D3<0.5,"新人",IFERROR(VLOOKUP(F3,{"陳奕迅","leader";"劉德華","leader";"張學友","leader(代)";"郭富城","leader(代)";"李焜耀","訓練員";"郭台銘","訓練員";"小蝦","訓練員";"邰智源","LAB專員";"黎明","LAB專員"},),"老鳥")
{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

准提部林

帖子
2834 
主題
10 
精華
0 
積分
2890 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-22 
2#
發表於 2016-5-3 21:08 | 只看該作者
依題意, 最好建對照表, 以 VLOOKUP 取對應值,
發帖時最好連檔案也上傳, 只有文字描述或圖片, 很難獲得適切的幫助!

TOP

        靜思自在 : 屋寬不如心寬。
返回列表 上一主題