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

Вход

Регистрация

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

 

= Мир MS Excel/сумма чисел при условиях - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » сумма чисел при условиях (Формулы/Formulas)
сумма чисел при условиях
Wuilky Дата: Четверг, 22.01.2015, 14:05 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день!!!
подскажите, пожалуйста с формулой
пример в приложение
К сообщению приложен файл: 2015_summa_prim.xls (59.0 Kb)
 
Ответить
СообщениеДобрый день!!!
подскажите, пожалуйста с формулой
пример в приложение
Автор - Wuilky
Дата добавления - 22.01.2015 в 14:05
_Boroda_ Дата: Пятница, 23.01.2015, 12:45 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16912
Репутация: 6616 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Так нужно?
Код
=ЕСЛИ(BC11=1;СУММ(Q11:AF11);"")

Цитата
как продлевать формулу для остальных строчек.

Хватаете за нижний правый угол ячейки мышой и тянете насколько нужно
К сообщению приложен файл: 0147748.xls (63.5 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
Код
=ЕСЛИ(BC11=1;СУММ(Q11:AF11);"")

Цитата
как продлевать формулу для остальных строчек.

Хватаете за нижний правый угол ячейки мышой и тянете насколько нужно
Автор - _Boroda_
Дата добавления - 23.01.2015 в 12:45
Wuilky Дата: Пятница, 23.01.2015, 13:05 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, СПАСИБО ВАМ ОГРОМНОЕ!!!!
ОЧЕНЬ ПОМОГЛИ))
 
Ответить
Сообщение_Boroda_, СПАСИБО ВАМ ОГРОМНОЕ!!!!
ОЧЕНЬ ПОМОГЛИ))
Автор - Wuilky
Дата добавления - 23.01.2015 в 13:05
malu2 Дата: Пятница, 23.01.2015, 17:39 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 2 ±
Замечаний: 20% ±

Excel 2007
Может не в тему, Как я понял у вас много файлов и их вы бирете из макроса. Надеюсь поможет. Тогда:
В макросе добавить:
[vba]
Код
Dim pathfile(99999) As String, filename(9999) As String, VremSumma As String
' pathfile(99999) путь должен быть полным т.е. в конце \
Nomerstroki = 11 'Нужный
kolfilov = 111 ' Ваше количество файлов
VremSumma = ""
For i = i To kolfilov
If i = 1 Then
VremSumma = "=SUM('" & pathfile(i) & "[" & filename(i) & "]Sheet(1)'!Q" & Nomerstroki & ":AF" & Nomerstroki & ")"
Else
VremSumma = VremSumma & "+ SUM('" & pathfile(i) & "[" & filename(i) & "]Sheet(1)'!Q" & Nomerstroki & ":AF" & Nomerstroki & ")"
End If
Next
Range("B" & Nomerstroki).Formula = VremSumma ' Вместо B колонка в которую нужно вставить формулу
[/vba]
 
Ответить
СообщениеМожет не в тему, Как я понял у вас много файлов и их вы бирете из макроса. Надеюсь поможет. Тогда:
В макросе добавить:
[vba]
Код
Dim pathfile(99999) As String, filename(9999) As String, VremSumma As String
' pathfile(99999) путь должен быть полным т.е. в конце \
Nomerstroki = 11 'Нужный
kolfilov = 111 ' Ваше количество файлов
VremSumma = ""
For i = i To kolfilov
If i = 1 Then
VremSumma = "=SUM('" & pathfile(i) & "[" & filename(i) & "]Sheet(1)'!Q" & Nomerstroki & ":AF" & Nomerstroki & ")"
Else
VremSumma = VremSumma & "+ SUM('" & pathfile(i) & "[" & filename(i) & "]Sheet(1)'!Q" & Nomerstroki & ":AF" & Nomerstroki & ")"
End If
Next
Range("B" & Nomerstroki).Formula = VremSumma ' Вместо B колонка в которую нужно вставить формулу
[/vba]
Автор - malu2
Дата добавления - 23.01.2015 в 17:39
malu2 Дата: Пятница, 23.01.2015, 17:57 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 2 ±
Замечаний: 20% ±

Excel 2007
Забыл условие поставить

[vba]
Код
If i = 1 Then
VremSumma = "=IF(BC" & Nomerstroki & "=1;SUM('" & pathfile(i) & "[" & filename(i) & "]Sheet(1)'!Q" & Nomerstroki & ":AF" & Nomerstroki & ")"

Range("B" & Nomerstroki).Formula = VremSumma & ",)"' Вместо B колонка в которую нужно вставить формулу
[/vba]
[moder]Оформляйте коды тегами (кнопка #)[/moder]
 
Ответить
СообщениеЗабыл условие поставить

[vba]
Код
If i = 1 Then
VremSumma = "=IF(BC" & Nomerstroki & "=1;SUM('" & pathfile(i) & "[" & filename(i) & "]Sheet(1)'!Q" & Nomerstroki & ":AF" & Nomerstroki & ")"

Range("B" & Nomerstroki).Formula = VremSumma & ",)"' Вместо B колонка в которую нужно вставить формулу
[/vba]
[moder]Оформляйте коды тегами (кнопка #)[/moder]
Автор - malu2
Дата добавления - 23.01.2015 в 17:57
Мир MS Excel » Вопросы и решения » Вопросы по Excel » сумма чисел при условиях (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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