VBA+SQL 实现排序和自定义排序

2019-08-08  本文已影响0人  42c64edf12e9

语法:
排序用order by,如果要自定义排序,可以用 order by instr('自定义顺序' ,Id)

举例:

...... order by instr('3A,3B,3C,3E,3F,2G,2H,2J,3G,3H,3J',车间)

也可以引用单元格内容进行排序

...... order by instr('" & Join(Application.Transpose([b23:b33])) & "',车间)


Application.Transpose([b23:b33])               '转置单元格区域。
Join(Application.Transpose([b23:b33]))     '用join把单元格的内容连接为一维数组,空间隔开。
上一篇下一篇

猜你喜欢

热点阅读