VBA排序 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → VBA排序

共有3174人关注过本帖树形打印复制链接主题：VBA排序

zhuxinhui

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1989 积分：6291 威望：0 精华：0 注册：2017/11/8 17:37:00

VBA排序

Post By：2019/8/31 14:31:00 [显示全部帖子]

VBA排序代码：Sheets("???").Range("a2:N" & K).Sort key1:=Range("A2"), order1:=xlAscending, key2:=Range("D2"), order2:=xlAscending, key3:=Range("K2"), order3:=xlDescending, Header:=xlGuess

改为FORTABLE代码：ws.Range("a2:N" & K).Sort(key1:=ws.Range("A2"),order1:=MSExcel.XlSortOrder.xlAscending,key2:=ws.Range("D2"),order2:=MSExcel.XlSortOrder.xlAscending,key3:=ws.Range("K2"),order3:=MSExcel.XlSortOrder.xlAscending)

最后这个Header:=xlGuess怎样改

上面句改后执行得出的结果有点像是列前后排序了

zhuxinhui

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1989 积分：6291 威望：0 精华：0 注册：2017/11/8 17:37:00

Post By：2019/8/31 15:30:00 [显示全部帖子]

看不懂，请指点下

zhuxinhui

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1989 积分：6291 威望：0 精华：0 注册：2017/11/8 17:37:00

Post By：2019/8/31 16:53:00 [显示全部帖子]

ws.Range("a2:N" & K).Sort(key1:=ws.Range("A2"),order1:=MSExcel.XlSortOrder.xlAscending,key2:=ws.Range("D2"),order2:=MSExcel.XlSortOrder.xlAscending,key3:=ws.Range("K2"),order3:=MSExcel.XlSortOrder.xlAscending,Header:=MSExcel.XlYesNoGuess.xlGuess)得出的结果不是对列中的行进行排序，而是对列进行了调换位，不知是什么回事

zhuxinhui

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1989 积分：6291 威望：0 精华：0 注册：2017/11/8 17:37:00

Post By：2019/8/31 17:12:00 [显示全部帖子]

关于使用FORTABLE操作VBA相关知识点，就是将VBA转化成FORTABLE相关的知识点，有什么书介绍下

下一主题 >> << 上一主题

主题：VBA排序