I had this same issue. It turns out that each shape has many subshapes associated with it and you need to change all the attributes of those as well. Easiest way to work it out is to record a macro while you manually make the change and then use that as the basis for your code. You will likely find that you need about 20-40 lines of code (depending on what you are changing) to make it work.