npowermiscfixes: #i109644# fix potential crash when using 'option VBASupport 1' ( regression introduced by new lazy loading for this issue )

1 files changed, 10 insertions, 1 deletions

diff --git a/basic/source/classes/sb.cxx b/basic/source/classes/sb.cxx
index ae290c04694f..3373442e5eb2 100755
--- a/basic/source/classes/sb.cxx
+++ b/basic/source/classes/sb.cxx
@@ -81,7 +81,16 @@ SbxObject* StarBASIC::getVBAGlobals( )
         {
             Reference< XMultiServiceFactory > xDocFac( aThisDoc, UNO_QUERY );
                         if ( xDocFac.is() )
-                            xDocFac->createInstance( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ooo.vba.VBAGlobals" ) ) );
+            {
+                try
+                {
+                    xDocFac->createInstance( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "ooo.vba.VBAGlobals" ) ) );
+                }
+                catch( Exception& )
+                {
+                    // Ignore
+                }
+            }
         }
         pVBAGlobals = (SbUnoObject*)Find( aVBAHook , SbxCLASS_DONTCARE );
     }