Re: Populating a listbox or combo box in Visio 2003
- From: "Chris Roth [MVP]" <visioguy [at] hotmail [dot] com>
- Date: Wed, 5 Sep 2007 20:39:27 +1000
Hi Jay,
I've got an example in the the article "Combo Box Table of Contents" located
here: http://www.visguy.com/2006/11/08/combo-box-table-of-contents/
There's code listings in the article, and a downloadable Visio file that has
a combo box on the page, and VBA code behind it.
--
Hope this helps,
Chris Roth
Visio MVP
Free Visio shapes:
http://www.visguy.com/category/shapes
Visio programming info:
http://www.visguy.com/category/programming/
Other Visio resources:
http://www.visguy.com/visio-links/
<jayhankins@xxxxxxx> wrote in message
news:1188963198.103574.74100@xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
I am trying to add a forms 2.0 lisbox or combobox to a visio page. The
box will be populated with data that that comes from an other shape
eventually. The problem is that when I try to use the AddItem method
in a macro I get an object does not support this property or method
error. Here is the code I am trying:
"Sub addItemMacro()
Dim x
Dim index
Set myListBox = ActivePage.Shapes("Sheet.1")
For x = 1 To 5
index = myListBox.AddItem(x)
Next x
End Sub"
This code gives me a type mismatch with AddItem highlighted:
"Private Sub alarmListBox_Click()
Dim index
Dim x
For x = 1 To 10
index = alarmListBox.AddItem(x)
Next x
End Sub"
I am not very skilled at this sort of thing but I can usually muddle
through. However I can't seem to get this to work.
Thanks for your help
jph
.
- Follow-Ups:
- Re: Populating a listbox or combo box in Visio 2003
- From: jayhankins
- Re: Populating a listbox or combo box in Visio 2003
- References:
- Populating a listbox or combo box in Visio 2003
- From: jayhankins
- Populating a listbox or combo box in Visio 2003
- Prev by Date: Re: how to add a standard shape?
- Next by Date: Re: How do I put terminal numbers onto terminal board object
- Previous by thread: Populating a listbox or combo box in Visio 2003
- Next by thread: Re: Populating a listbox or combo box in Visio 2003
- Index(es):
Relevant Pages
|