summaryrefslogtreecommitdiff
path: root/wizards/source/euro/ConvertRun.xba
diff options
context:
space:
mode:
Diffstat (limited to 'wizards/source/euro/ConvertRun.xba')
-rw-r--r--wizards/source/euro/ConvertRun.xba4
1 files changed, 2 insertions, 2 deletions
diff --git a/wizards/source/euro/ConvertRun.xba b/wizards/source/euro/ConvertRun.xba
index 8e90ed3a9d95..a15c88412228 100644
--- a/wizards/source/euro/ConvertRun.xba
+++ b/wizards/source/euro/ConvertRun.xba
@@ -4,7 +4,6 @@
Public oPreSelRange as Object
-
Sub Main()
BasicLibraries.LoadLibrary("Tools")
If InitResources("Euro Converter", "eur") Then
@@ -15,7 +14,8 @@ Sub Main()
InitializeConverter(oDocument.CharLocale, 1)
GetPreSelectedRange()
If GoOn Then
- DialogConvert.GetControl("chkComplete").SetFocus()
+ DialogModel.lstCurrencies.TabIndex = 2
+ DialogConvert.GetControl("chkComplete").SetFocus()
DialogConvert.Execute
End If
DialogConvert.Dispose