diff options
| author | Justin Luth <justin_luth@sil.org> | 2015-04-07 19:26:17 +0300 |
|---|---|---|
| committer | Markus Mohrhard <markus.mohrhard@googlemail.com> | 2015-04-14 19:14:59 +0200 |
| commit | a623d1a0e65c4fb1f72f4ce87f462e5dcd8c3c45 (patch) | |
| tree | 36a6cfa80fd49942cbf621782205197fa062520a | |
| parent | 853bfc68b93427f105d2c8c0ed959b3971861755 (diff) | |
tdf#90447 vba find() should NOT select the found cell.
Change-Id: Ia8c331f33bc81e7bdabeea649a47c73930dae206
| -rw-r--r-- | sc/qa/extras/macros-test.cxx | 4 | ||||
| -rw-r--r-- | sc/qa/extras/testdocuments/vba_findFunction.xls | bin | 0 -> 34304 bytes | |||
| -rw-r--r-- | sc/source/ui/vba/vbarange.cxx | 1 |
3 files changed, 4 insertions, 1 deletions
diff --git a/sc/qa/extras/macros-test.cxx b/sc/qa/extras/macros-test.cxx index 2c7f5b8da51e..3bc3a94d4b68 100644 --- a/sc/qa/extras/macros-test.cxx +++ b/sc/qa/extras/macros-test.cxx @@ -229,6 +229,10 @@ void ScMacrosTest::testVba() OUString("vba_endFunction."), OUString("vnd.sun.Star.script:VBAProject.testMacros.test?language=Basic&location=document") }, + { + OUString("vba_findFunction."), + OUString("vnd.sun.Star.script:VBAProject.testMacros.test?language=Basic&location=document") + }, }; OUString sTempDir; OUString sTempDirURL; diff --git a/sc/qa/extras/testdocuments/vba_findFunction.xls b/sc/qa/extras/testdocuments/vba_findFunction.xls Binary files differnew file mode 100644 index 000000000000..2ea964ee290f --- /dev/null +++ b/sc/qa/extras/testdocuments/vba_findFunction.xls diff --git a/sc/source/ui/vba/vbarange.cxx b/sc/source/ui/vba/vbarange.cxx index d312d3ae46e1..7cd73f319593 100644 --- a/sc/source/ui/vba/vbarange.cxx +++ b/sc/source/ui/vba/vbarange.cxx @@ -3281,7 +3281,6 @@ ScVbaRange::Find( const uno::Any& What, const uno::Any& After, const uno::Any& L uno::Reference< excel::XRange > xResultRange = new ScVbaRange( mxParent, mxContext, xCellRange ); if( xResultRange.is() ) { - xResultRange->Select(); return xResultRange; } } |