Замена части текста в ячейках Excel - VBA

Формулировка задачи:

Добрый день. Нужен совет. Необходимо заменить ячейки, содержащие определенные части текста, пустыми значениями. То есть, в ячейки вида "ID_8889", содержащие текст "ID", необходимо очистить, оставив без изменений строки в целом. Может кто подскажет как прописать это в макрос. Спасибо

Решение задачи: «Замена части текста в ячейках Excel»

textual
                            Листинг программы 
                        

                            for each C in activesheet.usedrange ' .specialcells(xlcelltypeconstants) - без значений вычисляемых по формулам
    if c.value like "*ID*" then c.clear
next
                        