Передача диапазона ячеек в функцию

@nrv · Регистрация: 14.01.2012

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

Потребовалось написать пользовательскую функцию в Excel, функция должна принимать диапазон ячеек:
=PLACE(A2:I2,A2)
Функция PLACE принимает массив:

PureBasic

Function Place(arr() As Integer, number As Integer)
for i=1 to UBound(arr)
for j=1 to (UBound(arr)-1)
if arr(j)<arr(j+1) then
c=arr(j)
arr(j)=arr(j+1)
arr(j+1)=c
endif
next j
next i
if number=arr(1) then
Place=1
endif
p=1
for i=2 to UBound(arr)
if arr(i)=arr(i-1) then
if number=arr(i) then
Place=p
Endif
Else
p=p+1
if number=arr(i) then
Place=p
Endif
endif
next i
End Function

LibreOffice при вычислении ячейки дает ошибку 501
Как правильно описать функцию, чтобы она могла принять в качестве параметра диапазон ячеек?
Может не массив нужно, а список или массив другой какой-нибудь...

@Vlad999 · 02.03.2016, 14:56

Visual Basic

1	Function Place(диапазон As Range, number As Integer)

ваш код придется править

@nrv · 02.03.2016, 15:02 **[ТС]**

Почему-то не работает

@Vlad999 · 02.03.2016, 15:07

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

Почему-то не работает

откуда такие выводы? диапазон в функцию передается, а вот обрабатывается ли это другой вопрос.
например

Visual Basic

1 2	Function Place(диапазон As Range, number As Integer) arr=диапазон.value

в окне Locals смотрим чему равно arr.

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

~~Shersh~~ · 02.03.2016, 15:11

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

пользовательскую функцию в Excel

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

LibreOffice при вычислении ячейки дает ошибку 501

Может в этом проблема? Определитесь, с чем работаете.

@nrv · 02.03.2016, 15:53 **[ТС]**

Сделаем функцию-заглушку, внутри которой точно нет проблемы:

PureBasic

1
2
3

Function Foo(range As Range, number As Integer)
Foo=number
End Function

Она тоже не работает, ошибка 501. Слово "диапазон" это случайно не есть ключевое слово? Проверить я не смог, если вместо range написать диапазон, ругается, но это все-таки на кириллицу наверное.

Добавлено через 14 минут
Ошибка 501, оказывается - это просто LibreOffice не видел функцию Foo (в случае с функцией Place по-прежнему 501, хотя теперь он ее должен видеть), теперь ошибка в Basic IDE "переменная типа object не установлена"

Добавлено через 10 минут
Упс, "object не задан" - это я при вызове функции 1 параметр вместо 2 указал, так что изначально все правильно написал - функция Foo дает ошибку 501

Добавлено через 8 минут
Спасибо, Range все-таки работает, просто параметры нужно писать через точку в запятой

Новые блоги и статьи Все статьи Все блоги /
Использование кэша Laravel - полный гайд bytestream 18.02.2025 Кэширование - один из наиболее эффективных способов повышения производительности веб-приложений. В современном мире, где скорость загрузки страниц напрямую влияет на удержание пользователей и. . .	Создаем REST API в Laravel с аутентификацией через Passport bytestream 18.02.2025 Разработка современных веб-приложений все чаще требует создания надежного и хорошо структурированного API. REST API стал стандартом де-факто для построения взаимодействия между клиентской и серверной. . .	Пайплайны в Laravel - полный гайд bytestream 18.02.2025 Разработка современных веб-приложений часто требует обработки сложных процессов, состоящих из множества последовательных шагов. Например, при создании системы комментариев может потребоваться. . .	Как правильно использовать @required в Symfony bytestream 18.02.2025 При разработке приложений на Symfony мы часто сталкиваемся с необходимостью внедрения зависимостей. Фреймворк предоставляет несколько способов управления этим процессом, и одним из таких инструментов. . .	Система безопасности в Laravel: возможности и примеры Wired 18.02.2025 Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
Давайте сравним Django и Laravel Wired 18.02.2025 Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .	Laravel или React - что лучше? Wired 18.02.2025 В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .	Laravel 11: новые возможности, гайд по обновлению Wired 18.02.2025 Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .	Миграции в Laravel Wired 18.02.2025 Разработка веб-приложений на Laravel неразрывно связана с управлением структурой базы данных. При работе над проектом часто возникает необходимость вносить изменения в схему базы данных - добавлять. . .	Аутентификация в Laravel Wired 18.02.2025 В современном мире веб-разработки безопасность пользовательских данных становится критически важным аспектом любого приложения. Laravel, как один из самых популярных PHP-фреймворков, предоставляет. . .

@nrv 51 / 38 / 5 Регистрация: 14.01.2012 Сообщений: 127
	02.03.2016, 15:02 [ТС]	3
	Почему-то не работает 0

~~Shersh~~ Заблокирован
	02.03.2016, 15:11	5
	Сообщение от nrv пользовательскую функцию в Excel Сообщение от nrv LibreOffice при вычислении ячейки дает ошибку 501 Может в этом проблема? Определитесь, с чем работаете. 0

	02.03.2016, 14:34

	02.03.2016, 15:53

Передача диапазона ячеек в функцию

Решение