Это тоже работает
ся, я получаю ошибку несоответствия типов при попытке сделать что-то вроде этого:
В новой рабочей тетради:
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 (). Можно ли вернуть диапазон?