VBA, суммирование полей у совпадающих данных / Microsoft Office

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA, суммирование полей у совпадающих данных

18 сообщений из 18, страница 1 из 1

VBA, суммирование полей у совпадающих данных

#36513129

Gerard

Участник

Сообщения: 21

Рейтинг: 0 / 0

Подскажите плиз код для примерно следующего:

Дана книга иксель, на одном листе примерно такие значения в столбцах:

Код: plaintext

1.
2.
3.
4.
5.

 555     2000 
 555     1000 
 999     500 
 333     250 
 999     200

После применения макроса на другом листе должно получиться следующее:

Код: plaintext

1.
2.
3.

 555     3000 
 999     700 
 333     250

Т.е. сравниваем значения первого столбца и если совпадают - то суммируем, а если нет совпадений то просто перекидываем.

...

Рейтинг:

0 / 0

11.03.2010, 09:32

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513136

vikttur

Участник

Сообщения: 1 079

Рейтинг: 0 / 0

Макрос будет минимум из трех строк - имя макроса, тело макроса, конец работы макроса.
А формула с функцией СУММЕСЛИ- всего одна строка :)

...

Рейтинг:

0 / 0

11.03.2010, 09:35

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513145

Gerard

Участник

Сообщения: 21

Рейтинг: 0 / 0

дело в том, что например в 1С есть функция Свернуть(), которая выполняет то что нужно, а в VBA я такую не нашёл

вот и пробую писать макрос с циклами...

...

Рейтинг:

0 / 0

11.03.2010, 09:40

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513154

Gerard

Участник

Сообщения: 21

Рейтинг: 0 / 0

viktturМакрос будет минимум из трех строк - имя макроса, тело макроса, конец работы макроса.
А формула с функцией СУММЕСЛИ- всего одна строка :)

попробовал использовать приведенную вами функцию, не подходит, может я не так что-то написал

пожете написать как примерно нужно в моем случае применить функцию?

...

Рейтинг:

0 / 0

11.03.2010, 09:44

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513184

Dophin

Гость

vikttur

прежде чем использовать СУММЕСЛИ неплохо было бы определиться с уникальными значениями) это еще одна формула

вот макросик

...

Рейтинг:

0 / 0

11.03.2010, 10:04

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513230

vikttur

Участник

Сообщения: 1 079

Рейтинг: 0 / 0

Dophin, точно, две строки

...

Рейтинг:

0 / 0

11.03.2010, 10:17

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513272

Gerard

Участник

Сообщения: 21

Рейтинг: 0 / 0

Dophinvikttur

прежде чем использовать СУММЕСЛИ неплохо было бы определиться с уникальными значениями) это еще одна формула

вот макросик

спасибо )

а вот для интереса можно поинтресоваться, а решение вышеперичесленной задачи можно сделать без функции СУММЕСЛИ ?

интересует через цикл, путем перебора строк, возможно с первоначальным занесением их в массив

примерно так:

Код: plaintext

1.
2.

пока <Начальная ячейка> = <Следующая ячейка> цикл
"суммируем данные"
конец цикла

...

Рейтинг:

0 / 0

11.03.2010, 10:30

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513352

-nail-

Гость

Gerard,
сводная таблица поможет (данные - сводная таблица)

...

Рейтинг:

0 / 0

11.03.2010, 10:53

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513420

Dophin

Гость

так они у Вас вперемешку, условие "пока значение = предыдущему значению" не прокатит

циклом так можно
_{For j = 1 To uniq.Count

For i = 1 To ilastrow

If Cells(i, 1) = uniq(j) Then

sum = sum + Cells(i, 2)

End If

Next i

Cells(j, 5) = sum

sum = 0

Next j}

...

Рейтинг:

0 / 0

11.03.2010, 11:15

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513617

Gerard

Участник

Сообщения: 21

Рейтинг: 0 / 0

всем спасибо :)

...

Рейтинг:

0 / 0

11.03.2010, 12:09

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513668

Medvich

Участник

Сообщения: 376

Рейтинг: 0 / 0

Коллеги, поздравляю с очередным "валасипетом"!!!
Неясна задача
Если задача - получить актуальные данные на новом листе, то следует использовать сводную таблицу.
Если задача написать макрос - то это можно и SQL запросом к Excel листу сделать, особо не выдумывая всякомудрых цикло-велосипедов, которые потом оттормозят так, что появится очередной душераздирающий топик в стиле "тормозит макрос, что делать?".

...

Рейтинг:

0 / 0

11.03.2010, 12:23

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36513828

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

MedvichКоллеги, поздравляю с очередным "валасипетом"!!!
Неясна задача
Если задача - получить актуальные данные на новом листе, то следует использовать сводную таблицу.
Если задача написать макрос - то это можно и SQL запросом к Excel листу сделать, особо не выдумывая всякомудрых цикло-велосипедов, которые потом оттормозят так, что появится очередной душераздирающий топик в стиле "тормозит макрос, что делать?".согласен про sql-запрос. работать будет на порядок быстрее, чем циклом

...

Рейтинг:

0 / 0

11.03.2010, 13:15

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36514524

Гость

авторэто можно и SQL запросом к Excel листу сделать
Из самого екселя к листу в нем? А примерчик?

...

Рейтинг:

0 / 0

11.03.2010, 16:17

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36514583

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

данные-внешние5 данные-создать запрос-Файлы Excel*

...

Рейтинг:

0 / 0

11.03.2010, 16:38

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36514680

Гость

А на VBA примерчика нет?

...

Рейтинг:

0 / 0

11.03.2010, 17:05

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36515199

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

включите макрорекордер - будет примерчик на vba

...

Рейтинг:

0 / 0

11.03.2010, 20:38

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36515620

Gerard

Участник

Сообщения: 21

Рейтинг: 0 / 0

PlanBданные-внешние5 данные-создать запрос-Файлы Excel*

а скажите где SQL-запрос писать к Excel ? и в какой проге находятся эти пункты меню?

...

Рейтинг:

0 / 0

12.03.2010, 07:01

| Ответить | Цитировать | Написать

VBA, суммирование полей у совпадающих данных

#36516618

PlanB

Участник

Откуда: Moscow

Сообщения: 2 731

Рейтинг: 0 / 0

Gerardа скажите где SQL-запрос писать к Excel ?где умеетеGerardи в какой проге находятся эти пункты меню?эти - в excel

...

Рейтинг:

0 / 0

12.03.2010, 13:39

| Ответить | Цитировать | Написать

18 сообщений из 18, страница 1 из 1

Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBA, суммирование полей у совпадающих данных

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=61&msg=36513352&tid=2178369]:	0ms
get settings:	6ms
get forum list:	12ms
check forum access:	2ms
check topic access:	2ms
track hit:	169ms
get topic data:	6ms
get forum data:	1ms
get page messages:	38ms
get tp. blocked users:	1ms
others:	195ms

total:	432ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы