「配列がありません」エラーが出た
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関数を再度見直ししましょう。




コメント