G
Gary
I have been seaching for help in selecting a value in a CommandBar ComboBox.
In Visio, the Ink object is not supported by VBA code, so I am using the
CommandBar option.
I can do the following:
CommandBar("Ink").Controls("3 Felt-Tip Pen").accDoDefaultAction This works
and select the 3 Felt Tip Pen as the Ink Pen. I don't understand what the
..accDoDefaultAction is doing, but without it it didn't work here.
I want to do:
CommandBar("Ink").Controls("Ink Thickness") This is a combo box with the
following selections: 1 pt, 1-1/4 pt, 1-1/2 pt, 1-3/4 pt, 2 pt, etc.
I want to select the 2 pt option. I have been posting on the Visio
developer with no responds. Can someone help me here!!!
I also read that by setting the ListIndex of the "Ink Thickness" that may do
it, but I can't figure how to do that. One person suggestion loading in the
Visio Pen SDK, but I don't think that will do it for me because I am able to
use the current menus to select all of the objects and manually select the
"Ink Thickness" and then its thickness of "2 pt" and it works. Would that
implies that if I can indicate the Ink Thickness, it should work??
Your help is deeply Appreciated!!!
Gary
In Visio, the Ink object is not supported by VBA code, so I am using the
CommandBar option.
I can do the following:
CommandBar("Ink").Controls("3 Felt-Tip Pen").accDoDefaultAction This works
and select the 3 Felt Tip Pen as the Ink Pen. I don't understand what the
..accDoDefaultAction is doing, but without it it didn't work here.
I want to do:
CommandBar("Ink").Controls("Ink Thickness") This is a combo box with the
following selections: 1 pt, 1-1/4 pt, 1-1/2 pt, 1-3/4 pt, 2 pt, etc.
I want to select the 2 pt option. I have been posting on the Visio
developer with no responds. Can someone help me here!!!
I also read that by setting the ListIndex of the "Ink Thickness" that may do
it, but I can't figure how to do that. One person suggestion loading in the
Visio Pen SDK, but I don't think that will do it for me because I am able to
use the current menus to select all of the objects and manually select the
"Ink Thickness" and then its thickness of "2 pt" and it works. Would that
implies that if I can indicate the Ink Thickness, it should work??
Your help is deeply Appreciated!!!
Gary