exama234
7/18/2016 - 6:52 AM

VBA モジュール(型変換)

VBA モジュール(型変換)

##Mod_Convert 変換処理をするモジュールです。

--
###導入方法 本体のコードをExcel VBAの標準モジュールとして Importしてください。
[Markdown]  [Code]  本体

-- ###toInteger オブジェクトを数値(Integer)として変換、取得する。
変換に失敗した際のデフォルト値を第2引数に指定できます。

int_val = toInteger(val, -999)

--
###toDouble オブジェクトを数値(Double)として変換、取得する。
変換に失敗した際のデフォルト値を第2引数に指定できます。

double_val = toDouble(val, -999)

--
###toDecimal オブジェクトを数値(Decimal)として変換、取得する。
変換に失敗した際のデフォルト値を第2引数に指定できます。

decimal_val = toDecimal(val, -999)

--
###String2Collection 文字列をコレクションに変換する。

Set col = String2Collection("data1 data2 data3", " ")

--
###Array2Collection Variant型の配列をコレクションに変換する。

Dim variant_list As Variant
variant_list = Array(-1, 0, 1, 20, 300, 4000)
Set col = Array2Collection(variant_list)