How do I? Make 1 visio shape same size as another-NotUsingHandles?

kdrahovsky

unread,

Aug 28, 2007, 9:46:01 AM8/28/07

to

How Do I make 1 Visio Shape the same size as another one, without using the
shapes handles?

I cannot find this anywhere?

John Goldsmith

unread,

Aug 28, 2007, 9:54:19 AM8/28/07

to

Use the Size & Position Window under the View menu. You can also use basic
calculations in there as well, for example:

Height: 2ft+1in

...and of course there's always the shapesheet (Window/Show ShapeSheet) if
you want to get deeper into how shapes behave.

Best regards

John

John Goldsmith
www.visualSignals.co.uk

"kdrahovsky" <kdrah...@discussions.microsoft.com> wrote in message
news:53F47877-82AB-4485...@microsoft.com...

kdrahovsky

unread,

Aug 28, 2007, 10:26:03 AM8/28/07

to

Thanks Jon, this helps a little. Still you must type in the size. More
specifically, I apologise, perhaps a "Make Same Size" button. For example,
like other applications, you can typically highlight a first object, then a
2nd object, then you can go to an option/menu that states "Make the Same
Size." Then the 2nd object takes on the same sizing (H & W) of the 1st
object.

Thanks,
Karl

"John Goldsmith" wrote:

> Use the Size & Position Window under the View menu. You can also use basic
> calculations in there as well, for example:
>
> Height: 2ft+1in
>

> ....and of course there's always the shapesheet (Window/Show ShapeSheet) if

John Goldsmith

unread,

Aug 28, 2007, 11:23:08 AM8/28/07

to

Hello Karl,

Sorry, I misunderstood the question. I'm afraid there's no direct command
that does what you're looking for (of course you can duplicate (ctrl+D)).

You could achieve this fairly simply with code.

Best regards

John

John Goldsmith
www.visualSignals.co.uk

"kdrahovsky" <kdrah...@discussions.microsoft.com> wrote in message

news:E25F0504-60DE-4163...@microsoft.com...

kdrahovsky

unread,

Aug 28, 2007, 12:06:01 PM8/28/07

to

Thanks. At least I know I am not overlooking something. Seems so basic of a
feature to be added in their future.

Fred Diggs

unread,

Aug 31, 2007, 7:24:20 PM8/31/07

to

Here is a macro that will do the trick.

Public Sub MakeSameSize()
'Makes two objects in a selection list the same size by setting the Width and
'Height of the second item to the Width and Height of the first item.
ActiveWindow.Selection.Item(2).Cells("Width").ResultIU =
ActiveWindow.Selection.Item(1).Cells("Width").ResultIU
ActiveWindow.Selection.Item(2).Cells("Height").ResultIU =
ActiveWindow.Selection.Item(1).Cells("Height").ResultIU
End Sub

kdrahovsky

unread,

Sep 1, 2007, 8:50:00 AM9/1/07

to

Very nice. Much appreciated, applied and worked like a charm.

Thank You,
Karl

timwest

unread,

May 23, 2008, 2:14:20 AM5/23/08

to

Guys,

I know this is an old thread, but a quick improvement (works for > 2 items selected, won't complain if no items selected):

Public Sub MakeSameSize()
Dim width As Double, height As Double
If ActiveWindow.Selection.Count > 0 Then
With ActiveWindow.Selection
width = .Item(1).Cells("Width").ResultIU
height = .Item(1).Cells("Height").ResultIU
For i = 2 To ActiveWindow.Selection.Count
.Item(i).Cells("Width").ResultIU = width
.Item(i).Cells("Height").ResultIU = height
Next i
End With
End If
End Sub

-Tim

Paul Herber

unread,

May 23, 2008, 8:57:00 AM5/23/08

to

How do you ensure that you pick up the width and height from the
correct shape? If you have two shapes, which shape is Item(1)?

--
Regards, Paul Herber, Sandrila Ltd.
Visio Utilities http://www.visio-utilities.sandrila.co.uk/

John Marshall, MVP

unread,

May 25, 2008, 12:04:40 PM5/25/08

to

It is in the order of selection, so the first item selected is item(1)

John... Visio MVP

Need stencils or ideas? http://visio.mvps.org/3rdparty.htm
Need VBA examples? http://visio.mvps.org/VBA.htm
Visio Wishlist http://visio.mvps.org/wish_list.htm
"Paul Herber" <SubstituteMy...@pherber.com> wrote in message
news:1nfd349ch6k44q7kq...@news.gradwell.net...

Paul Herber

unread,

May 26, 2008, 6:15:33 PM5/26/08

to

Ah, that's interesting and certainly makes sense. I wonder what the
order is if an enclosing area is selected with the mouse?

http://www.electronics-packages.sandrila.co.uk/

John Goldsmith

unread,

May 27, 2008, 2:21:05 AM5/27/08

to

Hmm - I'd assumed it would be first ID or at least drop order, but I've just
had a quick check and I see that it's the left-most shape that becomes the
primary item.

Best regards

John

John Goldsmith
www.visualSignals.typepad.co.uk
www.visualSignals.co.uk

"Paul Herber" <SubstituteMy...@pherber.com> wrote in message

news:uqcm34p9e7ue3fo40...@news.gradwell.net...

iqbalhassan

unread,

Feb 21, 2010, 6:36:34 AM2/21/10

to

How Do I make 1 Visio Shape the same size as another one, without using the
shapes handles?

kdrahovsk wrote:

How do I? Make 1 visio shape same size as another-NotUsingHandles?
28-Aug-07

How Do I make 1 Visio Shape the same size as another one, without using the
shapes handles?