Hi to everyone

I am trying to add an appearance on a face with a macro (VBA) but while the code is working the appearance does not appear on the face

Can any one to help me ?

Thank you for your time

Kostas