Visio Simple question

[Rawas]

I have a shape which have shape data like:

OutSlope
TapSlope
InLevel
OutLevel
TapLevel

How to do what on double click on this shape apear drop down list where I can select numbers from 1 to 10 and according on that number fill OutSlope and TapSlope Value field.
for example
if select 1 then OutSlope = 2 and TapSlope = 10
if select 5 then OutSlope = 3 and TapSlope = 50
if select 7 then OutSlope = 6 and TapSlope = 25
I need get data from text or excel file better, but also be great other things.

Also I need to work code like that:

InLevel value must take from connected shape I think must be somthing like = ConnectFrom and take value from this shape cell named Level
OutLevel = InLevel - OutSlope
TapLevel = Inlevel - TapSlope

Any ideas?

[WoF]

I don't know about visio, but
You'd put a dropdown (combobox) on the form and make it unvisible. You can fill it up at form load with strings like

box.additem "OutSlope=2, TapSlope=10"
...
In the click event of your shape (I hope there is one) you make it visible.
In the click event of the box you do a select case statement to set the according properties.
At the end of box_Click() you do box.Visible = False again.

[Rawas]

Thanks for reply, but this isn't solve my problem in Visio, maybe someone can atach the example in vsd format please.

[dglienna]

Can't help with the macro programming, but I have Visio 2010 installed.

(Remove the .txt from the end)

[Rawas]

Originally Posted by dglienna

Can't help with the macro programming, but I have Visio 2010 installed.

(Remove the .txt from the end)

Just few shapes drawing whitout code