For example, If Job Class = 123, Then make box "Red"
or "Italic Font" or whatever....
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
"Andrew Ziola" <andrew...@nborder.com> wrote in message
news:025c01c33121$46b53b70$a501...@phx.gbl...
>.
>
>.
>
Here's the pseudocode of what I want to do...
The field that I want to key off (from my .xls file that
I'm importing to build this org chart and is also in the
box itself with the name) is named "CO".
IF "CO" = 172, make the shape/box foreground Blue
IF "CO" = 548, make the shape/box foreground Black
IF "CO" = 1794, make the shape/box foreground Green
ELSE
make the shape/box foreground Red
I can e-mail you my Visio file if it'd be easier...
>.
>
You can then use this formula in the FillForegnd cell:
=IF(Prop.CO=172,4,IF(Prop.CO=548,0,IF(Prop.CO=1794,3,2)))
The color codes for this cell are:
0 - Black
1 - White
2 - Red
3 - Green
4 - Blue
...
--
Mark Nelson
Microsoft Corporation
This posting is provided "AS IS" with no warranties, and confers no rights.
"Andrew Ziola" <andrew...@nborder.com> wrote in message
news:02b701c331db$02833d20$a301...@phx.gbl...
Thanks for the formula. I attempted it, and I get a
formula error...see actual text I used...Perhaps I
need ""'s or something...Does the data from the excel file
need to be a specific data type? I enter this formula in
the Show Shapesheet Fill Format area (Fill Foregnd cell)
after I've selected 'all the boxes' in the org chart
=IF(Prop.CO=172,4,IF(Prop.CO=548,2,IF(Prop.CO=1794,3,IF
(Prop.CO=60,0,1))))
Can I send the small file to you?
Is there a property that I need to verify for this
functionality to work?
Thanks for your help!
Andrew
>-----Original Message-----
>Let's assume you put the CO information into a custom
property named "CO" in
>the shape. The value for CO is then stored in the
Prop.CO cell.
>
>You can then use this formula in the FillForegnd cell:
> =IF(Prop.CO=172,4,IF(Prop.CO=548,0,IF(Prop.CO=1794,3,2)))
>
>The color codes for this cell are:
>0 - Black
>1 - White
>2 - Red
>3 - Green
>4 - Blue
>....
>.
>
Feel free to e-mail me a Visio file with your shape. (Remove the online
word from my address.)
--
Mark Nelson
Microsoft Corporation
This posting is provided "AS IS" with no warranties, and confers no rights.
"Andrew Ziola" <andrew...@nborder.com> wrote in message
news:0cc301c33741$cd2a28c0$a501...@phx.gbl...