Кажется, я получаю ошибку несоответствия типа при попытке сделать что-то вроде этого:
В новой книге:
A1 B1
5 4
Function Test1() As Integer
Dim rg As Range
Set rg = Test2()
Test1 = rg.Cells(1, 1).Value
End Function
Function Test2() As Range
Dim rg As Range
Set rg = Range("A1:B1")
Test2 = rg
End Function
Добавление = Test1() должно возвращать 5, но код, кажется, заканчивается при возврате диапазона из test2(). Можно ли вернуть диапазон?