2013-07-07 2 views
0

다른 유형의 유형을 시도하고 있지만이를 허용하지 않습니다.다른 데이터 유형의 VBA 데이터 유형

Public Type MyTable 
    Name As String 
    IDStartingNumber As Integer 
    Items(50) As MyItem 
End Type 

Public Type MyItem 
    Name As String 
    DataType As DataTypes 
    Number As Integer 
    AllowNull As Boolean 
    Unique As Boolean 
    Reference As MyTable 
End Type 

어떻게되고 있으며 어떻게 해결할 수 있습니까?

+0

어떤 오류가 발생합니까? – SLaks

+0

"컴파일 오류 : 사용자 정의 형식으로 전달 참조" – Makai

답변

4

참조 할 유형이 그 앞에 있는지 확인하십시오. 귀하의 예에서는 나중에 MyItem 유형을 사용합니다. 예 :

Public Type MyItem 
    Name As String 
    DataType As DataTypes 
    Number As Integer 
    AllowNull As Boolean 
    Unique As Boolean 
    Reference As MyTable 
End Type 

Public Type MyTable 
    Name As String 
    IDStartingNumber As Integer 
    Items(50) As MyItem 
End Type 
+0

작동했습니다. 감사 – Makai