diff options
Diffstat (limited to 'vbahelper/source/msforms/vbacombobox.cxx')
| -rw-r--r-- | vbahelper/source/msforms/vbacombobox.cxx | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/vbahelper/source/msforms/vbacombobox.cxx b/vbahelper/source/msforms/vbacombobox.cxx index 30f72379380b..6933884baf55 100644 --- a/vbahelper/source/msforms/vbacombobox.cxx +++ b/vbahelper/source/msforms/vbacombobox.cxx @@ -120,7 +120,11 @@ void SAL_CALL ScVbaComboBox::setValue( const uno::Any& _value ) throw (uno::RuntimeException) { // booleans are converted to uppercase strings + OUString oldValue = extractStringFromAny( getValue(), OUString(), true ); m_xProps->setPropertyValue( sSourceName, uno::Any( extractStringFromAny( _value, OUString(), true ) ) ); + OUString newValue = extractStringFromAny( getValue(), OUString(), true ); + if ( oldValue != newValue ) + fireChangeEvent(); } // see Value |