Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
В разных книгах считать количество ячеек, в которых установлена галка
 
Добрый день.
Прошу помощи в решении вопроса.

У каждого на компьютере есть файл Excel (в примере всё в одном файле). В каждом листе содержатся данные участника. Конкретному участнику в его листе предложено согласие от других участников.
Если он нажал галочку, то его "да" считается или суммируется к "да" других согласных и отображается в ячейке I2 (отмечено цветом) листа участника с которым они согласились.
Вот это я и стараюсь сделать.
 
Доброе время суток.
Udf-функция, возвращающая для указанного листа число включенных "галок".
Код
Public Function CheckedCount(ByVal onSheet As Worksheet) As Long
    Dim pCheck As Object, vResult As Long
    For Each pCheck In onSheet.CheckBoxes
        If pCheck.Value = MsoTriState.msoCTrue Then vResult = vResult + 1
    Next
    CheckedCount = vResult
End Function
 
Андрей VG, Спасибо. Вставил Ваш код в модуль. И не понял как использовать полученную функцию. Что я делаю не так?

Тут должна была быть картинка, но она не вставляется...
Изменено: PlomBir1 - 4 Дек 2018 12:05:11
 
Форум по Excel, а Вы сылками на картинки кидаетесь... Вернитесь и приведите сообщение в порядок.
 
vikttur, Спасибо
 
Добрый день.
Прикрепил картинку (т.к. по другому не вставляется), помогите разобраться в моём вопросе.
Screenshot_78.jpg (118.42 КБ)
Страницы: 1
Читают тему (гостей: 1)
Наверх