Consulting

Results 1 to 2 of 2

Thread: PPT VBA to Center and Middle Align Object on certain slides

  1. #1

    PPT VBA to Center and Middle Align Object on certain slides

    I have a PPT that has an object on certain slides called "Group3" that I would like to center and middle align for just those certain slides.

    The slides are 17-22, 24-27 and 29 to 32

    Can someone help me create a Sub Procedure for this?

  2. #2
    VBAX Master
    Joined
    Feb 2007
    Posts
    2,093
    Location
    Try
    Sub center_align()
    Dim osld As Slide
    For Each osld In ActivePresentation.Slides.Range(Array(17, 18, 19, 20, 21, 22, 24, 25, 26, 27, 29, 30, 31, 32))
    With osld.Shapes.Range("Group 3")
    .Align (msoAlignMiddles), True
    .Align (msoAlignCenters), True
    End With
    Next osld
    End Sub
    John Wilson
    Microsoft PowerPoint MVP
    Amazing Free PowerPoint Tutorials
    http://www.pptalchemy.co.uk/powerpoi...tutorials.html

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •