diff -u -r ./old/basic/source/runtime/step2.cxx ./new/basic/source/runtime/step2.cxx
--- ./old/basic/source/runtime/step2.cxx	2010-04-27 11:12:56.000000000 +0800
+++ ./new/basic/source/runtime/step2.cxx	2010-06-07 12:53:48.000000000 +0800
@@ -492,7 +492,7 @@
 			pPar->Put( NULL, 0 );
 	}
 	// Index-Access bei UnoObjekten beruecksichtigen
-	else if( pElem->GetType() == SbxOBJECT && !pElem->ISA(SbxMethod) && !pElem->ISA(SbxProperty) )
+	else if( pElem->GetType() == SbxOBJECT && ( ( !pElem->ISA(SbxMethod) && !pElem->ISA(SbxProperty) ) || bVBAEnabled ) )
     {
         pPar = pElem->GetParameters();
         if ( pPar )