-
If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.
Can an array hold object variables?
- Thread starter Glory
- Start date
Colin Legg
MrExcel MVP
- Joined
- Feb 28, 2008
- Messages
- 3,507
- Office Version
- 365
- Platform
- Windows
Hi Glory,
VBA Arrays don't have to be of type Variant. You can have an array of whatever you want. For example, here's a dynamic String array:
And here's a dynamic Object array:
Perhaps you could give us a specific example to work with?
VBA Arrays don't have to be of type Variant. You can have an array of whatever you want. For example, here's a dynamic String array:
Code:
Sub foo()
Dim strarrNames() As String
ReDim strarrNames(0 To 1)
strarrNames(0) = "Glory"
strarrNames(1) = "Colin"
End Sub
Code:
Sub foo()
Dim objarrNames() As Object
ReDim objarrNames(0 To 1)
Set objarrNames(0) = Worksheets(1)
Set objarrNames(1) = Workbooks(2)
End Sub
Upvote
0
tusharm
MrExcel MVP
- Joined
- May 28, 2002
- Messages
- 11,029
As has already been pointed out, an array doesn't have to be of type variant. And, if it is, variant means it can contain data of any type include an object!
Code:
Sub showArr()
Dim Arr(2)
Arr(0) = 1
Arr(1) = "a string"
Set Arr(2) = Application
Debug.Print Arr(0) & ", " & Arr(1) & ", " & Arr(2).Caption
End Sub
Upvote
0
Glory
Well-known Member
- Joined
- Mar 16, 2011
- Messages
- 640
I'm having problems getting the array to survive between separate subs in a class module because I can't declare the array at module-level (compile error) and I have no idea how to make it into a property.
Could anybody help me out with that?
Could anybody help me out with that?
Upvote
0
Glory
Well-known Member
- Joined
- Mar 16, 2011
- Messages
- 640
And that's the problem, see; I need the obejct variable to survive between procedures in my class module. So I've wound up using a collection that's dimensioned outside the userform object module that's using the class module.
eg:
eg:
Code:
Public MyCollection As New Collection
Public Sub Test()
Userform1 Show
End Sub
Upvote
0
Colin Legg
MrExcel MVP
- Joined
- Feb 28, 2008
- Messages
- 3,507
- Office Version
- 365
- Platform
- Windows
Hi,
It can be declared as Private at a module level in the class module. It will then retain its value as long as the object (instance of the class) survives and it can be accessed by all members of the class. If it needs to be accessed from outside of the class module then you can create a Property which exposes it.
If you need to hold the value even after the the object has been destroyed then it would have to be declared outside of the class module as you have done.
I hope that makes sense but if an example would also help then just ask.
It can be declared as Private at a module level in the class module. It will then retain its value as long as the object (instance of the class) survives and it can be accessed by all members of the class. If it needs to be accessed from outside of the class module then you can create a Property which exposes it.
If you need to hold the value even after the the object has been destroyed then it would have to be declared outside of the class module as you have done.
I hope that makes sense but if an example would also help then just ask.
Upvote
0
Glory
Well-known Member
- Joined
- Mar 16, 2011
- Messages
- 640
Colin,
I have a feeling that I'm trying to make untraditional use of a class module. Here's what I'm trying to do, maybe you can let me know if I'm off on the wrong track with this.
I have a userform which I've left blank. I've chosen to populate it from a series of class modules at runtime using the Userform Initialize event. Each control that eventually appears on the userform has its own class module.
The controls are designed to affect one another (visible true/false, enabled true/false, value true/false, etc). The problem is that all the controls appearing at runtime.
I've used DoEvents to get the controls to execute code, but I can't get the code from one class module to recognize objects variable (the control) created in other class modules... without assigning all the object variables to public variables dimensioned externally (in the module containing the Show statement, for instance, like I posted above).
Instead of drowning myself in public variables, I've used collections to consolidate like controls. That's the only solution I've found so far, but I'm wide open to suggestions.
I have a feeling that I'm trying to make untraditional use of a class module. Here's what I'm trying to do, maybe you can let me know if I'm off on the wrong track with this.
I have a userform which I've left blank. I've chosen to populate it from a series of class modules at runtime using the Userform Initialize event. Each control that eventually appears on the userform has its own class module.
The controls are designed to affect one another (visible true/false, enabled true/false, value true/false, etc). The problem is that all the controls appearing at runtime.
I've used DoEvents to get the controls to execute code, but I can't get the code from one class module to recognize objects variable (the control) created in other class modules... without assigning all the object variables to public variables dimensioned externally (in the module containing the Show statement, for instance, like I posted above).
Instead of drowning myself in public variables, I've used collections to consolidate like controls. That's the only solution I've found so far, but I'm wide open to suggestions.
Upvote
0
Similar threads
- Solved
- Question
