launch excel and new worksheet with data from visio

[revans00]

I have some VBA code that parses the shapes in an existing Visio drawing
and extracts information about connections (Thanks Markus!), text and
some custom properties for those shapes.

I would now like that information in an excel spreadsheet. How do I
(from this VBA running as a Visio Macro) launch Excel, create a new
worksheet, and populate it with the data from my shapes?

I've tried:

Dim xlApp As Excel.Application
Set xlApp = CreateObject("excel.application")

Yet I get a compile time error: "User Defined type not defined"

Is there something I must include so that a Visio VBA macro knows about
Excel?

TIA!
Richard

 

[Al Edlund]

did you add the reference excel in your code? tools => references..

check out the excel code in this example

http://msdn2.microsoft.com/en-us/library/aa140253(office.10).aspx

al

 

[revans00]

Thanks for the reply Al!

Unfortunately, that option (tools => references) is "greyed out". Any
suggestions?

Thanks!
Richard.