※ 引述《[email protected] (拼挤)》之铭言： > 各位程式板的高手你好： > 小弟有份表格，在每一栏的表头都有二个字一组的英文字，如："WF"、"TP"、"XP"、"EX > 假设范围是从A栏~Z栏，这4组英文字是乱数排在24个栏位里面， > 小弟想请问能否写程式将相同英文字整理在一起？ > 感激不尽！ 用 资料//排序 功能就好了 记得方向要设为循列 那要在对话框的「选项」按钮中设 录下来的巨集内容如下，参考使用 注意蓝色的部份 Columns("A:L").Select Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight 　 -- I love GOOOOOOOOOOOOOOOOOOLD------ 　 -- ▄▄▄▄▄▄▄ ▄▄▄▄ ▄▄▄▄▄▄ ＜telnet://bbs.cs.nctu.edu.tw＞ █▄▄▄▄█ █ ▄▄▄▄▄█ Player: GOLDMEMBER ▄█▄▄▄▄█ ▄▄▄█ █▄▄▄▄▄ From: 59-115-202-185.dynamic.hine ☆ 次世代ＢＳ２ ☆ 可申请个人板 150MB 相簿 http://pic.bs2.to 交大资讯人 250MB