diff options
Diffstat (limited to 'wizards/source/access2base/PropertiesSet.xba')
-rw-r--r-- | wizards/source/access2base/PropertiesSet.xba | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/wizards/source/access2base/PropertiesSet.xba b/wizards/source/access2base/PropertiesSet.xba index d60c3cee12a3..b88a5d2ca8b1 100644 --- a/wizards/source/access2base/PropertiesSet.xba +++ b/wizards/source/access2base/PropertiesSet.xba @@ -376,7 +376,7 @@ Private Function _setProperty(pvItem As Variant, ByVal psProperty As String, ByV If _ErrorHandler() Then On Local Error Goto Error_Function 'pvItem must be an object and have the requested property - If Not Utils._CheckArgument(pvIndex, 1, vbObject) Then Goto Exit_Function + If Not Utils._CheckArgument(pvItem, 1, vbObject) Then Goto Exit_Function 'Check Index argument If Not IsMissing(pvIndex) Then If Not Utils._CheckArgument(pvIndex, 4, Utils._AddNumeric()) Then Goto Exit_Function |