Change text or font color (colour)

[geejay]

Hi

I would like to change the colour of text that exists within a shape.

I have tried using set_charprops() but that only allows me to use Visio
built-in colours.

I have also tried the cell indices:

(short) Visio.VisSectionIndices.visSectionObject,
(short)Visio.VisRowIndices.visRowCharacter,
(short)Visio.VisCellIndices.visCharacterColor

but this didn't work either (using force formula).

Any ideas?

Thanks

g

 

[JuneTheSecond]

Hi,

ActivePage.Shapes.ItemFromID(1).Characters.CharProps(Visio.VisCellIndices.visCharacterColor) = 5
Worked fine in VBA.

It thought you did not define the shape correctly.

--
Best Regards.

JuneTheSecond
Now, visual calculation is more visual.
http://www.geocities.jp/visualcalculation/english/index.html

 

[AlEdlund]

you might check this out
http://blogs.msdn.com/visio/archive/2006/08/18/704811.aspx
al

 

[geejay]

OK, I managed to get this working by changing the indices to:

(short) Visio.VisSectionIndices.visSectionCharacter,
(short)Visio.VisRowIndices.visRowCharacter,
(short)Visio.VisCellIndices.visCharacterColor

I can then use the normal RGB() formula to set a custom colour.

I wonder why Visio.VisSectionIndices.visSectionObject works for other types
of cells?

Cheers