超级列表宽度导出问题

yzw011

这样倒出后如果重命名文件名，文件后缀就消失了，要指定打开方式，要怎么样才可以自定义文件名

.版本 2
.支持库 eExcel2000

通用对话框.类型 ＝ 1
.如果真 (通用对话框.打开 () ＝ 假)
    返回 ()
.如果真结束
Excel程序1.创建 ()
Excel工作簿1.置程序 (Excel程序1)
Excel工作簿1.激活工作簿 ()
Excel工作簿1.表格序号 ＝ 1
脚本内容**********

Excel工作簿1.保存 (通用对话框.文件名)
' Excel工作簿1.保存 (文本_替换 (通用对话框.文件名, , , , “.xls”, “导出.xls”, , , , , , , , ))----------这样虽然可以改，但是会生成新文件，但是会提示覆盖源文件
批量录单窗口.Excel工作簿1.关闭 ()
批量录单窗口.Excel工作簿1.释放 ()
批量录单窗口.Excel程序1.退出 ()
批量录单窗口.Excel程序1.释放 ()

yzw011

没人知道吗525555555