diff options
author | Markus Mohrhard <markus.mohrhard@googlemail.com> | 2015-08-15 04:28:42 +0200 |
---|---|---|
committer | Markus Mohrhard <markus.mohrhard@googlemail.com> | 2015-09-10 02:12:39 +0200 |
commit | 2846de32e6a38023d584dee843230b1806bf8dba (patch) | |
tree | 0a25052b950d0b3b721e8d06edd2a95e55ea7609 /oox | |
parent | 400c2a1a0ab14eea159cdded5f8e592287590d56 (diff) |
also log the module type
Diffstat (limited to 'oox')
-rw-r--r-- | oox/source/ole/vbaexport.cxx | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/oox/source/ole/vbaexport.cxx b/oox/source/ole/vbaexport.cxx index 253d43e64348..4c276036aa42 100644 --- a/oox/source/ole/vbaexport.cxx +++ b/oox/source/ole/vbaexport.cxx @@ -12,6 +12,7 @@ #include <tools/stream.hxx> #include <com/sun/star/script/XLibraryContainer.hpp> +#include <com/sun/star/script/vba/XVBAModuleInfo.hpp> #include <com/sun/star/frame/XModel.hpp> #include <oox/helper/binaryoutputstream.hxx> @@ -611,10 +612,15 @@ void VbaExport::exportVBA() css::uno::Reference<css::container::XNameContainer> xNameContainer = getBasicLibrary(); css::uno::Sequence<OUString> aElementNames = xNameContainer->getElementNames(); sal_Int32 n = aElementNames.getLength(); + css::uno::Reference<css::script::vba::XVBAModuleInfo> xModuleInfo(xNameContainer, css::uno::UNO_QUERY); + assert(xModuleInfo.is()); for (sal_Int32 i = 0; i < n; ++i) { SAL_DEBUG(aElementNames[i]); + css::script::ModuleInfo aModuleInfo = xModuleInfo->getModuleInfo(aElementNames[i]); + SAL_DEBUG(aModuleInfo.ModuleType); } + } css::uno::Reference<css::container::XNameContainer> VbaExport::getBasicLibrary() |