diff options
Diffstat (limited to 'wizards/source/euro/AutoPilotRun.xba')
| -rw-r--r-- | wizards/source/euro/AutoPilotRun.xba | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/wizards/source/euro/AutoPilotRun.xba b/wizards/source/euro/AutoPilotRun.xba index fe2bed7a7d55..b35cc056bb01 100644 --- a/wizards/source/euro/AutoPilotRun.xba +++ b/wizards/source/euro/AutoPilotRun.xba @@ -391,14 +391,14 @@ Sub CallFilePicker() Else ReDim FilterNames(3,1) as String End If - FilterNames(0,0) = oTypes.GetByName("calc_StarOffice_XML_Calc").UIName - Filternames(0,1) = "*.sxc" - FilterNames(1,0) = oTypes.GetByName("calc_StarOffice_XML_Calc_Template").UIName - Filternames(1,1) = "*.stc" - FilterNames(2,0) = oTypes.GetByName("calc8").UIName - Filternames(2,1) = "*.ods" - FilterNames(3,0) = oTypes.GetByName("calc8_template").UIName - Filternames(3,1) = "*.ots" + FilterNames(0,0) = oTypes.GetByName("calc8").UIName + Filternames(0,1) = "*.ods" + FilterNames(1,0) = oTypes.GetByName("calc8_template").UIName + Filternames(1,1) = "*.ots" + FilterNames(2,0) = oTypes.GetByName("calc_StarOffice_XML_Calc").UIName + Filternames(2,1) = "*.sxc" + FilterNames(3,0) = oTypes.GetByName("calc_StarOffice_XML_Calc_Template").UIName + Filternames(3,1) = "*.stc" GetFileName(DialogModel.txtSource, Filternames()) Else GetFolderName(DialogModel.txtSource) |