Не могу вызвать пользовательскую функцию в ячейке на листе - VBA

@spr85 · Регистрация: 29.05.2017

Author24 — интернет-сервис помощи студентам

Чего-то день сегодня не задался

Я написал свою функцию:

Visual Basic

1
2
3

 Function rbc(x,y) as Double
           rbc = ...
End Function

Далее я пытаюсь вызвать её на Листе, предварительно указав аргументы x,y которые находятся в соседних ячейках.
В результате, эксель выдает ошибку. В ячейке отображается: " #ЗНАЧ!"
Я пытаюсь понять, почему так происходит. Пишу процедуру, которая вызывает эту функцию и записываю получившееся значение в ячейку:

Visual Basic

 Sub test() as Double
          Dim z as Double 
          Dim x as Double
          Dim y as Double
 
          x = 5
          y = 6
          z = rbc(x,y)
          Cells(1,1) = z
          Debug.Print z
End Sub

Я проверяю по шагам, как идет выполнение процедуры. И все получается отлично, в окне Immediate значение правильное, в ячейку выводится то же правильное значение. А напрямую в листе функция не работает.

В чем может быть причина?

@Vlad999 · 25.01.2018, 17:10

пошагово прогоните саму ф-цию.

@spr85 · 25.01.2018, 17:12 **[ТС]**

Сообщение от Vlad999

пошагово прогоните саму ф-цию.

а как саму функцию пошагово прогнать не через создание процедуры?

@Vlad999 · 25.01.2018, 17:23

в vba в коде функции на поле слева кликните ЛКМ, должна появится красная точка (это точка останова)
на листе становитесь в формулу и жмете ввод.

@Hugo121 · 25.01.2018, 17:27

Судя по другой теме - код не в стандартном модуле.

@Vlad999 · 25.01.2018, 17:29

функция отработает до точки останова и дальше можно идти стандартно F8.

Добавлено через 1 минуту
Hugo121, в той теме писали про станд. модуль. Вот и подумал раз в той теме вопрос закрыт то ТС перенс код в модуль. Файла нет, негде проверить.

@spr85 · 25.01.2018, 17:35 **[ТС]**

Я перенес код в стандартный модуль.
При нажатии F8 в каком-то бы ни было месте в функции, пошаговый режим не запускается, именно поэтому я вызываю её для пошаговой проверки через процедуру.

Файл я могу выслать, если Вам будет не лень в нем копаться

@Hugo121 · 25.01.2018, 17:43

Ставите в коде функции точку останова, ну или просто пишите где-то в начале строку

Visual Basic

stop

далее вызываете функцию на листе, попадаете в код, гоните дальше пошагово.

@Vlad999 · 25.01.2018, 17:45

Сообщение от spr85

пошаговый режим не запускается,

Смотрите.

@Hugo121 · 25.01.2018, 17:55

; - это правильный разделитель аргументов?

Добавлено через 46 секунд
Ну и вижу что пошаговый нормально отрабатывает

@spr85 · 25.01.2018, 18:04 **[ТС]**

Сработало!

Действительно, в коде была одна строчка, которая записывала промежуточное значение в ячейку на другом листе и почему-то код просто на ней прерывался! Я её закомментил и все начало работать!

Спасибо огромное, Vlad999 и Hugo121!

@Hugo121 · 25.01.2018, 18:13

UDF с листа ничего не могут писать в другие ячейки листов!
Ну есть одно кривое исключение... но оно подверждает правило

@spr85 0 / 0 / 0 Регистрация: 29.05.2017 Сообщений: 23
	25.01.2018, 18:04 [ТС]	11
	Сработало! Действительно, в коде была одна строчка, которая записывала промежуточное значение в ячейку на другом листе и почему-то код просто на ней прерывался! Я её закомментил и все начало работать! Спасибо огромное, Vlad999 и Hugo121! 0

@Vlad999 3897 / 2302 / 776 Регистрация: 02.11.2012 Сообщений: 6,119
	25.01.2018, 17:10	2
	пошагово прогоните саму ф-цию. 0

@spr85 0 / 0 / 0 Регистрация: 29.05.2017 Сообщений: 23
	25.01.2018, 17:12 [ТС]	3
	Сообщение от Vlad999 пошагово прогоните саму ф-цию. а как саму функцию пошагово прогнать не через создание процедуры? 0

@Vlad999 3897 / 2302 / 776 Регистрация: 02.11.2012 Сообщений: 6,119
	25.01.2018, 17:23	4
	в vba в коде функции на поле слева кликните ЛКМ, должна появится красная точка (это точка останова) на листе становитесь в формулу и жмете ввод. 1

@Hugo121 6922 / 2832 / 543 Регистрация: 19.10.2012 Сообщений: 8,645
	25.01.2018, 17:27	5
	Судя по другой теме - код не в стандартном модуле. 1

@Vlad999 3897 / 2302 / 776 Регистрация: 02.11.2012 Сообщений: 6,119
	25.01.2018, 17:29	6
	функция отработает до точки останова и дальше можно идти стандартно F8. Добавлено через 1 минуту Hugo121, в той теме писали про станд. модуль. Вот и подумал раз в той теме вопрос закрыт то ТС перенс код в модуль. Файла нет, негде проверить. 1

@spr85 0 / 0 / 0 Регистрация: 29.05.2017 Сообщений: 23
	25.01.2018, 17:35 [ТС]	7
	Я перенес код в стандартный модуль. При нажатии F8 в каком-то бы ни было месте в функции, пошаговый режим не запускается, именно поэтому я вызываю её для пошаговой проверки через процедуру. Файл я могу выслать, если Вам будет не лень в нем копаться 0

@Vlad999 3897 / 2302 / 776 Регистрация: 02.11.2012 Сообщений: 6,119
	25.01.2018, 17:45	9
	Сообщение было отмечено spr85 как решение Решение Сообщение от spr85 пошаговый режим не запускается, Смотрите. Миниатюры 0

@Hugo121 6922 / 2832 / 543 Регистрация: 19.10.2012 Сообщений: 8,645
	25.01.2018, 17:55	10
	; - это правильный разделитель аргументов? Добавлено через 46 секунд Ну и вижу что пошаговый нормально отрабатывает 0

@Hugo121 6922 / 2832 / 543 Регистрация: 19.10.2012 Сообщений: 8,645
	25.01.2018, 18:13	12
	UDF с листа ничего не могут писать в другие ячейки листов! Ну есть одно кривое исключение... но оно подверждает правило 0

Не могу вызвать пользовательскую функцию в ячейке на листе - VBA

Решение