summaryrefslogtreecommitdiff
path: root/wizards/source/access2base/Module.xba
diff options
context:
space:
mode:
Diffstat (limited to 'wizards/source/access2base/Module.xba')
-rw-r--r--wizards/source/access2base/Module.xba2
1 files changed, 2 insertions, 0 deletions
diff --git a/wizards/source/access2base/Module.xba b/wizards/source/access2base/Module.xba
index e2f60b79dfb6..383d792a4f0f 100644
--- a/wizards/source/access2base/Module.xba
+++ b/wizards/source/access2base/Module.xba
@@ -16,6 +16,7 @@ REM --- CLASS ROOT FIELDS ---
REM -----------------------------------------------------------------------------------------------------------------------
Private _Type As String ' Must be MODULE
+Private _This As Object ' Workaround for absence of This builtin function
Private _Name As String
Private _Library As Object ' com.sun.star.container.XNameAccess
Private _LibraryName As String
@@ -34,6 +35,7 @@ REM --- CONSTRUCTORS / DESTRUCTORS ---
REM -----------------------------------------------------------------------------------------------------------------------
Private Sub Class_Initialize()
_Type = OBJMODULE
+ Set _This = Nothing
_Name = ""
Set _Library = Nothing
_LibraryName = ""