How to use a static array as class property in VBA

Question

I have a following property in MyClass2:

 Private MyClass1Array(1 To 4) As MyClass1

where MyClass1 is another class I have defined. I don't know how to adress this property: it can't be set public, so I wrote this in MyClass2 module:

Public Property Let SetMyClass1Array(i As Integer, c As MyClass1)
    MyClass1Array(i) = c
End Property

Public Property Get GetMyClass1Array(i As Integer) As MyClass1
    GetMyClass1Array = MyClass1Array(i)
End Property

But this also doesn't work. How to write this properties correctly? Thanks!

Anirudh Ramanathan · Accepted Answer · 2012-10-31 12:00:55Z

3

When you work with Class-objects, you need to use Set as you handle object-references, not primitive data-type values.

Public Property Let SetMyClass1Array(i As Integer, c As MyClass1)
    Set MyClass1Array(i) = c
End Property

Public Property Get GetMyClass1Array(i As Integer) As MyClass1
    Set GetMyClass1Array = MyClass1Array(i)
End Property

answered Oct 31, 2012 at 12:00

Anirudh Ramanathan

46.8k24 gold badges137 silver badges195 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

Alex K. Over a year ago

+1 there is also property set instead of let to allow set x.SetMyClass1Array(a) = b

Collectives™ on Stack Overflow

How to use a static array as class property in VBA

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related