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把单元格的内容连接为一维数组,空间隔开。