如何將多個IF化繁為簡？ - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 如何將多個IF化繁為簡？

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

[發問] 如何將多個IF化繁為簡？

高中生 Rank: 3 Rank: 3

帖子: 533
主題: 58
精華: 0
積分: 613
點名: 261
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2026-11-1

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章 2015羊年全勤獎章熱烈參與勳章

1^# 跳轉到 »

發表於 2014-5-13 12:31 | 顯示全部帖子

回復 1# av8d

這個符合需求?

Sub chooseVar()
look1 = 1
look2 = 2
look3 = 3
aa = Choose([B5], look1, look2, look3)
bb = Switch([B5] = 1, look1, [B5] = 2, look2, [B5] = 3, look3)
End Sub

複製代碼

高中生 Rank: 3 Rank: 3

帖子: 533
主題: 58
精華: 0
積分: 613
點名: 261
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2026-11-1

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章 2015羊年全勤獎章熱烈參與勳章

2^#

發表於 2014-5-13 13:27 | 顯示全部帖子

本帖最後由 Scott090 於 2014-5-13 13:33 編輯

回復 1# av8d

或者：

On [B5] GoTo look1, look2, look3
On [B5] GoSub look1, look2, look3

複製代碼

靜思自在 : 有心就有福，有願就有力，自造福田，自得福緣。

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