The parameter to WordBasic.AppShow() is optional and thus has to be an Any

Change-Id: I134101d1be5922051e34352331a49f5706030ff2

oovbaapi/ooo/vba/word/XWordBasic.idl

@@ -41,7 +41,7 @@ interface XWordBasic
 
     long AppMaximize( [in] string WindowName, [in] any State );
     long DocMaximize( [in] any State );
-    void AppShow( [in] string WindowName );
+    void AppShow( [in] any WindowName );
     long AppCount();
 };
 

sw/source/ui/vba/vbaapplication.cxx

@@ -111,7 +111,7 @@ public:
                                                   const css::uno::Any& OpenExclusive, const css::uno::Any& SubType) override;
     virtual sal_Int32 SAL_CALL AppMaximize( const OUString& WindowName, const css::uno::Any& State ) override;
     virtual sal_Int32 SAL_CALL DocMaximize( const css::uno::Any& State ) override;
-    virtual void SAL_CALL AppShow(  const OUString& WindowName ) override;
+    virtual void SAL_CALL AppShow(  const css::uno::Any& WindowName ) override;
     virtual sal_Int32 SAL_CALL AppCount() override;
 };
 
@@ -667,7 +667,7 @@ SwWordBasic::DocMaximize( const css::uno::Any& State )
 }
 
 void SAL_CALL
-SwWordBasic::AppShow( const OUString& WindowName )
+SwWordBasic::AppShow( const css::uno::Any& WindowName )
 {
     SAL_INFO("sw.vba", "WordBasic.AppShow(WindowName:=" << WindowName << ")");