Ну, на самом деле вам не нужен VBA, чтобы делать что-то подобное. Условное форматирование будет работать просто отлично. Выделите диапазон (вы можете перейти к нижней части рабочей таблицы), значение N / A не имеет значения, и на вкладке «Главная» щелкните условное форматирование> Новое правило ...> Используйте формулу, чтобы определить, какие ячейки форматировать, и в В формулу введите следующее:
=IF(B1="",FALSE,MIN(B1:H1)=B1)
Нажмите «Формат» и выберите нужный цвет заливки. Таким образом, способ работы начинается с ячейки, которую вы сначала выбрали, B1. Если вы щелкнете и выберете B1: H4, а затем выберите форматирование условия, вы должны использовать первую строку в формуле. Он будет пытаться использовать точные ссылки с $ B $ 1, просто нажмите F4 пару раз, чтобы удалить их, поэтому =MIN(B1:H1)=B1 - это то, с чего я начал. После того, как это сработало, я добавил `= IF (b1 =" ", FALSE, MIN (B1: H1) = B1), так что вы можете сделать так, чтобы он опустился вниз и не закрашивал пустые ячейки.