I've written enough code to select two shapes by name on a slide, and align their middles. BUT, the code is also aligning those two shapes with the middle of the SLIDE and I don't want that. To refine further, I'd like to be certain that the "Picture 2" will align to the middle of the "Rectangle 2" (in other words, the rectangle's position is static and should not change...I just want to be sure that the picture middle-aligns with the rectangle). Can anyone assist?
If oSh.Name = "Rectangle 2" And oSh.Height > 100 Then
oSh.Select
oSl.Shapes.Range(Array("Picture 2")).Select msoFalse 'This is how you select a particular shape by its name. The msoFalse means to ADD the shape to the already selected shape
oSl.Shapes.Range.Align msoAlignMiddles, True
Else
If oSh.Name = "Rectangle 2" Then
oSh.Select
oSl.Shapes.Range(Array("Picture 2")).Select msoFalse
End If
End If