Спасибо, Вам большое!

Добрый день, форумчане!
Прошу Вас помочь с решением следующей задачи:
- имеется 4 диапазона ячеек со значениями (четыре столбца);
- первые два столбца - наименование и кол-во "предложение поставщика";
- оставшиеся два столбца - наименование и кол-во "остатки на складе";
Как сделать формулу так, чтобы наименование "предложение поставщика" сравнивалось с диапазоном наименование "остатки на складе" и в случае совпадения значения вычисляло разницу их количества.
Файл во вложении.

Sanja!
Спасибо!

Добрый день, Sanja!
Тогда, прошу подсказать, возможно ли, оставив в ячейках единицы измерения (закупаю продукцию и в шт. и в комплектах и др.), обеспечить правильную работу Условного форматирования?

Игорь!
Огромное спасибо!)

Игорь!
Возможно к Вам обращаться по возникающим вопросам в процессе использования Excelя в будущем?

Игорь!
Спасибо!
Всё работает на отлично!
Пожалуйста, подскажите, как сделать, чтобы код цвета не выводил?

Добрый день, Jack Famous!
Спасибо за обратную связь!
Рассмотрю Ваш вариант решения задачи с выделением дубликатов значений ячеек разными цветами.

Добрый день, Игорь!
Спасибо за внимание к просьбе.
Макрос:
Sub ВыделитьДубликатыРазнымиЦветами()
On Error Resume Next
' массив цветов, используемых для заливки ячеек-дубликатов
Colors = Array(12900829, 15849925, 14408946, 14610923, 15986394, 14281213, 14277081, _
9944516, 14994616, 12040422, 12379352, 15921906, 14336204, 15261367, 14281213)
Dim coll As New Collection, dupes As New Collection, _
cols As New Collection, ra As Range, cell As Range, n&
Err.Clear: Set ra = Intersect(Selection, ActiveSheet.UsedRange)
If Err Then Exit Sub
ra.Interior.ColorIndex = xlColorIndexNone: Application.ScreenUpdating = False
For Each cell In ra.Cells ' запонимаем значение дубликатов в коллекции dupes
Err.Clear: If Len(Trim(cell)) Then coll.Add CStr(cell.Value), CStr(cell.Value)
If Err Then dupes.Add CStr(cell.Value), CStr(cell.Value)
Next cell
For i& = 1 To dupes.Count ' заполняем коллекцию cols цветами для разных дубликатов
n = n Mod (UBound(Colors) + 1): cols.Add Colors(n), dupes(i): n = n + 1
Next
For Each cell In ra.Cells ' окрашиваем ячейки, если для её значения назначен цвет
cell.Interior.color = cols(CStr(cell.Value))
Next cell
Application.ScreenUpdating = True
End Sub

Задача: корректное выделение дубликатов значений в ячейках разными цветами))))
Проблема: одним цветом выделяются ячейки с разными значениями дублей. Видно при сортировке значений ячеек по цвету 5-му сверху (розовый), выделены одним цветом ячейки с повторяющимися значениями - буквы "е" и "м".

Добрый день, Форумчане!
Прошу оказать помощь в корректировке макроса, найденного на просторах сети.
Данный макрос - замечательный инструмент для решения вопроса с выделением дубликатов разными цветами.
Но имеется недостаток: на один цвет заливки попадают разные повторяющиеся значения ячеек.
Файл во вложении (цвет заливки в фильтре 5-й сверху).
Спасибо!