diff options
-rw-r--r-- | sc/source/ui/vba/vbanames.cxx | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/sc/source/ui/vba/vbanames.cxx b/sc/source/ui/vba/vbanames.cxx index 9cf542bbbaab..4abdd11e00f0 100644 --- a/sc/source/ui/vba/vbanames.cxx +++ b/sc/source/ui/vba/vbanames.cxx @@ -196,7 +196,8 @@ ScVbaNames::Add( const css::uno::Any& Name , if ( !xRange.is() ) xRange = new ScVbaRange( mxParent, mxContext, xUnoRange ); - uno::Reference< excel::XRange > xArea( xRange->Areas( uno::makeAny( 1 ) ), uno::UNO_QUERY ); + uno::Reference< excel::XRange > xArea( xRange->Areas( uno::makeAny( sal_Int32(1) ) ), uno::UNO_QUERY ); + uno::Any xAny = xArea->getCellRange() ; uno::Reference< sheet::XCellRangeAddressable > thisRangeAdd( xAny, ::uno::UNO_QUERY_THROW); |