易表在线答疑技术与交流用户社区 → [求助]求一顺序公式


  共有7783人关注过本帖树形打印复制链接

主题:[求助]求一顺序公式

帅哥哟,离线,有人找我吗?
春夏秋冬
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:68 积分:435 威望:0 精华:0 注册:2007/6/3 19:32:00
[求助]求一顺序公式  发帖心情 Post By:2011/6/6 20:57:00 [只看该作者]

251 110  874如何用公式排列为110 251 874(或者874 251 110)。谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
wjq1072
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2011/6/6 21:18:00 [只看该作者]

发文件,进一步说明问题!

 回到顶部
美女呀,离线,留言给我吧!
dancedy
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:2721 积分:4555 威望:0 精华:0 注册:2011/5/12 17:20:00
  发帖心情 Post By:2011/6/7 9:52:00 [只看该作者]

sortcol(gridname,colname,1)

 回到顶部
帅哥哟,离线,有人找我吗?
Czy
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2011/6/7 12:56:00 [只看该作者]

这种要求用刷新公式几乎没有办法实现。
用操作公式倒是可以,不过如果按f6重算,会出现一些问题,比如速度问题。
所以最好的办法是做个按钮,输入数据后再进行排序,可以对当前行排序,也可以做个全表一次性的排序

egd文件下载


 回到顶部
帅哥哟,离线,有人找我吗?
Czy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2011/6/7 13:03:00 [只看该作者]

楼上公式有误,更改为

if([原字符]="",true,CreateGrid(".","X",1) And SetVariable("%n%",0) And eval(Mid(Rept(" And SetVariable(""%n%"",[%n%]+1) And AddRow(grids,1,Split([原字符],"" "",[%n%]))",Len([原字符])-Len(Substitute([原字符]," ",""))+1),5)) And SortCol(grids,1,1) And SetCellText(grid,row,2,Substitute(ListFor(grids,1,2),"|"," ")) And RemoveGrid("."))


 回到顶部
帅哥哟,离线,有人找我吗?
春夏秋冬
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:68 积分:435 威望:0 精华:0 注册:2007/6/3 19:32:00
  发帖心情 Post By:2011/6/7 14:05:00 [只看该作者]

谢谢高手

 回到顶部
帅哥哟,离线,有人找我吗?
wjq1072
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2011/6/7 19:26:00 [只看该作者]

借用CZY的文件,不要变量试试?
CreateGrid(".","k",0) And AddRows(".",Len([原字符])) And EvalFor(".","k","Split([表1!原字符],"" "",Row)") And SortCol(".","k",1) And EvalFor(Grid,"重新排序","Substitute(ListFor(""."",""k"",2),""|"","" "")",rowsel,rowsel) And RemoveGrid(".")

 回到顶部