ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（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 |
実行結果
関連記事
-
-
文字列：文字列を最後から検索してその最初の文字位置を返す（InStrRev 関数）
InStrRev 関数 任意の文字列の中で、指定した文字列を最後から検索して、見 …
-
-
乱数を生成する（Rnd 関数）
Rnd 関数の使い方 Rnd 関数は、0 以上、1 未満の範囲の乱数を単精度浮動 …
-
-
配列の要素数を取得する（UBound 関数・LBound 関数）
UBound 関数・LBound 関数 【書式】 result = UBound …
-
-
文字列：アルファベットを小文字または大文字に変換（LCase 関数,UCase 関数）
LCase 関数・UCase 関数 の使い方 【書式】 ＜アルファベットの大文字 …
-
-
VBA で正規表現を使う（RegExp オブジェクトのメソッド）
RegExp オブジェクトのメソッド RegExp オブジェクトの詳細に関しては …
-
-
文字列：文字列左から指定文字数取得（Left 関数,LeftB 関数）
Left 関数・LeftB 関数 の使い方 【書式】 result_left = …
-
-
日付時刻：日付時刻データを計算（ DateAdd 関数 ）
DateAdd 関数（日付・時刻の値を加算・減算結果を取得） 【書式】 resu …
-
-
日付時刻：現在の日付・時刻を取得・設定（Now、Date、Time）
現在の日付・時刻を取得・設定 現在の日付・時刻を取得（Now 関数、Date 関 …
-
-
文字列：文字列変数内の一部を置き換える（Mid・MidB ステートメント）
Mid・MidB ステートメントの使い方 【書式】 { Mid | MidB } …
-
-
データをクリアする（ClearContents メソッド）
ClearContents メソッド 対象がセル範囲（Range オブジェクト） …