Can anybody help?

Does anybody know how I can add a "Chrome Plated" effect to a solidworks part (sldprt) using a VBA macro?

Many thanks in advance!!!!

Darren