「配列がありません」エラーが出た
Array関数で代入するデータはVariant型であることを忘れてしまい、エラーが発生します。
「配列がありません」が発生するコード
Public Sub sample() Dim tmp As String 'Dim tmp As Variantにすればエラー回避できます tmp = Array("a", "b", "c", "d", "e") Dim i As Long '■コンパイルエラー 配列がありませんが表示 For i = LBound(tmp) To UBound(tmp) Debug.Print tmp(i) Next i End Sub
注意点
- このエラーの回避は単純に指定ミスです。Array関数を再度見直ししましょう。
コメント