Комплексный поиск и замена

Question

У меня довольно сложная задача, которую нужно выполнить с прайс-листами клиентов, что по сути является упражнением в «заполнении пробелов». Ниже приведен пример настройки прайс-листов в программном обеспечении при экспорте в Excel. Я хотел бы написать формулу, которая заполнит любые значения цен £0.00 заранее определенным значением из списка DEFAULT.

Чтобы дать вам некоторое представление о сфере применения, вам нужно просмотреть около 3000 продуктов и 800 прайс-листов, так что это очень, очень большая задача, которую нужно выполнить вручную.

Answer 1

Вот один из способов.Отрегулируйте диапазоны и формулу в соответствии с требованиями.

Sub x()

With Range("B2:C8")
    .Replace 0, "", xlWhole
    on error resume next
    .SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=RC1"
End With

End Sub

До

После