all groups > visual studio .net enterprise tools > february 2004 >
You're in the

visual studio .net enterprise tools

group:

UML model explorer in Visio - moving diagrams between packages


UML model explorer in Visio - moving diagrams between packages Eric Varsanyi
2/25/2004 12:01:11 PM
visual studio .net enterprise tools:
I've created a number of packages with static structure diagrams and I want to reorganize a bit and move the structure diagrams into different pacakges, however I cannot drag packages or any diagrams in them into other packages. I've started selecting everything on the page and pasting it into a new diagram but this is cumbersome... what's the trick

This is Visio Pro 2003 (11.3216.5703) from my Universal subscription
RE: UML model explorer in Visio - moving diagrams between packages v-wdxu NO[at]SPAM online.microsoft.com
2/26/2004 12:41:49 PM
Hi,

Thanks for posting in the community!

Currentlly we are performing some research on this problem, and we will
reply you ASAP if we get any results!

Wei-Dong Xu
Microsoft Product Support Services
Get Secure! - www.microsoft.com/security
This posting is provided "AS IS" with no warranties, and confers no rights.
RE: UML model explorer in Visio - moving diagrams between packages v-wdxu NO[at]SPAM online.microsoft.com
2/27/2004 12:44:50 PM
Hi,

Thanks for posting in the community!

From my understanding to this issue, you would like to know whether there
is one simple way for you to copy one whole structure diagram to another
package.

I think your method now is correct. We will need to copy these items from
one diagram from one to another manually. The simplest way as I know is to
write macro code for you to finish this kind of work. I have created one
for you:
'Code begin ----------------------------------------------------
Sub CopyAllThenDelete()

With Application
'set the page "Static Structure-4" as the active page now
.ActiveWindow.Page = Application.ActiveDocument.Pages.ItemU("Static
Structure-4")

'select all in the page
.ActiveWindow.SelectAll
'copy
.ActiveWindow.Selection.Copy
'set the page "Static Structure-1" as the active page now
.ActiveWindow.Page = Application.ActiveDocument.Pages.ItemU("Static
Structure-1")

'paste all from the "Static Structure-4"
.ActiveWindow.Page.Paste

'delete the page "Static Structure-4"
.ActiveDocument.Pages.ItemU("Static Structure-4").Delete
End With

End Sub
'Code end ------------------------------------------------------

With the VBA macro, you can only run one macro then the structure from one
page will be copy from A to B, then A is deleted.

Enjoy a nice weekend!

Wei-Dong Xu
Microsoft Product Support Services
Get Secure! - www.microsoft.com/security
This posting is provided "AS IS" with no warranties, and confers no rights.
AddThis Social Bookmark Button