fdo#71248 Excel VBA: ActiveDocument is not tracking currently selected Doc
Change-Id: I86606646206ec26e2822a6e27888537d44351b7b Reviewed-on: https://gerrit.libreoffice.org/11725 Reviewed-by: Samuel Mehrbrodt <s.mehrbrodt@gmail.com> Tested-by: Samuel Mehrbrodt <s.mehrbrodt@gmail.com>
This commit is contained in:
committed by
Samuel Mehrbrodt
parent
76b50b7b0d
commit
4108bd9b7a
@@ -131,7 +131,7 @@ OString lclGetVBAGlobalConstName( const Reference< XInterface >& rxComponent )
|
|||||||
if( xProps.is() ) try
|
if( xProps.is() ) try
|
||||||
{
|
{
|
||||||
OUString aConstName;
|
OUString aConstName;
|
||||||
xProps->getPropertyValue("ThisVBADocObj") >>= aConstName;
|
xProps->getPropertyValue("VBAGlobalConstantName") >>= aConstName;
|
||||||
return OUStringToOString( aConstName, RTL_TEXTENCODING_ASCII_US );
|
return OUStringToOString( aConstName, RTL_TEXTENCODING_ASCII_US );
|
||||||
}
|
}
|
||||||
catch (const uno::Exception&) // not supported
|
catch (const uno::Exception&) // not supported
|
||||||
|
@@ -856,7 +856,7 @@
|
|||||||
#define UNO_NAME_DESCRIPTION "Description"
|
#define UNO_NAME_DESCRIPTION "Description"
|
||||||
#define UNO_NAME_META "InContentMetadata"
|
#define UNO_NAME_META "InContentMetadata"
|
||||||
#define UNO_NAME_IS_TEMPLATE "IsTemplate"
|
#define UNO_NAME_IS_TEMPLATE "IsTemplate"
|
||||||
#define UNO_NAME_VBA_DOCOBJ "ThisVBADocObj"
|
#define UNO_NAME_VBA_DOCOBJ "VBAGlobalConstantName"
|
||||||
#define UNO_NAME_NESTED_TEXT_CONTENT "NestedTextContent"
|
#define UNO_NAME_NESTED_TEXT_CONTENT "NestedTextContent"
|
||||||
#define UNO_NAME_SEPARATOR_LINE_STYLE "SeparatorLineStyle"
|
#define UNO_NAME_SEPARATOR_LINE_STYLE "SeparatorLineStyle"
|
||||||
#define UNO_NAME_FOOTNOTE_LINE_STYLE "FootnoteLineStyle"
|
#define UNO_NAME_FOOTNOTE_LINE_STYLE "FootnoteLineStyle"
|
||||||
|
Reference in New Issue
Block a user