EXCEL VBAメモ - 構造体の定義と使用

Option Explicit

Type MyStruct
    val As Long
    str As String
End Type

Sub foo()
    Dim a As MyStruct
    
    a.val = 10
    a.str = "abcd"
    MsgBox a.val & a.str
End Sub