You're welcome.
There's nothing wrong with your method for centering the shape and if you follow my stuff you'll know I keep saying selecting shapes in code is usually a bad idea!
It can help here though because you can say (if you had selected when you paste).
Code:
With ActiveWindow.Selection.ShapeRange
.Align msoAlignCenters, msoTrue
.Align msoAlignMiddles, msoTrue
End With