Question

易语言程序保存高级表格时，自定义文件名方法

易语言程序保存高级表格时，自定义文件名方法，我想把一个原来导出的代码是有这个：
Excel工作簿1.保存 (取运行目录 () ＋ “\1.exel”)
另一个，保存的代码是：
.版本 2
.支持库 eExcel2000
.支持库 eGrid

通用对话框1.类型 ＝ 1
通用对话框1.过滤器 ＝ “EXCEL文件|*.xlsx”
通用对话框1.默认文件后缀 ＝ “.xlsx”
通用对话框1.打开 ()
.如果 (通用对话框1.文件名 ≠ “”)
Excel程序1.创建 ()
Excel程序1.标题 ＝ “高级表格1”
Excel工作簿1.置程序 (Excel程序1)
Excel程序1.显示 ＝ 假
.计次循环首 (i ＋ 1, n)
.计次循环首 (14, m)
置表格内容 (字符 (m ＋ 64) ＋ 到文本 (n), 高级表格1.取数据 (n － 1, m － 1))
.计次循环尾 ()
.计次循环尾 ()
Excel工作簿1.首单元格 ＝ “A1”
Excel工作簿1.尾单元格 ＝ “O” ＋ 到文本 (n)
Excel工作簿1.自动调整 ()
Excel工作簿1.保存 (通用对话框1.文件名)
Excel程序1.退出 ()
可是现在是这样，我想要的是把一个编辑框的内容（李公民）+当前日期作为现在的文件名，也就是代替1..xlsx，变成一点保存就自动把当前的高级表格内容的文件名为　　　李公民20140422.xlsx 也就编辑框内容加当前日期，就好了，不知道怎么写。请高手指点。

还有一个，就是如我要删除高级表格中的行，我该怎么写？

Answer 1

.版本 2

.支持库 CnCalendar

.局部变量 时间, 文本型

通用对话框1.类型 ＝ 1

通用对话框1.过滤器 ＝ “EXCEL文件|*.xlsx”

通用对话框1.默认文件后缀 ＝ “.xlsx”

时间 ＝ 到文本 (格式化日期 (取日期 (取现行时间 ()), “%y%m%d”))

通用对话框1.文件名 ＝ “李公民” ＋ 时间

通用对话框1.打开 ()

删除行

高级表格1.删除行 (1)

追问

你好，请问这是怎么回事？

还有，如果删除我光标所在行，是不是就这样写了？

高级表格1.删除行 (高级表格1.取光标行号 ())

追答

工具

里面全选一下 保存

或者直接使用

时间 ＝ 到文本 (取日期 (取现行时间 ()))

追问

我这里改了一下来应用，可是那个到保存时只有日期没有客户名在里面，是不是这里的代码有冲突啊

另外还有一个问题，因为我在第一列设计有序号，可是，按我删作选中行这样的操作，是把那一行连序号都删掉了，导致后面的序号接不上了，有没有什么办法，清除掉那一行除序号以后的数据，而保留第一列的序号。

追答

.版本 2

.支持库 eGrid

.程序集 窗口程序集1

.子程序 _高级表格1_鼠标右键被按下, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

弹出菜单 (菜单, 取鼠标水平位置 (), 取鼠标垂直位置 ())

.子程序 _删除此行_被选择

高级表格1.删除行 (高级表格1.取光标行号 ())

.子程序 __启动窗口_创建完毕

高级表格1.置数据 (1, 0, 1, “1”)

高级表格1.置数据 (2, 0, 1, “2”)

高级表格1.置数据 (3, 0, 1, “3”)

追问

删除一整行，你之前写的代码也能实现，只是我想保留序号，而且在我再次添加内容时，那个内容还是可以添加到已经清除内容的那行
我现在的程序是这样的，比如，我点一个计算，然后在高级表格中就自动添加一行的内容——可是有时难免出错，如果错了就得从头来过？所以我想可以删除那一行，可是现在的状况是，删除一行是可以，但是要么就是一整行和序号一起删掉了，我要添加的内容还是添加到了已删除的下一行，

追答

.版本 2
.支持库 eGrid

.子程序 _删除此行_被选择
.局部变量 序号, 整数型
.局部变量 x, 整数型
.局部变量 删除行号, 整数型

删除行号 ＝ 高级表格1.取光标行号 ()
高级表格1.删除行 (删除行号)
序号 ＝ 高级表格1.行数
x ＝ 0
.计次循环首 (序号 － 删除行号, )
高级表格1.置数据 (删除行号 ＋ x, 0, 1, 到文本 (删除行号 ＋ x))
x ＝ x ＋ 1
.计次循环尾 ()

.版本 2
.支持库 eGrid

.子程序 _向上插入行_被选择
.局部变量 y, 整数型
.局部变量 序号2, 整数型
.局部变量 增加行号, 整数型

增加行号 ＝ 高级表格1.取光标行号 () ＋ 1 ' +1代表在后面插入
高级表格1.插入行 (, 增加行号)
序号2 ＝ 高级表格1.行数
y ＝ 0
.计次循环首 (序号2 － 增加行号, )
高级表格1.置数据 (增加行号 ＋ y, 0, 1, 到文本 (增加行号 ＋ y))
y ＝ y ＋ 1
.计次循环尾 ()