ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как подсчитать сумму
9 сообщений из 9, страница 1 из 1
Как подсчитать сумму
    #34057988
svetolux
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
svetolux
Участник
Как подсчитать сумму на VBA, если диапазон ячеек меняется (ячейки могут добавляться и удаляться). И при изменении значений в ячейках сумма должна изменяться. Т.е. известно что сумму надо посчитать в 1 столбце, начиная с 6 строки и пока не оканчиваются записи. Потом например добавляем запись. Сумма должна пересчитаться. Или изменяем число в одной из ячеек. Сумма должна автоматически пересчитаться.
...
Рейтинг: 0 / 0
16.10.2006, 17:20:40
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34058058
Frost_Imp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Frost_Imp
Участник
А чем не подходит
Код: plaintext
СУММ(А:А)
где в столбце А находятся числа? И абсолютно без разница, 5 там строк или 50. Минус: формула суммы должна находится за пределами диапазона A:А
--------------------
А что на самом деле хотел сказать "Frost_Imp" никто не знает, так как одминистрация форума попросила его быть вежливым.
...
Рейтинг: 0 / 0
16.10.2006, 17:35:52
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34058129
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
ПРОМЕЖУТОЧНЫЕ.ИТОГИ(9,...)
Эта ф-ция адекватно реагирует на вставку/удаление строк в вычислемом диапазоне.
...
Рейтинг: 0 / 0
16.10.2006, 17:54:55
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34058539
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
Я извиняюсь конечно, но если речь все же о VBA, то скорее так:

Код: plaintext
1.
2.
3.
4.
Sub test()
    With ActiveSheet
        MsgBox Application.Sum(.Range(.[A6], [A65536].End(xlUp)))
    End With
End Sub


KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
16.10.2006, 20:14:29
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34058548
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
big-dukeПРОМЕЖУТОЧНЫЕ.ИТОГИ(9,...)
Эта ф-ция адекватно реагирует на вставку/удаление строк в вычислемом диапазоне.


ПРОМЕЖУТОЧНЫЕ.ИТОГИ и СУММ одинаково адекватно реагируют на вставку/удаление строк в вычислемом диапазоне. У них только два принципиальных различия:
1) ПРОМЕЖУТОЧНЫЕ.ИТОГИ не включает ячейки, скрытые Автофильтром
2) ПРОМЕЖУТОЧНЫЕ.ИТОГИ не включает ячейки, содержащие эту же функцию

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
16.10.2006, 20:20:08
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34059209
svetolux
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
svetolux
Участник
[quot Frost_Imp]А чем не подходит
Код: plaintext
СУММ(А:А)
где в столбце А находятся числа? И абсолютно без разница, 5 там строк или 50. Минус: формула суммы должна находится за пределами диапазона A:А

В том то и дело что сумма должна подсчитываться в ячейке данного столбца после всех записей.
...
Рейтинг: 0 / 0
17.10.2006, 10:38:33
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34059254
svetolux
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
svetolux
Участник
KL (XL)Я извиняюсь конечно, но если речь все же о VBA, то скорее так:

Код: plaintext
1.
2.
3.
4.
Sub test()
    With ActiveSheet
        MsgBox Application.Sum(.Range(.[A6], [A65536].End(xlUp)))
    End With
End Sub


KL
[MVP - Microsoft Excel]

Например надо чтобы в ячейке А10 была сумма А6:А9. Потом добавляем например еще 3 значения. Надо чтобы сумму автоматически пересчиталась и была записана в ячейку А13.
...
Рейтинг: 0 / 0
17.10.2006, 10:47:31
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34060386
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
Ну, батенька... а, извиняюсь...
Ну, маменька...
автор
Например надо чтобы в ячейке А10 была сумма А6:А9. Потом добавляем например еще 3 значения. Надо чтобы сумму автоматически пересчиталась и была записана в ячейку А13.
Вы что, затираете ячейку с формулой? (если была формула)
Делаем одно из следующего:
1) Меняем принцип - итоги выводятся "сверху", например в A3 -> =СУММ("A6:A65536").
2) Данные находятся в A6:A9. A10 - пустая. A11 -> =СУММ("A6:A10").
_Вставляем_ строку в A10. Формула будет в A12 и поменяется автоматом на =СУММ("A6:A11").
3) Пишем макрос. Типа "найти конец данных в столбце. в следующую пустую
ячейку записать формулу суммы с 6 строки по предыдущую"
Вешаем на эвент окончания ввода данных в ячейку исполнение этого макроса.
Долго и упорно страдаем с проверкой диапазонов ячеек и суммами в других столбцах и т.п.
...
Рейтинг: 0 / 0
17.10.2006, 15:05:28
| Ответить | Цитировать | Написать  
Как подсчитать сумму
    #34061282
KL (XL)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
KL (XL)
Участник
AndreTMНу, батенька... а, извиняюсь...
Ну, маменька...
автор
Например надо чтобы в ячейке А10 была сумма А6:А9. Потом добавляем например еще 3 значения. Надо чтобы сумму автоматически пересчиталась и была записана в ячейку А13.
Вы что, затираете ячейку с формулой? (если была формула)
Делаем одно из следующего:
1) Меняем принцип - итоги выводятся "сверху", например в A3 -> =СУММ("A6:A65536").
2) Данные находятся в A6:A9. A10 - пустая. A11 -> =СУММ("A6:A10").
_Вставляем_ строку в A10. Формула будет в A12 и поменяется автоматом на =СУММ("A6:A11").
3) Пишем макрос. Типа "найти конец данных в столбце. в следующую пустую
ячейку записать формулу суммы с 6 строки по предыдущую"
Вешаем на эвент окончания ввода данных в ячейку исполнение этого макроса.
Долго и упорно страдаем с проверкой диапазонов ячеек и суммами в других столбцах и т.п.

Еще вариант:

Если Excel2003, то...
- выбрать существующий список
- меню Данные-Список-Создать список...
- ввести суммирующюю формулу через строку ниже последней записи

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
17.10.2006, 17:54:30
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как подсчитать сумму
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=34059254&tid=2184121]:
 0ms
get settings:
 6ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 33ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 190ms
total:  288ms
созд. / загр.: 288ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]