VBA Choose फ़ंक्शन किसी दिए गए नंबर के साथ अपनी तर्क सूची से एक मान लौटाता है।
Choose(संख्या, मान_1, मान_2, मान_3, आदि)
"पसंद" चर में लिखी संख्या द्वारा 3 मानों में से एक का प्रदर्शन:
Sub ChooseExample1()
choice = 1
course = Choose(choice, "Excel", "VBA", "Google Sheets")
MsgBox "चयनित पाठ्यक्रम:" & course 'संदेश लौटाता है: "चयनित पाठ्यक्रम: Excel"
End Sub
Choose फ़ंक्शन का एक विकल्प एक सरणी (Array) का उपयोग करना है:
Sub ChooseExample2()
choice = 1
course = Array("Excel", "VBA", "Google Sheets")(choice)
MsgBox "चयनित पाठ्यक्रम:" & course 'संदेश लौटाता है: "चयनित पाठ्यक्रम: VBA"
End Sub