Excel VBA資料排序

每天更新excel vba經典**，祝你工作和學習更輕鬆！

在如圖1所示資料列表中，需要按總成績從高到低進行排序，示例**如下。

sub sortdemo(

) range(
"a1"
).sort key1:
="總成績", order1:
=xldescending, _
header:
=xlyes
endsub

圖1 待排序資料列表

圖2 按總成績降序排序結果

range物件的sort方法對區域進行排序，其語法格式如下。

sort(key1, order1, key2,

type
, order2, key3, order3, header, ordercustom, matchcase, orientation, sortmethod, dataoption1, dataoption2, dataoption3)

引數order1、order2和order3是可選的，其值可為xlascending，按公升序對指定字段排序(預設值)；或者是xldescending，按降序對指定字段排序。

引數header是可選的，用於指定第1行是否包含標題資訊，其值可為xlguess，表示由excel確定是否有標題；xlno，表示不包含標題(預設值)；xlyes，表示包含標題。

range物件的sort方法最多可以指定3個排序字段，如下示例**對圖1所示資料集以「總成績」、「學科1」和「學科2」分別為第1欄位、第2欄位和第3欄位進行排序，排序結果如圖3所示​。

sub sortdemoa(

) range(
"a1"
).sort key1:
="總成績", order1:
=xldescending, _
key2:
="學科1", order2:
=xldescending, _
key3:
="學科2", order3:
圖3 按3個關鍵字排序結果
 
Excel VBA多關鍵字資料排序
每天更新excel vba經典 祝你工作和學習更輕鬆！使用range物件的sort方法對區域進行排序時，同時最多只能指定3個關鍵字，當需要按照超過3個關鍵字對區域進行排序時，可以通過多次執行sort方法實現。需要注意的是，在排序時應按照各關鍵字的倒敘順序。例如，如果按照a b c d的關鍵字順序進行...
Excel VBA 資料替換
原始檔.xlsx 有兩列資料，乙個是原始值，一列是替代值 根據實際資料行修改 nvaluecount 597 修改後的資料填充為了藍色 mypath thisworkbook.path myfile dir mypath xls dim nrow as long dim ncolumn as lon...
EXCEL VBA連線SQL資料庫
說明 excel vba連線sql資料庫一般有以下3個步驟 1.vba連線資料庫之前需要建立連線物件 可以採用以下方式 dim cn as object set cn createobject adodb.connection 也可以通過新增引用的方式，具體為 工具 引用 找到microsoft a...