Solved

vba to set drawing cursor to pointer or text cursor (I beam) & disable local Ruler / tabs bar that appears above a shape

Posted on 2014-01-11
7
715 Views
Last Modified: 2014-01-13
1. I wish to use vba to control the type drawing cursor (pointer tool vs text tool), to achieve automatically what the two respective Ribbon/Home tab/Tools group buttons do.

2. My users may not control the width of text block displayed in a shape. So I wish to suppress the local Ruler and tabs bar that appears above a shape when text is typed.

Thanks, Kelvin4
0
Comment
Question by:Kelvin4
  • 4
  • 3
7 Comments
 
LVL 30

Expert Comment

by:Scott Helmers
ID: 39774967
I'm not aware of a way to control the cursor in Visio but you might look at this post to see about doing so using Windows APIs (look for the entry from "ChadB").

When do you see local rulers above a text block? That's not the usual behavior in Visio.
0
 

Author Comment

by:Kelvin4
ID: 39775396
Hi Scott: Thanks for early replies to Qs 1 & 2.  Focussing on Q2, I'm glad the appearance of this local tool bar is not the official default behaviour, and I need to disable it.

Recapping and expanding the experience:
I've used visio 2013 for three months. Only recently I've found that when I drew a rectangle from Ribbon/Home/tools, then:
     a) when I select a shape (rectangle, elipse, or line) with the POINTER tool and hit a character key, or double click a character that already exists as Shape.text: then the  local Ruler and tabs bar appears above the shape. When I then click the drawing away from any shape, then the local Ruler and tabs bar (that had appeared) then disappears.
    b) when I click the TEXT tool cursor on the screen, the local Ruler and tabs bar appeared either above a shape (if a shape was clicked), or above a transient text entry box (if no shape was clicked).
    c) in response to your question, I always see the local Ruler and tabs bar when the text function is activated.

[ When I run Visio 2010 on the same laptop, the problem did not arise. When I opened a .vsd file as a .vsdx, file,  I got the problem, as expected. Shutting down & re-starting the laptop does not solve it!]

The problem does not appear on Visio Guy/ Visio 2013 issues (http://visguy.com/vgforum/index.php?board=31.0),...

... Nor on http://office.microsoft.com/en-us/help/office-2013-known-issues-HA102919019.aspx#_Office_(release)_1 (which has no Visio 2013 issues..)

I suppose the most obvious step is to re-load visio 2013. My one anxiety is how many times I can re-load, before I exceed the (?undefined) MS fair usage criterion. I've already had to reload the program once for some breakdown in function, and it is not cheap.

Can you comment further, or suggest a means of contacting the development team?

Thanks again
Kelvin4
0
 
LVL 30

Expert Comment

by:Scott Helmers
ID: 39775584
Kelvin -- I can't reproduce the problem you're describing, i.e., I can't cause the local ruler to appear.

Is is possible for you to create a short video capture demonstrating the problem? Or, at the very least, upload a screen capture that includes a shape with the local ruler and that also shows which tool is currently selected in the Tools group on the Home tab. I'll be happy to check with the Visio development team, especially if we can find a way to reproduce the problem.  Don't reinstall Visio 2013 quite yet...
0
Highfive Gives IT Their Time Back

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

 

Author Comment

by:Kelvin4
ID: 39775950
Hi Scott,
Thanks for your help.

I have no video facility, but for three separate trials with fresh VSDX files, I have captured a numbered screen image for each step and written a caption caption (attached .pptx file)

The morphology of the tool tip cant be captured, but this is described in the caption.

I use Skype, and can show the effect in real time via the Skype interface, if a developer wishes in a next step.

I would have attached a sample of one of the .vsdx files shown in the screen shots, but EE has not yet enabled these files to be downloaded (hopefully soon!). I have forgotten the work-around I understand can send Visio 2013 files through the Expert Zone.

Kelvin
Errant-local-ruler.pptx
0
 
LVL 30

Expert Comment

by:Scott Helmers
ID: 39776413
Thanks for the detailed screenshots and step-by-step instructions. I'll pass this along and let you know what I find out.
0
 
LVL 30

Accepted Solution

by:
Scott Helmers earned 500 total points
ID: 39776563
Turns out this is quite simple -- you just need to know about a rather obscure Visio option.

Both VisioGuy and another Visio MVP pointed that you merely need to right-click inside the text edit box and toggle Text Ruler. right-click text ruler toggle
0
 

Author Closing Comment

by:Kelvin4
ID: 39777026
Grateful!
0

Featured Post

Free Trending Threat Insights Every Day

Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.

Join & Write a Comment

The Question Several times in recent years, someone has posted a question at EE asking whether they could display the Windows directory structure – folders and subfolders – using Visio. When one person specifically asked about displaying directory …
Book Review: Using Microsoft Visio 2010 by Chris Roth   Disclaimer: The author of Using Visio 2010 is a friend and fellow Visio MVP. Whether you’re new to Visio or are upgrading to Visio 2010 from a previous version, you will find a lot to like…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
Get a first impression of how PRTG looks and learn how it works.   This video is a short introduction to PRTG, as an initial overview or as a quick start for new PRTG users.

757 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now