2012-08-31 2 views
1

나는 각각 고유 한 기회 집합을 가지고있는 일련의 소유자가 있습니다. 이 소유자 객체도 콜렉션에 저장되고VBA 다른 개체 컬렉션에 개체 전달

Public name As Variant 
Private opps As New collection 

Public Function addOpportunity(opp As ClmOpportunity) 

    opp.ID = opps.Count + 1 
    opps.Add opp, opps.Count + 1 

End Function 

: 하나의 이름 속성과 컬렉션 저장 ClmOpportunity 개체가 나는 두 클래스 모듈을

, 속성의 무리를 가지고 ClmOpportunity 및 ClmOwner 내 주요 모듈에. 아래 그림과 같이 내가 함수 addOpportunity를 사용하려고하면, 내가 전달하고

"object doesn't support this property or method"

내가 VBA 아주 새로운 오전 난이 왜 이해가 안 :

Dim item As New ClmOpportunity 

item.name = "test" 

owners.item(overallOwner).addOpportunity (item) 

나는 오류 ClmOpportunity에서 그렇게 잘되어야합니다.

도움이 될 것입니다. 모음 키로 문자열 값을 예상하기 때문에 더 리턴 값이 없다면 당신은 괄호를 사용하지 않는

답변

6

...

owners.item(overallOwner).addOpportunity item 

은 ... 당신은, "형식 불일치"오류가 발생합니다 따라서 addOpportunity 함수를 조정해야합니다 (반환 값을 추가하지 않으려는 경우 Sub가되어야 함)

+0

응답 해 주셔서 감사합니다 – Steven