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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 28.11.2009, 06:49   #1
Алексей11111
Пользователь
 
Регистрация: 19.10.2009
Сообщений: 44
По умолчанию Как просуммировать диапазоны?

Подскажите плз., как можно просуммировать диапазоны находящиеся на одинаковом растояние друг под другом, их 10 допустим...???
Алексей11111 вне форума Ответить с цитированием
Старый 28.11.2009, 09:30   #2
The_Prist
Участник клуба
 
Аватар для The_Prist
 
Регистрация: 17.07.2009
Сообщений: 1,088
По умолчанию

СУММ(диапазон1;диапазон2; и т.д.)
Или более подробно опишите, а еще лучше с файлом-примером.
WebMoney - R298726502453; Яндекс.Деньги - 41001332272872
www.excel-vba.ru
The_Prist вне форума Ответить с цитированием
Старый 28.11.2009, 10:26   #3
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

=суммпроизв(диапазон*(остат(строка( диапазон);А)=В))
где
диапазон - ссылка на диапазон с данными
А - через сколько строк выбирать данные
В - какую строку использовать для накопления суммы
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 28.11.2009, 15:32   #4
Алексей11111
Пользователь
 
Регистрация: 19.10.2009
Сообщений: 44
По умолчанию

Там их штук 300... не подойдёт...
Алексей11111 вне форума Ответить с цитированием
Старый 28.11.2009, 15:34   #5
Алексей11111
Пользователь
 
Регистрация: 19.10.2009
Сообщений: 44
По умолчанию

Что-то я не догнал, при чём тут суммпроизв? нужно просумировать строчки, каждый элемент строки с другим аналогичным элементом, произведние не нужно...
Алексей11111 вне форума Ответить с цитированием
Старый 28.11.2009, 15:38   #6
Алексей11111
Пользователь
 
Регистрация: 19.10.2009
Сообщений: 44
По умолчанию

И диапазонов очень много, я имею ввиду через vba как сделать?
Алексей11111 вне форума Ответить с цитированием
Старый 28.11.2009, 18:18   #7
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от Алексей11111 Посмотреть сообщение
И диапазонов очень много, я имею ввиду через vba как сделать?
Можно так, где 54 шаг диапазона и 31 диапазон, в вашем случае от 0 до 299
Код:
For dat = 0 to 30
With Application
    [E44].Offset(dat * 54) = .Sum([E3:E43].Offset(dat * 54))
        [F44].Offset(dat * 54) = .Sum([F3:F43].Offset(dat * 54)) + [B44].Offset(dat * 54)
            [G44].Offset(dat * 54) = .Sum([G3:G43].Offset(dat * 54))
            [H44].Offset(dat * 54) = .Sum([H3:H43].Offset(dat * 54))
        [A14].Offset(dat * 54) = .Sum([F3:F14].Offset(dat * 54))
    [A40].Offset(dat * 54) = .Sum([F15:F43].Offset(dat * 54))
End With
next

Последний раз редактировалось valerij; 28.11.2009 в 18:21.
valerij вне форума Ответить с цитированием
Старый 28.11.2009, 18:19   #8
DV68
Форумчанин
 
Регистрация: 05.08.2009
Сообщений: 465
По умолчанию

Можно и суммпроизв. Только немного изменил)
Можно и двссыл использовать.
можно еще сгруппировать нужные диапазоны и считать промежуточными итогами.
Вложения
Тип файла: rar сумм.rar (6.9 Кб, 18 просмотров)
"Все следует делать настолько простым, насколько это возможно, но не проще." Альберт Эйнштейн
DV68 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как скопировать диапазоны которые находятся на равном растояние друг от друга... Алексей11111 Microsoft Office Excel 12 15.11.2009 02:34
Как просуммировать список??? F_A_N_Alex Помощь студентам 8 02.10.2009 17:18
как просуммировать динамический диапазон abocharov Microsoft Office Excel 8 22.10.2008 18:47
Как просуммировать данные конкретной выборки ZLOdeev Microsoft Office Excel 6 20.10.2008 15:34
Как просуммировать одинаковые наименования? Алька Microsoft Office Excel 1 23.05.2007 22:02