Automate shape report

J

JayEnn

Joined
Oct 13, 2015
Messages
3
Reaction score
0
Hello

I am trying to have a user click a button and a report will be generated from selected shapes.

Set vsoSelect = Visio.ActiveWindow.Selection ' How many selected shapes do we have?
For Each vsoShape In vsoSelect
Visio.Application.Addons("VisRpt").Run ("C:\Users\tom\Documents\ReportDefinition_2.vrd / rptOutput=EXCEL")
Next

This works. Can I direct the report output to a specific Excel file or do I have to live with what the report gives me?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Visio shape text disappears upon copy paste 1
Using Selection 24
Date Time decimal value help please 1
Visio 2013: how do I auto-colour Shapes in alignment with pre-entered Shape Data? 0
Direct & Indirect Reports 0
Microsoft Project 2016 Monthly Cost Report/ Table Creation Help 0
Recenter object after re-size 0
Save the report 2

Top