align shapes

[Jyggalag]

hi all,

if I have two shapes next to each other that I have attached macros to and I want to align them horizontally, so they don't look silly, how would I do this without manually moving them around forever?

thanks!

Kind regards,
Jyggalag

 

[gordsky]

get the shapes roughly level and the hold shown shift and left click on both. Under the drawing tools select align then middle if they are different sizes, or if they are the same size you can use top or bottom (not centre as that overlaps them)

 

[Jyggalag]

get the shapes roughly level and the hold shown shift and left click on both. Under the drawing tools select align then middle if they are different sizes, or if they are the same size you can use top or bottom (not centre as that overlaps them)

Hi Gordsky,

Thank you very much!

I don't seem to have this option available to me, unless I am missing something?

 

[gordsky]

Hi Gordsky,

Thank you very much!

I don't seem to have this option available to me, unless I am missing something?

View attachment 57170

what version of excel is that and on what device. The IOS version has this under the align then "Group" option. This Link shows how to do it on each device / version

 

[kevin9999]

A VBA solution is quite simple. Use whichever line of code gives you what you want.

Sub AlignShapes()
    ActiveSheet.Shapes.SelectAll
    Selection.ShapeRange.Align msoAlignMiddles, False   '<~~ align by the middle
    'Selection.ShapeRange.Align msoAlignTops, False     '<~~ align by the top
End Sub

 

[RoryA]

In 365 it's on the right hand side of the Shape Format tab.

 

[BSALV]

later, in the attributes of that shape, say that the format isn't related to the cells (3 possible options there)

 

[Jyggalag]

A VBA solution is quite simple. Use whichever line of code gives you what you want.

Sub AlignShapes()
    ActiveSheet.Shapes.SelectAll
    Selection.ShapeRange.Align msoAlignMiddles, False   '<~~ align by the middle
    'Selection.ShapeRange.Align msoAlignTops, False     '<~~ align by the top
End Sub

wow this is crazy nice!!

well done sir

very impressive

only downside is that it aligns every shape in my file with each other, so it becomes difficult if you have 10 macros and just want to align 2 of them

 

[Jyggalag]

In 365 it's on the right hand side of the Shape Format tab.

This works! Thank you so much Rory I just had to "align top".

P.S. for anyone reading this thread, remember that you have to manually left click the shape in order for the tab "Shape Format" to appear