--- svx/source/msfilter/svxmsbas.cxx
+++ svx/source/msfilter/svxmsbas.cxx
@@ -292,6 +292,7 @@
 										BOOL bAsComment, BOOL bStripped )
 {
 	BOOL bRet = FALSE;
+	bAsComment = FALSE;
 	VBA_Impl aVBA( *xRoot, bAsComment );
 	if( aVBA.Open(rStorageName,rSubStorageName) )
 	{
