ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（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 関数 任意の文字列の中で、指定した文字列を最後から検索して、見 …
-
-
文字列：文字列変数の値を右詰めまたは左詰めにする（RSet ステートメント・LSet ステートメント）
RSet ステートメント・LSet ステートメント 【書式】 ＜ RSet ステ …
-
-
引数の整数部分を取得する（Fix 関数・Int 関数）
Fix 関数・Int 関数の使い方 【書式】 number_fix = Fix …
-
-
配列（宣言・要素数の変更について）
配列の宣言 【書式】※ 配列の宣言 ＜Type 型の静的配列（固定長配列）の宣言 …
-
-
エラー（CVErr 関数・IsError 関数・Error 関数）
CVErr 関数（エラー番号をエラー値に変換する）の使い方 【書式】 retur …
-
-
ショートカットメニュー（CommandBar オブジェクト）
ショートカットメニュー（コンテキストメニュー） 右クリックで表示されるメニューの …
-
-
VBA で正規表現を使う（RegExp オブジェクトのプロパティ）
RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …
-
-
日付時刻：数値から日付・時刻データを取得（ DateSerial 関数、TimeSerial 関数 ）
DateSerial 関数（数値を使って日付データを取得） 【書式】 date …
-
-
文字列：文字列を指定した形式に変換する（StrConv 関数）
StrConv 関数の使い方 【書式】 result = StrConv ( s …
-
-
オブジェクトの書式をクリアする（ClearFormats メソッド）
ClearFormats メソッド 対象となるオブジェクトの書式（スタイル）を初 …