У меня проблемы с таблицей Excel. Я провожу еженедельную инвентаризацию товаров и вычитаю их из списка потребностей, чтобы создать заказы на неделю. Мой коллега делает это вручную, но я решил помочь, сделав для него кнопки для выполнения различных задач. Кажется, я не могу выполнить эту кнопку.
Разница между If GF (положительна) / распределите необходимое число по четырем столбцам. Если G-F (отрицательно), то 0.
При необходимости могу перемещать столбцы. Любая помощь приветствуется! Изображение руководства по заказу
Я попробовал несколько кодов SpreadEven VBA, которые нашел в Интернете. Я не смог внести необходимые изменения, чтобы заставить его работать.


Этот обходной путь предполагает использование только формул Excel. В версии A между входными столбцами и столбцами результатов необходим столбец-разделитель.
В версии B есть две формулы: одна для первого значения, вторая для трех остальных.
Версия А
Столбец-разделитель находится в столбце H.
Формула в I4 и эта формула копируется во все остальные ячейки.
=IF(($G4-$F4)>0,ROUND(($G4-$F4-SUM($H4:H4))/(COLUMN($F4)+7-COLUMN()),))
Версия Б
Формула в H13 и скопируйте ее=IF(($G13-$F13)>0,ROUND(($G13-$F13)/4,))
Формула в I13 и скопируйте весь диапазон (в примере I13:K18)=IF(($G13-$F13)>0,ROUND(($G13-$F13-SUM($H13:H13))/(COLUMN($I13)+2-COLUMN(H13)),))
По сути, разделите общее значение для распределения — уже подсчитанные значения на оставшееся количество столбцов и всегда округляйте числа до целого значения.
В VBA (если это необходимо) всем этим формулам можно назначить свойство Range.Formula.
Спасибо большое за формулы! Я преобразую их в VBA, чтобы создать кнопку. Я ценю вашу помощь.