--- sc/source/ui/vba//vbaworkbooks.hxx	
+++ sc/source/ui/vba//vbaworkbooks.hxx
@@ -45,7 +45,7 @@
 
 class ScModelObj;
 
-typedef ::cppu::ImplInheritanceHelper1< ScVbaCollectionBaseImpl, oo::excel::XWorkbooks > ScVbaWorkbooks_BASE;
+typedef CollTestImplHelper< oo::excel::XWorkbooks > ScVbaWorkbooks_BASE;
 
 class ScVbaWorkbooks : public ScVbaWorkbooks_BASE
 {
@@ -54,20 +54,23 @@ private:
 	bool 	isTextFile( const rtl::OUString& rString );
 	static sal_Int16& getCurrentDelim(){ static sal_Int16 nDelim = 44; return nDelim; }
 public:
-	ScVbaWorkbooks( const css::uno::Reference< css::uno::XComponentContext >& xContext );
+	ScVbaWorkbooks( const css::uno::Reference< oo::vba::XHelperInterface >& xParent, const css::uno::Reference< css::uno::XComponentContext >& xContext );
 	virtual ~ScVbaWorkbooks() {}
 
 	// XEnumerationAccess
 	virtual css::uno::Type SAL_CALL getElementType() throw (css::uno::RuntimeException);
 	virtual css::uno::Reference< css::container::XEnumeration > SAL_CALL createEnumeration() throw (css::uno::RuntimeException);
 
-	// ScVbaCollectionBaseImpl	
+	// ScVbaWorkbooks_BASE
 	virtual css::uno::Any createCollectionObject( const css::uno::Any& aSource ); 
+	virtual rtl::OUString& getServiceImplName();
+	virtual css::uno::Sequence<rtl::OUString> getServiceNames();
 
 	// XWorkbooks
 	virtual css::uno::Any SAL_CALL Add() throw (css::uno::RuntimeException);
 	virtual void SAL_CALL Close(  ) throw (css::uno::RuntimeException);
 	virtual css::uno::Any SAL_CALL Open( const ::rtl::OUString& Filename, const css::uno::Any& UpdateLinks, const css::uno::Any& ReadOnly, const css::uno::Any& Format, const css::uno::Any& Password, const css::uno::Any& WriteResPassword, const css::uno::Any& IgnoreReadOnlyRecommended, const css::uno::Any& Origin, const css::uno::Any& Delimiter, const css::uno::Any& Editable, const css::uno::Any& Notify, const css::uno::Any& Converter, const css::uno::Any& AddToMru ) throw (css::uno::RuntimeException);
+
 };
 
 #endif /* SC_VBA_WORKBOOKS_HXX */
