|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
26.01.2012, 16:28 | #1 |
Регистрация: 23.01.2012
Сообщений: 8
|
Автосумма
Приветствую всех. Нужно сделать в ворде автосумму. Чтобы посчитать например весь столбец можно с помощью Selection.InsertFormula Formula:="=SUM(ABOVE)", NumberFormat:="". Вопрос в том, как сделать чтобы считались только выделенные ячейки?
|
26.01.2012, 16:42 | #2 |
Старожил
Регистрация: 24.01.2011
Сообщений: 3,060
|
В ворде таблица проходим по всем ячейкам, если выделено, значит она наша
считываем в память заносим число и двигаемся дальше |
26.01.2012, 17:07 | #3 |
Регистрация: 23.01.2012
Сообщений: 8
|
Тоесть нужен цикл?
|
26.01.2012, 19:10 | #4 |
Старожил
Регистрация: 24.01.2011
Сообщений: 3,060
|
естественно
|
27.01.2012, 05:26 | #5 |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
Если ячейки выделены не подряд, то не получится, т.к. макросом нельзя получить список этих ячеек или, перебирая, определить, что ячейка выбрана. А если ячейки выбраны подряд, тогда можно так:
Код:
Лучше день потерять — потом за пять минут долететь!©
|
27.01.2012, 05:29 | #6 |
Старожил
Регистрация: 24.01.2011
Сообщений: 3,060
|
>Если ячейки выделены не подряд, то не получится
А что можете их выделить не подряд? |
27.01.2012, 06:32 | #7 |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
Конечно, могу. С зажатым Ctrl
Лучше день потерять — потом за пять минут долететь!©
|
27.01.2012, 10:33 | #8 |
Регистрация: 23.01.2012
Сообщений: 8
|
i - первая ячейка j - последняя, а что делает код написанный дальше, как считается сумма, по идее должен быть цикл?
И ещё, что изменить в коде, чтобы считались ячейки в строке? |
28.01.2012, 00:41 | #9 |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
Никакого цикла. Сумма, как и раньше, считается формулой. Например, SUM(A1:A4) посчитает сумму первых четырёх ячеек первого столбца.
немного изменю. Теперь будет считать и по строкам и/или по столбцам, в зависимости от выбранных ячеек Код:
Лучше день потерять — потом за пять минут долететь!©
|
28.01.2012, 12:26 | #10 |
Старожил
Регистрация: 24.01.2011
Сообщений: 3,060
|
было
4 46 53 23 Последнюю в столбце он стёр и написал сумму без последней = 103 Непорядок |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Автосумма "динамическая" (значения берутся с разных листов) | AKSENOV048 | Microsoft Office Excel | 2 | 22.09.2011 13:26 |
Автосумма(Си) | kilgoreq | Помощь студентам | 2 | 04.11.2010 20:20 |