Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.10.2010, 11:28   #1
Red_Garry
Пользователь
 
Регистрация: 03.10.2010
Сообщений: 55
По умолчанию Вопрос по СУММЕСЛИ

Здравствуйте!
Необходимо произвести суммирование по столбцу A. Критерием суммирования является формат текста, расположенный в столбце B. Т.е. если соответствующий текст в столбце B жирный, то число в столбце A должно участвовать в операции суммирования. Как это осуществить?

Спасибо
Red_Garry вне форума Ответить с цитированием
Старый 03.10.2010, 13:24   #2
Serge 007
Участник клуба
 
Аватар для Serge 007
 
Регистрация: 15.12.2009
Сообщений: 1,448
По умолчанию

Цитата:
Сообщение от Red_Garry Посмотреть сообщение
Критерием суммирования является формат текста, расположенный в столбце B. Т.е. если соответствующий текст в столбце B жирный, то число в столбце A должно участвовать в операции суммирования. Как это осуществить?
Здравствуйте.
Без макросов - никак. Формулы не различают форматы.
Посмотрите аналогичную тему здесь.
Бесплатная помощь: www.excelworld.ru
Платная помощь: serge_007.planetaexcel@mail.ru
https://yoomoney.ru: 41001419691823
Serge 007 вне форума Ответить с цитированием
Старый 03.10.2010, 13:43   #3
nilem
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 616
По умолчанию

Например, так:
Код:
Function SumBold(RngCond As Range, RngSum As Range) As Single
Dim i As Long, rez As Single
If RngCond.Count <> RngSum.Count Then Exit Function
If RngCond.Columns.Count > 1 Or RngSum.Columns.Count > 1 Then Exit Function
For i = 1 To RngCond.Count
    If RngCond.Cells(i).Font.Bold Then rez = rez + RngSum.Cells(i).Value
Next i
SumBold = rez
End Function
На листе будет выглядеть: =SumBold(B1:B17;A1:A17)
nilem вне форума Ответить с цитированием
Старый 04.10.2010, 07:26   #4
Red_Garry
Пользователь
 
Регистрация: 03.10.2010
Сообщений: 55
По умолчанию

Большое спасибо за ответы!
Red_Garry вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
СУММЕСЛИ с двойным условием chandrasecar Microsoft Office Excel 2 11.07.2010 17:08
Функция СУММЕСЛИ Евгений К. Microsoft Office Excel 3 07.07.2010 13:04
Помогите по СУММЕСЛИ komar73 Microsoft Office Excel 2 24.01.2009 11:30
СУММЕСЛИ по нескольким условиям 2 Levchik Microsoft Office Excel 8 27.05.2008 09:15
Суммесли tsap Microsoft Office Excel 2 17.05.2008 20:22