Solved

Align multiple objects in PowerPoint by defined space size

Posted on 2013-11-13
5
531 Views
Last Modified: 2013-12-01
Hello,

How do you align multiple objects in PowerPoint by defined space size?

I am familiar with the alignment tools Distribute VerticallyDistribute Horizontally in MS PowerPoint (2013). However, when one of these tools is applied to a selected group of objects, the spacing between them depends only on the separation of the the two objects at the extremes.

However, suppose you want a very specifically-sized space between each object (ie you only really care about the spacing and not at all about how far down [or how far to the right] the list extends).

Is there any way to specify that?

Thanks
0
Comment
Question by:Steve_Brady
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
5 Comments
 
LVL 23

Expert Comment

by:JSRWilson
ID: 39647221
There's no way in the GUI to do this. You would need to code your own method.
0
 

Expert Comment

by:Joanna_Miller
ID: 39647451
Not exactly, just as described above based on the extreme objects in the group ...

But
You can make the grid (  Alight > Grid Settings) with accurate dimensions and apportion objects on it wherever you need.
0
 
LVL 25

Assisted Solution

by:Echo_S
Echo_S earned 200 total points
ID: 39647737
Because you can't do what you're asking in the UI, I will often draw a rectangle or even just lines on the slide to define the space. Almost by default these become the defining borders of the space (as long as everything else falls to the appropriate side to align or distribute to them) and I can select them with the other objects to define the space when I align/distribute.

ToolsToo.com has a set of PowerPoint add-ins with a similar tool you might want to check out. You set a "reference shape" that the objects align to. I think the Lite version will do this, but the full set of tools is definitely worth the $20 if you work in PPT often.
0
 
LVL 23

Accepted Solution

by:
JSRWilson earned 300 total points
ID: 39672930
Some code to do this:

Sub Vspacer()
Dim osld As Slide
Dim oshpR As ShapeRange
Dim strSpace As String
Dim sngSpace As Single
strSpace = InputBox("Enter value for vertical space (inches")
If IsNumeric(strSpace) Then
sngSpace = 72 * Val(strSpace)
Dim i As Integer
On Error Resume Next
Set oshpR = ActiveWindow.Selection.ShapeRange
If Not oshpR Is Nothing And oshpR.Count > 1 Then
For i = 2 To oshpR.Count
oshpR(i).Top = oshpR(i - 1).Top + oshpR(i - 1).Height + sngSpace
Next i
End If
End If
End Sub

Sub Hspacer()
Dim osld As Slide
Dim oshpR As ShapeRange
Dim strSpace As String
Dim sngSpace As Single
strSpace = InputBox("Enter value for vertical space (inches")
If IsNumeric(strSpace) Then
sngSpace = 72 * Val(strSpace)
Dim i As Integer
On Error Resume Next
Set oshpR = ActiveWindow.Selection.ShapeRange
If Not oshpR Is Nothing And oshpR.Count > 1 Then
For i = 2 To oshpR.Count
oshpR(i).Left = oshpR(i - 1).Left + oshpR(i - 1).Width + sngSpace
Next i
End If
End If
End Sub
0
 

Author Closing Comment

by:Steve_Brady
ID: 39688483
Thinks
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When you try to share a printer , you may receive one of the following error messages. Error message when you use the Add Printer Wizard to share a printer: Windows could not share your printer. Operation could not be completed (Error 0x000006…
My attempt to use PowerShell and other great resources found online to simplify the deployment of Office 365 ProPlus client components to any workstation that needs it, regardless of existing Office components that may be needing attention.
The viewer will learn how to create a normally distributed random variable in Excel, use a normal distribution to simulate the return on an investment over a period of years, Create a Monte Carlo simulation using a normal random variable, and calcul…
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

734 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question