Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как создать пользовательскую функцию из встроенной функции - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как создать пользовательскую функцию из встроенной функции (Функции/Function)
Как создать пользовательскую функцию из встроенной функции
baaur Дата: Четверг, 29.05.2014, 14:49 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 70
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день всем!
Подскажите пожалуйста как создать пользовательскую функцию из встроенной функции "ЕСЛИ".
Суть такая, нужна пользовательская функция " = Если(И(A1>0;B1>0);1;5)", только эти две переменные (А1 и B1 могут менять адреса при открытии книги) и формулу нужно постоянно вводить заново вручную.
Пытался сделать макрорекордером так,
Function Nа(сумма, сумма1)
Nа = "=IF(AND(сумма>0,сумма1>0),1,5)"
End Function

Но выдает ошибку, помогите пожалуйста!
 
Ответить
СообщениеДобрый день всем!
Подскажите пожалуйста как создать пользовательскую функцию из встроенной функции "ЕСЛИ".
Суть такая, нужна пользовательская функция " = Если(И(A1>0;B1>0);1;5)", только эти две переменные (А1 и B1 могут менять адреса при открытии книги) и формулу нужно постоянно вводить заново вручную.
Пытался сделать макрорекордером так,
Function Nа(сумма, сумма1)
Nа = "=IF(AND(сумма>0,сумма1>0),1,5)"
End Function

Но выдает ошибку, помогите пожалуйста!
Автор - baaur
Дата добавления - 29.05.2014 в 14:49
baaur Дата: Четверг, 29.05.2014, 14:53 | Сообщение № 2
Группа: Пользователи
Ранг: Участник
Сообщений: 70
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
То есть что бы можно было выбирать другие ячейки с данными в диалоговом окне вместо А1 и B1.
 
Ответить
СообщениеТо есть что бы можно было выбирать другие ячейки с данными в диалоговом окне вместо А1 и B1.
Автор - baaur
Дата добавления - 29.05.2014 в 14:53
Hugo Дата: Четверг, 29.05.2014, 15:15 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3255
Репутация: 707 ±
Замечаний: 0% ±

2019
1. пишите в эти ячейки ссылки на нужные ячейки. тогда весь диалог - "=" и тык мышью.
2. можно использовать имена - но изменить имя не проще чем поменять аргумент.
Правда вот на эту процедуру и можно написать процедуру с выбором ячеек в диалоге. По одному клику на кнопке, а не при каждом вызове функции.
3. вообще это какая-то надуманная проблема :)

excel@nxt.ru
webmoney: E265281470651 Z422237915069
 
Ответить
Сообщение1. пишите в эти ячейки ссылки на нужные ячейки. тогда весь диалог - "=" и тык мышью.
2. можно использовать имена - но изменить имя не проще чем поменять аргумент.
Правда вот на эту процедуру и можно написать процедуру с выбором ячеек в диалоге. По одному клику на кнопке, а не при каждом вызове функции.
3. вообще это какая-то надуманная проблема :)
Автор - Hugo
Дата добавления - 29.05.2014 в 15:15
_Boroda_ Дата: Четверг, 29.05.2014, 15:20 | Сообщение № 4
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Так нужно?
[vba]
Код
Function Nа(сумма, сумма1)
k = 5
If (сумма > 0) * (сумма1 > 0) Then k = 1
Nа = k
End Function
[/vba]
К сообщению приложен файл: 777555.xlsm (12.5 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
[vba]
Код
Function Nа(сумма, сумма1)
k = 5
If (сумма > 0) * (сумма1 > 0) Then k = 1
Nа = k
End Function
[/vba]
Автор - _Boroda_
Дата добавления - 29.05.2014 в 15:20
baaur Дата: Четверг, 29.05.2014, 15:26 | Сообщение № 5
Группа: Пользователи
Ранг: Участник
Сообщений: 70
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Спасибо за ответ
Это проблема по работе, так как дают книги с данными разные люди.

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

"пишите в эти ячейки ссылки на нужные ячейки. тогда весь диалог - "=" и тык мышью. " - не совсем понял куда что писать?
Автор - baaur
Дата добавления - 29.05.2014 в 15:26
baaur Дата: Четверг, 29.05.2014, 15:29 | Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 70
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Function Nа(сумма, сумма1)
k = 5
If (сумма > 0) * (сумма1 > 0) Then k = 1
Nа = k
End Function
К сообщению приложен файл: 777555.xlsm(13Kb)

hands hands hands hands
Большое спасибо, да так и нужно было!!! Благодарю !!!
 
Ответить
СообщениеFunction Nа(сумма, сумма1)
k = 5
If (сумма > 0) * (сумма1 > 0) Then k = 1
Nа = k
End Function
К сообщению приложен файл: 777555.xlsm(13Kb)

hands hands hands hands
Большое спасибо, да так и нужно было!!! Благодарю !!!
Автор - baaur
Дата добавления - 29.05.2014 в 15:29
Hugo Дата: Четверг, 29.05.2014, 15:38 | Сообщение № 7
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3255
Репутация: 707 ±
Замечаний: 0% ±

2019
Цитата baaur, 29.05.2014 в 15:26, в сообщении № 5
не совсем понял куда что писать?

Вдруг вместо A1 в формуле нужно значение из C25: в A1 пишем =C25
Т.е. пишем = и тык мышью в C25

excel@nxt.ru
webmoney: E265281470651 Z422237915069
 
Ответить
Сообщение
Цитата baaur, 29.05.2014 в 15:26, в сообщении № 5
не совсем понял куда что писать?

Вдруг вместо A1 в формуле нужно значение из C25: в A1 пишем =C25
Т.е. пишем = и тык мышью в C25
Автор - Hugo
Дата добавления - 29.05.2014 в 15:38
baaur Дата: Четверг, 29.05.2014, 15:51 | Сообщение № 8
Группа: Пользователи
Ранг: Участник
Сообщений: 70
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Цитата Hugo, 29.05.2014 в 15:38, в сообщении № 7
Вдруг вместо A1 в формуле нужно значение из C25: в A1 пишем =C25
Т.е. пишем = и тык мышью в C25


Спасибо!
Но функция (которая выше) намного удобней (то что нужно), так как в ячейках А1 и B1 могут быть данные.
 
Ответить
Сообщение
Цитата Hugo, 29.05.2014 в 15:38, в сообщении № 7
Вдруг вместо A1 в формуле нужно значение из C25: в A1 пишем =C25
Т.е. пишем = и тык мышью в C25


Спасибо!
Но функция (которая выше) намного удобней (то что нужно), так как в ячейках А1 и B1 могут быть данные.
Автор - baaur
Дата добавления - 29.05.2014 в 15:51
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Как создать пользовательскую функцию из встроенной функции (Функции/Function)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!