Выделение объектов с одинаковой Заливкой

Запустите функцию, вделите один объект, и программа найдет во всем документе все объекты с идентичными свойстваи заливки.

Пример