Visio 2003: How do you resize a shape that has been imported?

[GMR]

I am using the import method of a page object. I am successfully
importing a .WMF file into my drawing. However, with Visio 2003, the
image that imports into Visio 2003 is much bigger than the drawing
page.

When I am executing the same code with Visio Standard 5c instead, the
imported image automatically resizes to the drawing page.

I have tried to use the ResizeToFitContents method but this seems to
make the drawing page fit the image. But, I need the image to scale
down to the drawing page.

Does anyone have any ideas?

Here is a sample of my VB code.

'***************************************
Dim pageVisio As Visio.Page

' Create a reference to the active page, which wmf can be imported
Set pageVisio = g_appVisio.Application.ActivePage

' Import windows metafile format.
pageVisio.Import "C:\somefile.wmf"
pageVisio.Shapes.CenterDrawing

'***************************************