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

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

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

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

高中生 Rank: 3 Rank: 3

帖子: 508
主題: 53
精華: 0
積分: 583
點名: 91
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2024-5-4

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

帖子: 508
主題: 53
精華: 0
積分: 583
點名: 91
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2024-5-4

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

複製代碼

靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候，卻被這種隨心所欲的自由蒙蔽，虛擲時光而毫無覺知。

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