diff options
| author | Miklos Vajna <vmiklos@collabora.co.uk> | 2017-06-07 17:22:22 +0200 |
|---|---|---|
| committer | Miklos Vajna <vmiklos@collabora.co.uk> | 2017-06-08 08:06:33 +0200 |
| commit | 1365a9f95a8e97a8ec9bbf9a351f9f4ab2696d92 (patch) | |
| tree | 300a52d620264b9f1b826d3cd84d676fdf946c8f | |
| parent | 4ec3a5e7c2f63136cb48356d8d44703bfe0e3d9e (diff) | |
oovbaapi: add XlThemeColor Enumeration (Excel)
As documented at
<https://msdn.microsoft.com/en-us/library/office/ff839402.aspx>.
And also extend ov::excel::XInterior with a ThemeColor property, as
documented at
<https://msdn.microsoft.com/en-us/library/office/ff820778.aspx>;
implementation is just a stub for now.
Change-Id: I05f1490cdc366f5db127d340cab5f51efcafa862
Reviewed-on: https://gerrit.libreoffice.org/38522
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Miklos Vajna <vmiklos@collabora.co.uk>
| -rw-r--r-- | oovbaapi/ooo/vba/excel/Constants.idl | 12 | ||||
| -rw-r--r-- | oovbaapi/ooo/vba/excel/XInterior.idl | 1 | ||||
| -rw-r--r-- | sc/source/ui/vba/vbainterior.cxx | 11 | ||||
| -rw-r--r-- | sc/source/ui/vba/vbainterior.hxx | 2 |
4 files changed, 26 insertions, 0 deletions
diff --git a/oovbaapi/ooo/vba/excel/Constants.idl b/oovbaapi/ooo/vba/excel/Constants.idl index 061e679d61db..af32f2cccf8b 100644 --- a/oovbaapi/ooo/vba/excel/Constants.idl +++ b/oovbaapi/ooo/vba/excel/Constants.idl @@ -168,6 +168,18 @@ module ooo { module vba { module excel { const long xlWorksheet4 = 1; const long xlWorksheetCell = 3; const long xlWorksheetShort = 5; + const long xlThemeColorAccent1 = 5; + const long xlThemeColorAccent2 = 6; + const long xlThemeColorAccent3 = 7; + const long xlThemeColorAccent4 = 8; + const long xlThemeColorAccent5 = 9; + const long xlThemeColorAccent6 = 10; + const long xlThemeColorDark1 = 1; + const long xlThemeColorDark2 = 3; + const long xlThemeColorFollowedHyperlink = 12; + const long xlThemeColorHyperlink = 11; + const long xlThemeColorLight1 = 2; + const long xlThemeColorLight2 = 4; }; }; }; }; diff --git a/oovbaapi/ooo/vba/excel/XInterior.idl b/oovbaapi/ooo/vba/excel/XInterior.idl index aef589de9327..06baa2645864 100644 --- a/oovbaapi/ooo/vba/excel/XInterior.idl +++ b/oovbaapi/ooo/vba/excel/XInterior.idl @@ -38,6 +38,7 @@ interface XInterior [attribute] any Pattern; [attribute] any PatternColor; [attribute] any PatternColorIndex; + [attribute] any ThemeColor; }; diff --git a/sc/source/ui/vba/vbainterior.cxx b/sc/source/ui/vba/vbainterior.cxx index 51b4c2270615..62f2d26f1766 100644 --- a/sc/source/ui/vba/vbainterior.cxx +++ b/sc/source/ui/vba/vbainterior.cxx @@ -384,6 +384,17 @@ ScVbaInterior::setPatternColorIndex( const uno::Any& _patterncolorindex ) throw uno::RuntimeException("Invalid Pattern Color" ); } +uno::Any SAL_CALL ScVbaInterior::getThemeColor() +{ + // Just a stub for now. + return uno::makeAny(static_cast<sal_Int32>(0)); +} + +void SAL_CALL ScVbaInterior::setThemeColor(const uno::Any& /*rAny*/) +{ + // Just a stub for now. +} + OUString ScVbaInterior::getServiceImplName() { diff --git a/sc/source/ui/vba/vbainterior.hxx b/sc/source/ui/vba/vbainterior.hxx index 9bb86ab308c0..d036392e25ec 100644 --- a/sc/source/ui/vba/vbainterior.hxx +++ b/sc/source/ui/vba/vbainterior.hxx @@ -70,6 +70,8 @@ public: virtual void SAL_CALL setPatternColor( const css::uno::Any& _patterncolor ) override; virtual css::uno::Any SAL_CALL getPatternColorIndex() override; virtual void SAL_CALL setPatternColorIndex( const css::uno::Any& _patterncolorindex ) override; + css::uno::Any SAL_CALL getThemeColor() override; + void SAL_CALL setThemeColor(const css::uno::Any& rAny) override; //XHelperInterface virtual OUString getServiceImplName() override; virtual css::uno::Sequence<OUString> getServiceNames() override; |