| 以文本方式查看主题 - 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2) ---- 如何在本表重命名其它任意表 (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=2254) |
| -- 作者：swg-1954 -- 发布时间：2011/6/29 12:25:00 -- 如何在本表重命名其它任意表 详见编辑栏egd文件下载 |
| -- 作者：swg-1954 -- 发布时间：2011/6/29 12:34:00 -- egd文件下载 |
| -- 作者：wjq1072 -- 发布时间：2011/6/29 13:05:00 -- egd文件下载 |
| -- 作者：Czy -- 发布时间：2011/6/29 13:11:00 -- 也可以这样 增加一个字符型变量，姑且命名为%值% 增加一个字符型变量，姑且命名为%重命名表名% 按钮公式改成： SetVariable("%值%",cell(1,1,[%表%])) And evalfor([%表%],1,"SendKeys([%重命名表名%] + ""{tab 4}~"") And Do(53)",1,1) And SetCellText([%表%],1,1,[%值%]) |
| -- 作者：swg-1954 -- 发布时间：2011/6/29 13:19:00 -- 谢谢啦！就是这个效果。 |
| -- 作者：Czy -- 发布时间：2011/6/29 13:22:00 -- 如果你的文件某些表设有预处理公式或有窗口，建议采用4楼公式，应该这样不会影响速度且不闪屏。 |
| -- 作者：swg-1954 -- 发布时间：2011/6/29 14:08:00 -- wjq1072总版主的公式是闪屏，czy总版主的不闪屏，但修改重命名表的第一行为“True”，这是何原因。有没有一个最佳的办法，既不闪屏又不改变表中的内容。 |
| -- 作者：Czy -- 发布时间：2011/6/29 16:31:00 -- 不好意思，我公式中写错变量名称了 SetVariable("%值%",cell(1,1,[%表%])) And evalfor([%表%],1,"SendKeys([%重命名表名%] + ""{tab 4}~"") And Do(53)",1,1) And SetCellText([%重命名表名%],1,1,[%值%]) |
| -- 作者：don -- 发布时间：2011/6/29 16:40:00 -- 也可这样(自行更改[XXX]): evalfor([%表%],1,"if(SendKeys([%重命名表名%] + ""{tab 4}~"") And Do(53),[XXX],[XXX]",1,1) |
| -- 作者：swg-1954 -- 发布时间：2011/6/29 18:03:00 -- 谢谢啦！ |