指定した数値に対応する選択肢の値・数式を返す(Choose 関数)
Choose 関数 の使い方
Choose 関数は、指定されたインデックス値(1から利用可能な選択肢の数)に対応した値または数式を返します。
result = Choose ( index, choice-1 [, choice-2, … , choice-n ] )
引数・戻り値
- index ・・・ 採用するインデックス値(1から利用可能な選択肢の数までの範囲内の値)を指定します。
- choice-1, choice-2, … , choice-n ・・・ 各選択肢には、式・値を指定します。
- result ・・・ 引数 index が、i の場合、引数 choice-i の値(式)となります。
Choose 関数は、選択肢が1つだけ返されますが、評価はすべての選択肢に対して行われます。このため、評価すると 0 による除算エラーが発生する式が1つでも含まれている場合は、エラーとなります。
引数 index が、1未満の場合や、リストに含まれる選択肢の数を超える場合は、Choose 関数の戻り値は Null 値になります。
引数 index が整数でない場合は、最も近い整数に丸められてから評価されます。
Choose 関数 の使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Sub Sample_Choose1() Dim Kuji Kuji = Int(Rnd * 8) + 1 '1 から 8 までのランダムな整数を発生させます。 '1⇒大吉, 2⇒吉, 3⇒中吉, 4⇒小吉, 5⇒末吉, 6⇒凶, 7⇒大凶, 8⇒エラー MsgBox Choose(Kuji, "大吉", "吉", "中吉", "小吉", "末吉", "凶", "大凶") End Sub |
実行結果
Kuji = 1 ⇒「大吉」が表示される
実行結果
Kuji = 8 ⇒ 選択肢にないので、Choose 関数の戻り値は Null 値となる
関連記事
-
-
ショートカットメニュー(CommandBar オブジェクト)
ショートカットメニュー(コンテキストメニュー) 右クリックで表示されるメニューの …
-
-
日付時刻:年・月・日を取得(Year、Month、Day 関数)
日付から年・月・日を取得する関数 【書式】 date_year = Year ( …
-
-
VBA の演算子(比較演算子)
比較演算子 比較演算子による演算の結果は「真」の場合は「True」、「偽」の場合 …
-
-
文字列:アルファベットを小文字または大文字に変換(LCase 関数,UCase 関数)
LCase 関数・UCase 関数 の使い方 【書式】 <アルファベットの大文字 …
-
-
変数がオブジェクト型かどうかをチェックする( IsObject 関数 )
IsObject 関数の使い方 【書式】 result = IsObject ( …
-
-
文字列:定数(改行・タブ)
改行・タブの定数 これらの定数は、使用前に定義する必要はありません。コード中のど …
-
-
フォント名(Name,ThemeFont,StandardFont)
フォント名を取得・設定する(Name プロパティ) Name プロパティは、オブ …
-
-
対象のオブジェクトをクリアする(Clear メソッド)
Clear メソッド 対象となるオブジェクト全体をクリアします。Range オブ …
-
-
指定した数のスペースを挿入する(Spc 関数)
指定した数のスペースを挿入 指定した数のスペースを挿入するには、Spc 関数を使 …
-
-
Math 関数( Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan )
Abs 関数 【書式】 value = Abs ( number ) 【引数・戻 …

