Добавление или умножение вариантов в VBA

Предположим, нам даны два варианта,X а такжеY, это могут быть числа, диапазоны или массивы. Есть ли простой способ добавить или умножить их, как в формулах листа=X+Y а также=X*Y?

Одна возможность, о которой я подумал, - это использовать операцию Evaluate, что-то вроде этого:

Dim X, Y

Sub AddMult()
    Dim Add, Mult
    X = Array(Array(1, 3), Array(2, 4))
    Y = Array(1, 2)
    Add = [GetX()+GetY()]
    Mult = [GetX()*GetY()]
End Sub
Function GetX()
    GetX = X
End Function
Function GetY()
    GetY = Y
End Function

Это кажется немного неловким, хотя. Есть еще идеи?

(Вот связанный вопрос:Умножение массивов со скалярами и добавление в VBA.)