ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（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 |
実行結果
関連記事
-
-
オブジェクトの書式をクリアする（ClearFormats メソッド）
ClearFormats メソッド 対象となるオブジェクトの書式（スタイル）を初 …
-
-
配列の要素数を取得する（UBound 関数・LBound 関数）
UBound 関数・LBound 関数 【書式】 result = UBound …
-
-
日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数 ）
DateValue 関数（文字列から日付データを取得） 【書式】 date_va …
-
-
カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）
カレントフォルダ カレントフォルダとは、ブックを開いたり保存するときに既定で参照 …
-
-
Join 関数（配列の要素を結合）
Join 関数 1次元配列の各要素を指定した区切り文字で連結します。 【書式】 …
-
-
ユーザー定義関数：自動再計算関数の設定（Volatile メソッド）
ユーザー定義関数で、自動再計算を行うかどうかを設定する ワークシート上で使用する …
-
-
文字列：文字列の長さを取得（ Len 関数、LenB 関数 ）
Len 関数（文字列の長さを取得） 【書式】 result_len = Len …
-
-
VBA の演算子（文字連結演算子：& 演算子 + 演算子）
文字連結演算子 文字連結演算子は、文字列の連結を行うときに使用する演算子で、「& …
-
-
Math 関数（ Abs,Atn,Cos,Exp,Log,Rnd,Sgn,Sin,Sqr,Tan ）
Abs 関数 【書式】 value = Abs ( number ) 【引数・戻 …
-
-
文字に下線を設定する（Underline プロパティ）
下線を設定（Underline プロパティ） Underline プロパティは、 …