A couple of questions...

[Tamir Khason]

Please help:
1) How to create Icon shown in "Choose drawing type" menu for template
WITHOUT painting anything on the template
2) How to detect currently active page in active document
3) How to deselect all items on current page
4) ...

Thank you.

 

[John Marshall, MVP]

The answer to your first question is the answer to the sixth question on
http://www.microsoft.com/office/previous/xp/columns/column12.asp

For #2, do you mean ActivePage?
Dim pagObj As Visio.Page
'Find out if a page exists, then retrieve the page. If
Not(ActivePage Is Nothing) Then Set pagObj =
Visio.Application.ActivePage End If
For #3 use the DeSelectAll method

John... Visio MVP

Need stencils or ideas? http://www.mvps.org/visio/3rdparty.htm
Need VBA examples? http://www.mvps.org/visio/VBA.htm
Common Visio Questions http://www.mvps.org/visio/common_questions.htm

 

[Umesh V.G]

Hi Tamir,

For your Question 1) How to create Icon shown in "Choose drawing type" menu for template , The answer is,
a. Create a drawing and save it as a Visio template under any Custom folder of your choice. Preferrably choose a new directory. If you have some ready made Templates, Copy the stencils
and the templates to the Custom folder
b. Launch Visio. Select Tools > Options > Advanced > File Paths
c. Type in the full path for the templates folder. Separate each path with a semi-colon (Make sure that you separate each path with a semi-colon)
d. Click on Ok, again click on Ok
e. Close Visio and Launch Visio again
f. The templates that you have stored in the Custom folder are displayed as Icons when you choose the folder in the Startup Welcome Screen

For your Question 2) How to detect currently active page in active document
When your drawing is open, the page that is active is shown as a white tab at the bottom of the drawing. The inactive tabs are shown in gray. For example, if you have 4 pages in the drawing
and you are in Page 2, then the tab of page-2 is in white where as the other tabs are in Gray

For your Question 3) How to deselect all items on current page
If your drawing covers the entire page and is selected,
a. Press Ctrl+W to center the drawing and
b. Move the mouse cursor Outside of the selected area on the drawing
c. Click to deselect

Thanks and regards,

Umesh V.G
Microsoft Visio Technical Support

This posting is provided "AS IS" with no warranties, and confers no rights.

Go to http://www.microsoft.com/protect and follow instructions today!

--------------------
From: "Tamir Khason" <[email protected]>
Subject: A couple of questions...
Date: Wed, 31 Dec 2003 15:36:10 +0200
Lines: 10
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1158
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1165
Message-ID: <[email protected]>
Newsgroups: microsoft.public.visio
NNTP-Posting-Host: 213.8.78.114
Path: cpmsftngxa07.phx.gbl!cpmsftngxa06.phx.gbl!TK2MSFTNGP08.phx.gbl!TK2MSFTNGP10.phx.gbl
Xref: cpmsftngxa07.phx.gbl microsoft.public.visio:6426
X-Tomcat-NG: microsoft.public.visio

Please help:
1) How to create Icon shown in "Choose drawing type" menu for template
WITHOUT painting anything on the template
2) How to detect currently active page in active document
3) How to deselect all items on current page
4) ...

Thank you.