Кнопка Excel для таблицы номиналов

У меня проблемы с таблицей Excel. Я провожу еженедельную инвентаризацию товаров и вычитаю их из списка потребностей, чтобы создать заказы на неделю. Мой коллега делает это вручную, но я решил помочь, сделав для него кнопки для выполнения различных задач. Кажется, я не могу выполнить эту кнопку.

Разница между If GF (положительна) / распределите необходимое число по четырем столбцам. Если G-F (отрицательно), то 0.

При необходимости могу перемещать столбцы. Любая помощь приветствуется! Изображение руководства по заказу

Я попробовал несколько кодов SpreadEven VBA, которые нашел в Интернете. Я не смог внести необходимые изменения, чтобы заставить его работать.

Преобразование HTML-таблицы в профессиональный документ Excel
Преобразование HTML-таблицы в профессиональный документ Excel
Это самый простой способ создания Excel из HTML-таблицы.
Импорт excel в laravel в базу данных
Импорт excel в laravel в базу данных
Здравствуйте, дорогой читатель, в этой статье я расскажу практическим и быстрым способом, как импортировать файл Excel в вашу базу данных с помощью...
1
0
70
1
Перейти к ответу Данный вопрос помечен как решенный

Ответы 1

Ответ принят как подходящий

Этот обходной путь предполагает использование только формул 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, чтобы создать кнопку. Я ценю вашу помощь.

MRupe 20.07.2024 21:06

Другие вопросы по теме