ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（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 |
実行結果
関連記事
-
-
指定したセル範囲のサイズを変更（Resize プロパティ）
Resize プロパティ 指定したセル範囲のサイズ（行数や列数）を変更します。 …
-
-
オートシェイプの種類を表す定数（MsoAutoShapeType 列挙型）
MsoAutoShapeType 列挙型 オートシェイプオブジェクトの図形の種類 …
-
-
変数が数値型かどうかをチェックする（ IsNumeric 関数 ）
IsNumeric 関数の使い方 【書式】 result = IsNumeric …
-
-
IME の現在の状態を取得します（IMEStatus 関数）
IMEStatus 関数の使い方 【書式】 result = IMEStatus …
-
-
日付時刻：文字列から日付・時刻データを取得（ DateValue 関数、TimeValue 関数 ）
DateValue 関数（文字列から日付データを取得） 【書式】 date_va …
-
-
カレントフォルダの取得・設定（DefaultFilePath プロパティ）
DefaultFilePath プロパティ カレントフォルダとは、ブックを開いた …
-
-
カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）
カレントフォルダ カレントフォルダとは、ブックを開いたり保存するときに既定で参照 …
-
-
VBA の演算子（論理演算子：And、Eqv、Imp、Not、Or、Xor）
論理演算子 論理演算を行うときに使用する演算子で、以下の 6 種類があります。 …
-
-
配列（多次元配列・配列の次元の変更）
多次元配列 【書式】 多次元配列の宣言 ＜静的配列（固定長配列）＞ Dim my …
-
-
VBA の演算子（文字連結演算子：& 演算子 + 演算子）
文字連結演算子 文字連結演算子は、文字列の連結を行うときに使用する演算子で、「& …