If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Listbox on Toolbar
Hi NG,
I'am working with Access 2003 and I would like to put a Listbox on a customized Toolbar. The Fomatting-Toolbox for example has three Listboxes on it. So why shouldn't it be possible to display a Listbox on a customized Access-Toolbar. But I have no idea how to do it. Can anyone help ? Thanks Rolf |
#2
|
|||
|
|||
Listbox on Toolbar
"Rolf Gossen" wrote in message
om... Hi NG, I'am working with Access 2003 and I would like to put a Listbox on a customized Toolbar. The Fomatting-Toolbox for example has three Listboxes on it. So why shouldn't it be possible to display a Listbox on a customized Access-Toolbar. But I have no idea how to do it. Can anyone help ? Public Sub CreateMenuList() Dim V As Object Dim MenuList As Object Set V = CommandBars("MenuBarName") Set MenuList = V.Controls(1) MenuList.DropDownLines = 5 MenuList.Width = 150 MenuList.DropDownWidth = 150 MenuList.AddItem "FirstItemInList" MenuList.AddItem "SecondItemInList" MenuList.AddItem "ThirdItemInList" MenuList.AddItem "FourthItemInList" MenuList.AddItem "FifthItemInList" Set MenuList = Nothing Set V = Nothing End Sub -- I don't check the Email account attached to this message. Send instead to... RBrandt at Hunter dot com |
#3
|
|||
|
|||
Listbox on Toolbar - CORRECTION
"Rick Brandt" wrote in message
... Previous post was missing a line Public Sub CreateMenuList() Dim V As Object Dim MenuList As Object Set V = CommandBars("MenuBarName") V.Controls.Add 4, 1 Set MenuList = V.Controls(1) MenuList.DropDownLines = 5 MenuList.Width = 150 MenuList.DropDownWidth = 150 MenuList.AddItem "FirstItemInList" MenuList.AddItem "SecondItemInList" MenuList.AddItem "ThirdItemInList" MenuList.AddItem "FourthItemInList" MenuList.AddItem "FifthItemInList" Set MenuList = Nothing Set V = Nothing End Sub |
Thread Tools | |
Display Modes | |
|
|