У меня возникла ошибка несоответствия типов в VBA превосходят со следующим кодом:Excel VBA Тип Несовпадение Ошибка Использование Оценивать с Вариантов
M(i, GPARAM(1)) = Evaluate(Func & "(" & EvalVect & "," & GPARAM & ")")
Где Func это строка, содержащая имя функции и EvalVect & GPARAM оба варианта.
Если я жестко запрограммировал выражение, объясняющее имя функции, оно работает без проблем, поэтому проблема связана с моим пониманием функции оценки, а не с UDF.
M(i, GPARAM(1)) = Func1(EvalVect, GPARAM)
Любые указатели будут оценены.
Приветствия
'Evaluate' работает так, как если бы вы ввели строку формулы в ячейку. Работает ли ваша строка формулы в ячейке? – Rory
Вы заметили, что в 'Тип несоответствие' ваша функция называется' Func', а в рабочем примере - 'Func1'? –
Если он работает так, как вы говорите, вы можете просто пропустить «1» из выражения, чтобы дать: Evaluate (Func1 & »(« & EvalVect & »,« & GPARAM & »)») – Tragamor