Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.60/15: Рейтинг темы: голосов - 15, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 12.04.2015
Сообщений: 53
Excel

Пользовательские функции

20.11.2018, 11:57. Показов 3564. Ответов 25

Студворк — интернет-сервис помощи студентам
Привет всем читающим,покой нам только снится
Возникла пара вопросов по пользовательским функциям
Задача: посчитать количество ячеек по строкам отвечающих определенным критериям - чтобы в 1 ячейке было "Петя", во 2 ячейке "Вася Собачкин" и по датам соответствовало

Пробовал так - выдает ошибку

Visual Basic
1
2
3
4
5
6
Public Function CountTNMonth2015(dat As Date, dat1 As Date, range1 As Range, range2 As Range, range3 As Range) As Integer
Dim cell As Object
For Each cell In range1
If cell >= dat And cell <= dat1 And range2 = "Петя" And range3 = "Вася Собачкин" Then CountTNMonth2015 = CountTNMonth2015 + 1
Next
End Function
Пробовал так - считает нуль

Visual Basic
1
2
3
4
5
6
Public Function CountTNMonth2015(dat As Date, dat1 As Date, range1 As Range) As Integer
Dim cell As Object
For Each cell In range1
If cell >= dat And cell <= dat1 And cell = "Петя" And cell = "Вася Собачкин" Then CountTNMonth2015 = CountTNMonth2015 + 1
Next
End Function
Также надо усложнить задачу - чтобы был не просто счётчик а считал сумму энных ячеек - то есть если в 1 ячейке "Петя" во 2 ячейке "Вася Собачкин" и даты соответствуют тогда включал в суммирование 3 ячейку с числами и выводил результат в конечную ячейку
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
20.11.2018, 11:57
Ответы с готовыми решениями:

Пользовательские процедуры и функции
Здравствуйте. У меня в VBA вот такая задача: найти периметр фигуры ABCD по заданным сторонам AB, АС и DC. (Определить процедуру для расчета...

Пользовательские функции в Excel
Помогите пожалуйста с заданием!!! Вроде все правильно, а ничего не получается. Нужно создать функцию в Excel? используя VBA. ...

Пользовательские функции из стандартных
Возникла проблема с созданием пользовательской функции с использованием стандартных функций в Excel. Function ЕСЛИНЕЧИСЛО(a) ...

25
0 / 0 / 0
Регистрация: 12.04.2015
Сообщений: 53
22.11.2018, 11:43  [ТС]
Студворк — интернет-сервис помощи студентам
Данный топик отпал сам собой,нашел более простой способ решения
Теперь вопрос не по этой теме,но флудить новой темой желания нет
Можно ли сделать хотя бы один из вопросов?лучше конечно будет первый
1. Можно ли в экселе сделать автозаполнение единичкой (1) в одном столбце,если в другом столбце имеется текст?
2. Ну или если первый вариант невозможен,можно ли заполнить один столбец опять же единичками (1) до самого конца?

Добавлено через 2 минуты
И да,просто для расширения Excel кругозора вопрос
Сделал много пользовательских формул,рабочий компьютер захотел улететь на луну
Поигрался с функцией СУММЕСЛИМН,решил задачу через неё. Заполнил такой же количество ячеек формулами, перестал тормозить.Там же схожий процесс,но процессор жрёт на порядок меньше,почему?
0
6998 / 2896 / 555
Регистрация: 19.10.2012
Сообщений: 8,804
22.11.2018, 11:52
1. Можно. Например даблкликом по уголку. Правому нижнему. После заполнения одной ячейки.
2. Макросм вообще что угодно...
0
0 / 0 / 0
Регистрация: 12.04.2015
Сообщений: 53
22.11.2018, 11:56  [ТС]
И про даблклик и про макрос я конечно знал,но вот чтоб само это реализовывалось..нет это всегда нет
0
6998 / 2896 / 555
Регистрация: 19.10.2012
Сообщений: 8,804
22.11.2018, 12:18
Чтоб само - это фантастика
0
4089 / 1469 / 401
Регистрация: 07.08.2013
Сообщений: 3,674
23.11.2018, 06:06
Цитата Сообщение от Andrey_konoval Посмотреть сообщение
1. Можно ли в экселе сделать автозаполнение единичкой (1) в одном столбце,если в другом столбце имеется текст?
можно так
=если(A1="";"";1)
и протянуть формулу
соответственно ячейка за которой смотрим это А1
0
0 / 0 / 0
Регистрация: 12.04.2015
Сообщений: 53
23.11.2018, 08:19  [ТС]
Опять же спасибо,но я это тоже знал
Прикол в том что значения будут вставляться из другого листа эксель,я пока что решил проблему протягиванием единичек на куда большой диапозон чем вставляемые значения
Мне надо чтоб это условие работало для столбца А:А к примеру
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
23.11.2018, 08:19

Пользовательские функции линейной структуры
Помогите написать несколько любых пользовательских функций линейной структуры

Worksheet_Change убивает пользовательские функции
Добрый вечер! Прошу помочь со следующей проблемой: В файле в приложении есть 2 функции в модуле 1. Они вычисляют дату (Q2) и число...

Пользовательские функции VBA обновление при закрытой книге
Добрый вечер. Есть некая функция, не важно какая (ниже просто пример), которая берет данные из другой книги. Но только все работает...

Пользовательские процедуры и функции. Функция для расчета площади равнобедренной трапеции
поскольку по причине болезни я пропустил занятие по программированию в вузе, то я не совсем знаю как сделать следующее задание, и прошу вас...

Как использовать пользовательские функции при указании диапазонов допустимых значений. Excel+VBA
В общем, идея была простая. Для создания выпадающего списка из допустимых значений нужен источник - массив этих значений. Удалить из...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
26
Ответ Создать тему
Новые блоги и статьи
Про "Windows must die!"
kumehtar 04.11.2026
Знаете, чет накатило. . . . Когда-то это было почти боевым кличем: мол, нормальный человек сидит на DOS, OS/ 2 или Linux, а вот это вот - Must Die. А теперь человек произносит «мастдай» с усмешкой - и. . .
Красочные поля с номером страницы svg+background-image
russiannick 04.11.2026
Красочные поля с номером страницы не менее важны чем в эпоху бумажных книг. Посему спешу представить почтеннейшей публике этот важный инструмент который эти поля и формирует. В процессе разработки. . .
Вступаем в новую фазу генерации favicons, векторную.
russiannick 02.11.2026
Теперь нет нужды скрывать что используется простой svg. Исходный код изображения помещаем в поле и жмем кнопку. Исходник преобразуется в вид корректный для помещения в favicon или в url(). Нажатие. . .
Генератор паролей (вариант №4)
Maks 01.11.2026
После публикации 3-го варианта генератора паролей, разослал его своим коллегам (с целью оценки), в итоге были получены следующие рекомендации: 1. Вернуть возможность использования знаков | 1 l I;. . .
Генератор паролей (вариант №3)
Maks 30.10.2026
Финальная версия генератора паролей 1С. Доработка решения в этот раз коснулась только визуальной части, а именно, добавлен реквизит ДопПараметры (тип Булево), который скрывает/ отображает реквизиты:. . .
Магическое мышление и магия, современная наука не отличима от магии (говорит ИИ Джемени)
zorxor 30.10.2026
Джемени, расскажи, пожалуйста, что такое магическое мышление, что такое магия, почему современная наука чем-то напоминает магию? Фраза «Любая достаточно развитая технология неотличима от магии». . .
За какое время ИИ может подобрать пароль по хешу (рассказывает Джемени ИИ)
zorxor 30.10.2026
Расскажи, Джемени, если известен хэш МД5, например, за сколько ИИ сможет подобрать соответствующий пароль? Искусственный интеллект (ИИ) может подобрать простой или средний по сложности пароль по. . .
Кто убил Suno? Почему наше солнышко погасло? (диалог с ИИ Джемени)
zorxor 30.10.2026
Как убивали Suno. Хронология. «Убийство» музыкальной нейросети Suno — это затяжной процесс, в котором технологический хайп стартапа разбился о жесткую реальность судебных исков от гигантов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru