Невозможно вызвать пользовательскую функцию без ошибки NAME. - PullRequest
0 голосов
/ 04 мая 2020

Я использую следующий код VBA, установленный на стандартном модуле, для подсчета ячеек с указанным c цветом текста:

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
Application.Volatile
Dim rng As Range
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        CountColour = CountColour + 1
    End If
Next
End Function

Вот как я вызываю функцию:

=CountColour(A1:A100;B1)

Раньше он отлично работал в Office 2016. Однако в Office 360 ​​он больше не работает.

Исходя из аналогичных сообщений, здесь, на SO, я уже пытался сделать полная перестройка цепочки зависимостей , и я проверил, есть ли модуль с тем же именем, что и у функции .

Пока ничего не работает. Кто-нибудь может мне помочь разобраться в этом?

...