Гуру и Гуриям Excel. I need help! [Печать]
Выбрать сообщения с # по # FAQ
AUTOLADA.RU -> Кофейня и курилка |
#1: Гуру и Гуриям Excel. I need help! Автор: wonderer,  СообщениеДобавлено: 06 Января 2020 20:43
Каждая белая строка является суммой следующих под ней жёлтых
Как сумму проставить в белых?

#2:  Автор: Alexandr008, Откуда: Воронеж СообщениеДобавлено: 06 Января 2020 20:48
Функцию суммы или автосумма с выделением. Это элементарщина.
#3:  Автор: wonderer,  СообщениеДобавлено: 06 Января 2020 21:11
Alexandr008 писал(а):

Функцию суммы или автосумма с выделением. Это элементарщина.



либо давай подробнее, либо не так задачу понял. Мне надо сделать так, чтобы к очень большому количеству белых строк эта автосумма применилась
#4:  Автор: wonderer,  СообщениеДобавлено: 08 Января 2020 00:02
шо, никто? cry
#5:  Автор: Wanderlust, Откуда: [62] СообщениеДобавлено: 08 Января 2020 01:55
wonderer
Тут скриптовать VBA под эксель нужно, что бы очень много было быстро.
Или ручками каждую строчку, или по всему столбцу А, если в ячейке число, то по столбцу С суммировать все ячейки с числами.
Можно по форматированию (цвету) ячеек столбца С сделать - к белой прибавлять блок жёлтых.

Добавлено спустя 1 минуту 35 секунд:

Если нужно - подробней форматирование таблицы опиши, чем она заканчивается, есть ли по столбцу "С" пустые ячейки "". Минут на 15 делов. Потом в лист вставляешь скрипт и запускаешь его.
#6:  Автор: wonderer,  СообщениеДобавлено: 08 Января 2020 02:11
Wanderlust писал(а):

wonderer
Тут скриптовать VBA под эксель нужно, что бы очень много было быстро.
Или ручками каждую строчку, или по всему столбцу А, если в ячейке число, то по столбцу С суммировать все ячейки с числами.
Можно по форматированию (цвету) ячеек столбца С сделать - к белой прибавлять блок жёлтых.

Добавлено спустя 1 минуту 35 секунд:

Если нужно - подробней форматирование таблицы опиши, чем она заканчивается, есть ли по столбцу "С" пустые ячейки "". Минут на 15 делов. Потом в лист вставляешь скрипт и запускаешь его.



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

много страниц с подобным, всегда разное количество желтых в белом сабтотале facepalm
#7:  Автор: Wanderlust, Откуда: [62] СообщениеДобавлено: 08 Января 2020 13:20
Нужно включить закладку "Разработчик",
слева вверху вторая кнопка "Макросы" -> создать (вводишь любое название макроса для активации кнопки "создать", затем удаляешь всё в окне)
и копируешь код:

Sub multicalcblock()
Debug.Print ("RUN multicalсblock")
Dim markblock As String
scanline = 1
'Cacl column
calcclmn = 3
'Set start position
markblock = Cells(scanline, 1)
While Not IsNumeric(markblock)
scanline = scanline + 1
markblock = Cells(scanline, 1)
Wend
'start calculation
Debug.Print ("Start at line " & scanline)
While scanline <= 65535 And (Cells(scanline, 1) <> "" Or Cells(scanline, calcclmn) <> "")
markblock = Cells(scanline, 1)
If IsNumeric(markblock) Then
clcrwcells = scanline
Cells(clcrwcells, calcclmn) = 0
Debug.Print ("Block at line " & clcrwcells)
scanline = scanline + 1
Else
Cells(clcrwcells, calcclmn) = Cells(clcrwcells, calcclmn) + Cells(scanline, calcclmn)
scanline = scanline + 1
End If
Wend
Debug.Print ("Stop at line " & scanline)
End Sub

Эта программа прокручивает по первому столбцу ячейки сстроки до первого числа, затем на этой строке в столбце 3 обнуляет ячейку, и суммирует в неё идущие ниже ячейки до следующей строки с числом в столбце 1, тогда обнуляет ячейку в столбце 3 и так же суммирует нижеследующие ячейки до числа в столбце 1; и всё повторяет пока не встретит всю пустую строку.

Потом возвращаешься на лист эксель и через кнопку "Макросы" снова заходишь в панель управления макросами, там видишь созданный макрос "multicaclblock" который можно выполнить - он просчитает весь текущий (открытый) лист.

Добавлено спустя 13 минут 22 секунды:

Только зачем считать, если в примере уже всё посчитано? Или это полу-вручную?
#8:  Автор: _Remus_, Откуда: из города о трех шурупах СообщениеДобавлено: 09 Января 2020 13:29
Похоже аффтару легче все же будет вручную формулы накопипастить.
AUTOLADA.RU -> Кофейня и курилка |
Страница 1 из 1
Часовой пояс: GMT + 4
AUTOLADA.RU