Как сохранить значение пользовательской функции в случае ошибки? - VBA

Формулировка задачи:

Есть книга А. В ней есть макрос "Function ReturnDataFromWorkBook(Имя открытого файла) as Double ". Если поставить эту функцию в некоторую ячейку "=ReturnDataFromWorkBook(B)" и открыть книгу В, то функция благополучно получает нужные данные из книги В и возвращает нужное значение. А вот если закрыть книгу В и пересчитать книгу А, то в нашей ячейке не сохраняется нужное значение и возвращается ошибка (#ЗНАЧ). Как сделать (либо настроить excel) чтобы при пересчете сохранялось возвращенное значение если книга В закрыта?

Решение задачи: «Как сохранить значение пользовательской функции в случае ошибки?»

textual
                            Листинг программы 
                        

                            Public Function qwe(dRange1, dRange2)
 If dRange2.Value = 1 Then
  qwe = dRange1.Text
 Else
  qwe = "сохраняемая строка"
 End If
End Function
                        