配列を型変換したい
配列をVariantで宣言したが、Long型に変えたいなど、型変換の需要はあります。
単純にループさせて型変換するしかなく、CLng関数のような型変換の関数は用意されていません。
配列を型変換するサンプルコード
'配列の型を変換するサンプルコード Public Sub sample() Dim tmp As Variant Dim arr() As Long '■Variant型のtmpに数値を代入 tmp = Array(1, 20, 300) '■Variant型をLong型に型変換(代入しなおしているだけ) For i = 0 To UBound(tmp) ReDim Preserve arr(i) arr(i) = tmp(i) Next End Sub
注意点
- 特にありません。
コメント