summaryrefslogtreecommitdiff
path: root/wizards/source/access2base/CommandBar.xba
diff options
context:
space:
mode:
authorJean-Pierre Ledure <jp@ledure.be>2015-07-25 12:56:38 +0200
committerJean-Pierre Ledure <jp@ledure.be>2015-07-25 13:00:29 +0200
commit379737991f0fe26dca74d72aa32bd94fe55402d3 (patch)
treeb52686374f77caa14ee8fe6e5a75ff7cced2c917 /wizards/source/access2base/CommandBar.xba
parente783cc71eec1f581835a84560904b948f464b435 (diff)
Access2Base - Correct CommandBarControls collection
Make the Item property of the CommandBarControls collection work correctly thanks to a complete initialization of the object. Change-Id: I714d1034d69be197f68702b0e2d7b21ff64ffff8
Diffstat (limited to 'wizards/source/access2base/CommandBar.xba')
-rw-r--r--wizards/source/access2base/CommandBar.xba1
1 files changed, 1 insertions, 0 deletions
diff --git a/wizards/source/access2base/CommandBar.xba b/wizards/source/access2base/CommandBar.xba
index 93bc884383e1..ed7955d3cef1 100644
--- a/wizards/source/access2base/CommandBar.xba
+++ b/wizards/source/access2base/CommandBar.xba
@@ -170,6 +170,7 @@ Dim oObject As Object
Set oObject = New Collect
oObject._CollType = COLLCOMMANDBARCONTROLS
oObject._ParentType = OBJCOMMANDBAR
+ oObject._ParentName = _Name
oObject._Count = iItemsCount
Case Else &apos; pvIndex is numeric
Goto Trace_IndexError