Area of a shape in Visio 2007

[John Distai]

Hi.  Is there an easy way to get the area of an irregular shape in Visio 2007?

[Paul Herber]

Only way is by mathematics by integration, calculate the perimeter and approximate, or for some shapes:
http://www.spectrumanalytic.com/support/library/ff/area_calculations.htm
or
http://www.fao.org/docrep/R7021E/r7021e06.htm

[Yacine]

Paul,
does the area and perimeter tool add-on give incorrect results? It looked correct to me.
----
W., what was wrong?

[Paul Herber]

Hi Yacine, yes, the area and perimeter tool probably does give the correct result but I guessed Mr Distai would want to do something more than just look at the output from the area addon. Using the formulae with VBA etc you can do what you want with the results.

The messages overview shows our chum Wapperdude posting two messages but nothing shows within the thread!

[Visio Guy]

With code you can get the area in internal units, ie: "square inches".

Dim a as Double
a = Visio.ActiveWindow.Selection(1).AreaIU
Debug.Print a

[Visio Guy]

Ok, wapperdude already posted a few replies that didn't show up for some reason. I deleted his messages, and now the thread is working again. This is what he said:

The "Space" shape located on the "Walls, Shell and Structure" stencil does this.

Wapperedude

[wapperdude]

Sorry for mucking things up.  VisioGuy captured my comments correctly!  Guess my attached drawing messed up things.

Oh well.  Looks like the various replies captured everything anyway.

Cheers!

[John Distai]

Okay, thanks.

I noticed the curved wall shape gives the point-to-point length of the wall.  Is there a way to get it to calculate the length of the wall segment, accounting for the curvature?

Thanks!

[Yacine]

Mister Distai,
the add-on, I mentioned previously, gives you both the surface and the perimeter of your shape (the length of your walls).

[John Distai]

Yacine,

Thanks for that information.  Is the add on you are referring to for Visio 2007 or 2010?  I have 2007.  If it's available for 2007, where can I find it?

Thanks,

JD

[wapperdude]

v2007:  menu bar>Tools>Add-ons>Visio Extras> Shape Area and Perimeter

As previous posted elsewhere in this forum, V2007 fixes a bug in the SAP add-on, so, now when you select a line segment, it will give the length of the line segment.

Wapperdude

[John Distai]

Thanks!  Any chance there is a way to include this in the Size and Position window as a default?

[Yacine]

Any chance there is a way to include this in the Size and Position window as a default?

Sure, but not without code.
http://www.tech-archive.net/Archive/Visio/microsoft.public.visio.developer/2005-11/msg00030.html