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
727 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
Gigs: Get Your Project Delivered by an Expert

Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.

 

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

Gigs: Get Your Project Delivered by an Expert

Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Periodically someone asks me whether there’s a way to automatically convert all of the pages in a Visio drawing to PowerPoint slides. There have even been a few times when I’ve wanted to do that myself but I never really had enough incentive to figu…
David Parker’s latest book, Microsoft Visio 2010: Business Process Diagramming and Validation, will give you the tools to turn flowcharts and other business diagrams into valuable, data-driven corporate assets. Armed with the knowledge you’ll gain f…
Windows 10 is mostly good. However the one thing that annoys me is how many clicks you have to do to dial a VPN connection. You have to go to settings from the start menu, (2 clicks), Network and Internet (1 click), Click VPN (another click) then fi…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…

813 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

10 Experts available now in Live!

Get 1:1 Help Now