diff options
| author | Jean-Pierre Ledure <jp@ledure.be> | 2014-12-30 13:04:11 +0100 |
|---|---|---|
| committer | Jean-Pierre Ledure <jp@ledure.be> | 2014-12-30 14:11:03 +0100 |
| commit | 468474953847859e7ff707b5cbe87a443c00aed6 (patch) | |
| tree | 03e44800cd6cba44d395a676a8d9807ca376d66b /wizards/source/access2base/Collect.xba | |
| parent | 1a3accb148bda7ebe889cbd6177502bd730b0bb8 (diff) | |
Access2Base - CommandBars collection - show/hide toolbars
Addition of CommandBars collection
Addition of CommandBar class
Diffstat (limited to 'wizards/source/access2base/Collect.xba')
| -rw-r--r-- | wizards/source/access2base/Collect.xba | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/wizards/source/access2base/Collect.xba b/wizards/source/access2base/Collect.xba index b8a722318cfd..9039584b3300 100644 --- a/wizards/source/access2base/Collect.xba +++ b/wizards/source/access2base/Collect.xba @@ -72,6 +72,8 @@ Dim vNames() As Variant, oProperty As Object Set Item = Application.AllDialogs(pvItem) Case COLLALLFORMS Set Item = Application.AllForms(pvItem) + Case COLLCOMMANDBARS + Set Item = Application.CommandBars(pvItem) Case COLLCONTROLS Select Case _ParentType Case OBJCONTROL, OBJSUBFORM |