Call VBA function that returns custom type from spreadsheet

Question

I have a vba function that returns a custom data type, defined as:

Public Type stockValue
        stock As String
        value As Double
End Type

Answer 1

You can do the following :

Type XYDouble
    X As Double
    Y As Double
End Type

Private Function Compute(ByVal X As Double, ByVal Y As Double) As XYDouble
    Compute.X = ....
    Compute.Y = ...
End Function


Function ComputeX(ByVal X As Double, ByVal Y As Double) As Double
    ComputeX = Compute(X, Y).X
End Function

Function ComputeY(ByVal X As Double, ByVal Y As Double) As Double
    ComputeY = Compute(X, Y).Y
End Function

and, you can get the X (or Y) value in cell with the formula : "=ComputeX(C7;D7)"