2011年9月5日
摘要：
排序：Range("A:T").Sort Key1:=Range("P1"), Order1:=xlAscending, Header:= _ xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ SortMethod:=xlPinYin, DataOption1:=xlSortNormal复制指定区域到新的xls中：//设置复制区域
Set rang1 = Range("A1:T1")
Set rang2 = Range(Cells(star 阅读全文