diff options
-rw-r--r-- | oox/source/ole/vbaexport.cxx | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/oox/source/ole/vbaexport.cxx b/oox/source/ole/vbaexport.cxx index d1ff3c7587cd..10bf03bf29b2 100644 --- a/oox/source/ole/vbaexport.cxx +++ b/oox/source/ole/vbaexport.cxx @@ -641,6 +641,11 @@ void VbaExport::exportVBA(SotStorage* pRootStorage) SAL_DEBUG(aElementNames[i]); css::script::ModuleInfo aModuleInfo = xModuleInfo->getModuleInfo(aElementNames[i]); SAL_DEBUG(aModuleInfo.ModuleType); + + css::uno::Any aCode = xNameContainer->getByName(aElementNames[i]); + OUString aSourceCode; + aCode >>= aSourceCode; + SAL_DEBUG(aSourceCode); } pVBAProjectStream->Commit(); pDirStream->Commit(); |