ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）
Partition 関数 の使い方
Partition 関数は、ある数値が、区切られた複数の範囲の中、どの範囲に含まれるかを示す文字列を返します。
result = Partition ( number, start, stop, interval )
引数・戻り値
- number ・・・ 対象となる整数。
- start ・・・ 範囲全体の先頭となる正の整数または 0。
- stop ・・・ 範囲全体の末尾となる start よりも大きい整数。
- interval ・・・ 各範囲の長さを示す１以上の整数。
- result ・・・ number が、どこの範囲にあるかを示す文字列
（書式は、「範囲の先頭の数値:範囲の末尾の数値」）。
（例）result = Partition( 25, 1, 100, 20 )
⇒ result は、21:40 となります。
引数 interval に 1 を指定した場合
引数の start、stop にかかわらず、戻り値 resultは、
「 number:number 」となります。
引数 number が、範囲外の場合
number が、引数の start より小さい場合の戻り値 resultは、
「 :start – 1 」となります。
number が、引数の stop より大きい場合の戻り値 resultは、
「 stop + 1: 」となります。
Partition 関数 の使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Sub Sample_Partition() Debug.Print Partition(90, 25, 90, 20) Debug.Print Partition(50, 10, 90, 20) Debug.Print Partition(12, 1, 25, 1) '範囲の長さが 1 の場合 Debug.Print Partition(100, 1, 25, 5) '値が範囲の末尾より大きい場合 Debug.Print Partition(20, 25, 90, 15) '値が範囲の先頭より小さい場合 End Sub |
実行結果
関連記事
-
-
オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）
MsoAutoShapeType 列挙型 オートシェイプオブジェクトの図形の種類 …
-
-
配列（宣言・要素数の変更について）
配列の宣言 【書式】※ 配列の宣言 ＜Type 型の静的配列（固定長配列）の宣言 …
-
-
CPU に制御を移す（DoEvents 関数）
DoEvents 関数 DoEvents 関数を実行すると、CPU に制御を移し …
-
-
データ型を調べてそのデータ型を示す文字列を返す（TypeName 関数）
TypeName 関数 の使い方 TypeName 関数は、引数に、データ型を調 …
-
-
VBA の演算子（演算子の優先順位）
演算子の優先順位 演算子の優先順位とは、１つの式の中に演算子が複数ある場合、どの …
-
-
指定した値を8進数で表記した文字列に変換する（Oct 関数）
Oct 関数 の使い方 【書式】 result = Oct ( expressi …
-
-
Erase ステートメント（配列の初期化・動的配列のメモリ解放）
Erase ステートメントの使い方 【書式】 Erase myArray [, …
-
-
色の設定（Color プロパティ・RGB 関数）
Color プロパティ Color プロパティは、指定したオブジェクトの色を取得 …
-
-
変数が配列かどうかをチェックする（ IsArray 関数 ）
IsArray 関数の使い方 【書式】 result = IsArray( va …
-
-
配列の要素数を取得する（UBound 関数・LBound 関数）
UBound 関数・LBound 関数 【書式】 result = UBound …