I have several forms opened at one time (from 1-15)
I can get a list of opened forms no problem but I want to list them as menu items that can be selected.
Currently I create a table of opened forms then diplay them on a form that allows a selected form to become the active form when double clicked.
In the 5 books I have beside me I have found no reference to how or if I can change the menu on the fly.
![]() |
Patch reliability is unclear. Unless you have an immediate, pressing need to install a specific patch, don't do it. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
-
Adding menu items on the fly using VBA
Home » Forums » AskWoody support » Productivity software by function » MS Access and database help » Adding menu items on the fly using VBA
- This topic has 8 replies, 4 voices, and was last updated 22 years, 11 months ago.
AuthorTopicWSbawn
AskWoody LoungerJuly 5, 2002 at 5:24 pm #373255Viewing 2 reply threadsAuthorReplies-
WSMarkLiquorman
AskWoody Lounger -
WSgellwood
AskWoody Lounger -
WSMarkLiquorman
AskWoody LoungerJuly 8, 2002 at 11:33 pm #599835The .AddItem method is not available in all versions of Access, and I’m not sure if there are limits to how many rows can be added this way. That is, if the rowsource is a value list, then there is a limit of something like 2000 characters; which may or may not be a problem in certain circumstances.
Also, the .ListIndex property is read-only.
-
WScharlotte
AskWoody Lounger -
WSMarkLiquorman
AskWoody Lounger -
WScharlotte
AskWoody Lounger
-
-
-
-
-
WSgellwood
AskWoody LoungerJuly 6, 2002 at 4:20 am #599315Hi Bawn,
In online help is code to populate a CommandBarCombox Object which I pasted below. Then couldn’t you cycle through the collection of open forms and populate the combobox with their names?Set combo = CommandBars(“Custom”).Controls(2)
With combo
.AddItem “First Item”, 1
.AddItem “Second Item”, 2
.DropDownLines = 3
.DropDownWidth = 75
.ListIndex = 0
End WithGwenda
-
WSgellwood
AskWoody LoungerJuly 8, 2002 at 5:49 pm #599769Hi Bawn … I fooled around with this a bit and am able to create a custom toolbar and populate with names of open forms:
Sub test()
Dim menubar As CommandBar
Dim newcombo As CommandBarComboBox
Dim frm As FormSet menubar = CommandBars.Add _
(Name:=”Custom2″, Position:=msoBarFloating, menubar:=True)
With menubar
.Protection = msoBarNoMove
.Visible = True
End WithSet newcombo = CommandBars(“Custom2”).Controls _
.Add(Type:=msoControlComboBox)
For Each frm In Forms
With newcombo
.AddItem frm.Name
.OnAction = “switch to form” ‘would have to call a function here to switch to the form you want
End With
Next frm
End Sub
Viewing 2 reply threads -

Plus Membership
Donations from Plus members keep this site going. You can identify the people who support AskWoody by the Plus badge on their avatars.
AskWoody Plus members not only get access to all of the contents of this site -- including Susan Bradley's frequently updated Patch Watch listing -- they also receive weekly AskWoody Plus Newsletters (formerly Windows Secrets Newsletter) and AskWoody Plus Alerts, emails when there are important breaking developments.
Get Plus!
Welcome to our unique respite from the madness.
It's easy to post questions about Windows 11, Windows 10, Win8.1, Win7, Surface, Office, or browse through our Forums. Post anonymously or register for greater privileges. Keep it civil, please: Decorous Lounge rules strictly enforced. Questions? Contact Customer Support.
Search Newsletters
Search Forums
View the Forum
Search for Topics
Recent Topics
-
Very Quarrelsome Taskbar!
by
CWBillow
10 hours, 4 minutes ago -
Move OneNote Notebook OFF OneDrive and make it local
by
CWBillow
12 hours, 49 minutes ago -
Microsoft 365 to block file access via legacy auth protocols by default
by
Alex5723
1 hour, 34 minutes ago -
Is your battery draining?
by
Susan Bradley
1 hour, 29 minutes ago -
The 16-billion-record data breach that no one’s ever heard of
by
Alex5723
1 hour, 24 minutes ago -
Weasel Words Rule Too Many Data Breach Notifications
by
Nibbled To Death By Ducks
16 hours, 40 minutes ago -
Windows Command Prompt and Powershell will not open as Administrator
by
Gordski
46 minutes ago -
Intel Management Engine (Intel ME) Security Issue
by
PL1
58 minutes ago -
Old Geek Forced to Update. Buy a Win 11 PC? Yikes! How do I cope?
by
RonE22
48 minutes ago -
National scam day
by
Susan Bradley
31 minutes ago -
macOS Tahoe 26 the end of the road for Intel Macs, OCLP, Hackintosh
by
Alex5723
2 hours, 47 minutes ago -
Cyberattack on some Washington Post journalists’ email accounts
by
Bob99
1 day, 17 hours ago -
Tools to support internet discussions
by
Kathy Stevens
6 hours, 25 minutes ago -
How get Group Policy to allow specific Driver to download?
by
Tex265
1 day, 8 hours ago -
AI is good sometimes
by
Susan Bradley
2 days ago -
Mozilla quietly tests Perplexity AI as a New Firefox Search Option
by
Alex5723
1 day, 14 hours ago -
Perplexity Pro free for 12 mos for Samsung Galaxy phones
by
Patricia Grace
3 days, 1 hour ago -
June KB5060842 update broke DHCP server service
by
Alex5723
2 days, 23 hours ago -
AMD Ryzen™ Chipset Driver Release Notes 7.06.02.123
by
Alex5723
3 days, 3 hours ago -
Excessive security alerts
by
WSSebastian42
1 day, 18 hours ago -
* CrystalDiskMark may shorten SSD/USB Memory life
by
Alex5723
3 days, 13 hours ago -
Ben’s excellent adventure with Linux
by
Ben Myers
3 hours, 29 minutes ago -
Seconds are back in Windows 10!
by
Susan Bradley
3 days ago -
WebBrowserPassView — Take inventory of your stored passwords
by
Deanna McElveen
1 day, 18 hours ago -
OS news from WWDC 2025
by
Will Fastie
1 day, 4 hours ago -
Need help with graphics…
by
WSBatBytes
2 days, 8 hours ago -
AMD : Out of Bounds (OOB) read vulnerability in TPM 2.0 CVE-2025-2884
by
Alex5723
4 days, 4 hours ago -
Totally remove or disable BitLocker
by
CWBillow
3 days, 3 hours ago -
Windows 10 gets 6 years of ESU?
by
n0ads
3 days, 7 hours ago -
Apple, Google stores still offer China-based VPNs, report says
by
Nibbled To Death By Ducks
4 days, 15 hours ago
Recent blog posts
Key Links
Want to Advertise in the free newsletter? How about a gift subscription in honor of a birthday? Send an email to sb@askwoody.com to ask how.
Mastodon profile for DefConPatch
Mastodon profile for AskWoody
Home • About • FAQ • Posts & Privacy • Forums • My Account
Register • Free Newsletter • Plus Membership • Gift Certificates • MS-DEFCON Alerts
Copyright ©2004-2025 by AskWoody Tech LLC. All Rights Reserved.