Re: Help !!!

Thanks for the help !

This work but I still have a little problem with this.
When the custom properties shows if I change something on them everything is
perfect. But if I didn't change something and click OK show me an error.
And specially this Error : Run-time error '-2032466955(86db03f5)'"
Do you know why this happened and Can you help me with this ?

Thank you again !


"Al Edlund" wrote:

consider putting this after your shape selection

Dim visWindow As Visio.Window
Set visWindow = Application.ActiveWindow
' shape has to be selected for the command to work
visWindow.Select visShape, visSelect

and use this for your command
Application.DoCmd 1312

al
"Peter Totev" <Peter Totev@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:C8EF52C5-F400-4DF5-B673-621DCD199493@xxxxxxxxxxxxxxxx
Hi,

I want to show shape custom properties when I choose an Item of Combo Box
in
Visio 2003.
I have this code so far.

Private Sub ComboBox1_Change()

Dim visShape As Visio.Shape
Set visShape = ActivePage.Shapes.Item(4)

Select Case ComboBox1
Case "hardware devices"
visShape.Application.DoCmd (1312)
Case ...
End Select
End Sub

The problem with him is that this display the Custom Properties of the
Selected Shape.
I want to display this shape wich I want in this case :
Set visShape = ActivePage.Shapes.Item(4)

I think this is very close to the right code,and I don't know what's wrong
with this code.
I'll be greatful to you if you have any ideas about this !!!

Thank you in advanced!



.

Relevant Pages

  • Re: Help !!!
    ... I want to show shape custom properties when I choose an Item of Combo ... Private Sub ComboBox1_Change ... Set visShape = ActivePage.Shapes.Item ... The problem with him is that this display the Custom Properties of the ...
    (microsoft.public.visio.developer.vba)
  • Re: is this possible?
    ... "Jonathan Spane" wrote: ... You want to display values but not the keys. ... You can even have hidden custom properties if need be (I ... Visio shape to in the original spreadsheet. ...
    (microsoft.public.visio.developer)
  • Re: is this possible?
    ... You want to display values but not the keys. ... Parse your Key and Value back out and compare with excel. ... You can even have hidden custom properties if need be (I ... Visio shape to in the original spreadsheet. ...
    (microsoft.public.visio.developer)
  • Re: OWC11 - display other properties on the PivotTable
    ... You can display additional information about items by displaying the ... custom properties of a row or column field. ... either in the PivotTable list or as ScreenTips. ... The following illustration shows how the Employees report will look with ...
    (microsoft.public.sqlserver.olap)
  • Re: Product dimension with SKU and Product Name?
    ... Subject: Re: OWC11 - display other properties on the PivotTable ... There are a couple of ways to access Item Properties in the OWC Pivot ... custom properties of a row or column field. ... The following illustration shows how the Employees report will look with ...
    (microsoft.public.sqlserver.olap)