VBA(Excel), Type문 , 사용자정의형식

Option Explicit
Type Emp
    ID(0 To 3) As Integer
    Name As String * 3
    Address As String * 5
    Phone As Byte
End Type

 

Sub CreRecord()
Dim Myr As Emp
Myr.Name = "가나다라"
MsgBox Myr.Name
End Sub

Msgbox의 출력은 "가나다" 만 출력됨

> String의 데이터범위 지정

> Integer의 배열범위 지정