vba - VBA異なるデータ型の要素で配列を宣言する方法

Question

エラーレコードを保存するために作成した配列があり、次の要素があります：シリアル番号、ファイル名、エラータイプ、エラーセル、エラーセル値

今のところ、このように配列を宣言し、後で値を入力します。

Dim errorArray() As String

しかし、理想的には、シリアル番号を適切な整数にしたいのですが、文字列に変換されています。これを正しく宣言して、最初の要素にLongデータ型、次の3つに文字列、最後の要素にバリアントを設定する方法がわかりません。

Answer 1

次のように、コードにプライベートタイプを作成します。

Private Type ErrRecord
    SerialNo As Long
    FileName As String
    ErrorType As String
    ErrorCell As String
    ErrorCellValue As Variant
End Type

そして、あなたのルーチンでは、それを次のように呼びます：

Dim errorArray(0) As ErrRecord
With errorArray(0)
    .SerialNo = 12345
    .FileName = "Test.xls"
    .ErrorType = "Bad error"
    .ErrorCell = "1234"
    .ErrorCellValue = "Test"
End With

Answer 2

Variant型の配列を作成する必要があります。Variant型の配列は、その要素のいずれかに任意のデータ型を格納できます。

Dim astrItems(0 To 9)    As String
Dim varItems             As Variant

varItems = astrItems