What is the "right" way to return a new class object from a VBA function?

class vba object creation
e.James picture e.James · Sep 30, 2011 · Viewed 12.6k times · Source

I am looking for the proper way to create and return a new class object in VBA.

I am familiar with the following pattern for returning a new Type variable (returned by value):

Public Type Foo
    x as Integer
    y as Integer
End Type

Public Function NewFoo() as Foo
    NewFoo.x = 4
    NewFoo.y = 2
End Function

What would be the equivalent syntax for a new Class object (returned by reference)?

Public Function NewMyClass() As MyClass
    ''// ...?
End Function

Answer

oberfreak picture oberfreak · Sep 30, 2011

If you want to return an Object in VBA you have to set it to the Method name

Public Function NewMyClass() As MyClass
    Set NewMyClass = CreateObject("Some.MyClass");
End Function

Related questions

Pass arguments to Constructor in VBA

How can you construct objects passing arguments directly to your own classes? Something like this: Dim this_employee as Employee Set this_employee = new Employee(name:="Johnny", age:=69) Not being able to do this is very annoying, and you end …

Read More
VBA - Returning array from Property Get

If arrays are returned by reference, why doesn't the following work: 'Class1 class module Private v() As Double Public Property Get Vec() As Double() Vec = v() End Property Private Sub Class_Initialize() ReDim v(0 To 3) End Sub ' end class …

Read More
Creating a Class to Handle Access Form Control Events

I'm trying to create a Class which will handle multiple Control Events in Access. This is to save the repetition of typing out many lines of identical code. I've followed the answer located on the following page, but with a …

Read More