Программное отключение функции

@Максим Максимов · Регистрация: 07.09.2011

Добрый день!
В книге EXCEL есть пользовательская функция:

Visual Basic

1
2
3

Function HasFormula(C As Range) As Boolean
HasFormula = C.HasFormula
End Function

Из-за данной функции неверно выполняется макрос.
Можно ли на время выполнения макроса отключить эту функцию?
Спасибо.

@~~Busine2009~~ · 08.09.2011, 14:50

Сообщение от Максим Максимов

Function HasFormula(C As Range) As Boolean

для начала переименуйте пользовательскую функцию. Нельзя использовать в пользовательских названиях встроенные названия.

@Максим Максимов · 08.09.2011, 15:11 **[ТС]**

Уже переименовали

Ничего не получается. Всем отделом сидим на форумах, ответ найти никак не можем

@~~Busine2009~~ · 08.09.2011, 15:14

Максим Максимов,
а чем эта функция мешает?

@pincet · 08.09.2011, 18:03

Сообщение от Максим Максимов

Visual Basic

Function HasFormula(C As Range) As Boolean
If glFlag=0 then
HasFormula = C.HasFormula
endif
End Function

glFlag - глобальная переменная, при запуске макроса, которому мешает установите в 1, по окончанию обратно в 0

@gaw · 08.09.2011, 18:47

или без глобальная переменная
но тогда обращение к ф-ции HasFormula(C As Range,0(1) /False(True)/)

Visual Basic

Function HasFormula(C As Range,glFlag As Boolean) As Boolean
If glFlag=0 then
HasFormula = C.HasFormula
endif
End Function

@Максим Максимов · 09.09.2011, 08:40 **[ТС]**

Спасибо! Помогло.

@~~Busine2009~~ Заблокирован
	08.09.2011, 14:50	2
	Сообщение от Максим Максимов Function HasFormula(C As Range) As Boolean для начала переименуйте пользовательскую функцию. Нельзя использовать в пользовательских названиях встроенные названия. 1

@Максим Максимов 0 / 0 / 0 Регистрация: 07.09.2011 Сообщений: 6
	08.09.2011, 15:11 [ТС]	3
	Уже переименовали Ничего не получается. Всем отделом сидим на форумах, ответ найти никак не можем 0

@~~Busine2009~~ Заблокирован
	08.09.2011, 15:14	4
	Максим Максимов, а чем эта функция мешает? 0

@Максим Максимов 0 / 0 / 0 Регистрация: 07.09.2011 Сообщений: 6
	09.09.2011, 08:40 [ТС]	7
	Спасибо! Помогло. 0