VBA Choose işlevi, bağımsız değişken listesinden belirli bir sayıyla bir değer döndürür.
Choose(sayı, değer_1, değer_2, değer_3, vb.)
"choice" değişkeninde yazılan sayıya göre 3 değerden birinin görüntülenmesi:
Sub ChooseExample1() choice = 1 course = Choose(choice, "Excel", "VBA", "Google Sheets") MsgBox "Seçilen ders:" & course 'Şu mesajı döndürür: "Seçilen kurs: Excel" End Sub
Choose işlevine bir alternatif, bir dizi (Array) kullanmaktır:
Sub ChooseExample2() choice = 1 course = Array("Excel", "VBA", "Google Sheets")(choice) MsgBox "Seçilen ders:" & course 'Şu mesajı döndürür: "Seçilen kurs: VBA" End Sub