• Skip to primary navigation
  • Skip to main content
  • Skip to primary sidebar
Office 指南

Office 指南

辦公室工作實用教學

  • Excel
  • Word
  • PowerPoint
  • Windows
  • PowerShell
  • R

Excel VBA Range.Sort 範圍排序教學與範例

介紹如何在 Excel VBA 中針對指定範圍,依據指定的欄位與條件進行資料的排序。


假設我們的原始資料如下:

原始資料
原始資料

基本排序

若單純只是要依據姓名(或其他單一欄位)來排序,只要指定資料範圍,並以 Key1 指定排序依據的欄位,即可進行資料的排序:

' 排序 A1:D10 範圍的資料
' Key1:=Range("A1")    依據 A 欄排序
' Order1:=xlAscending  升冪排序
' Header:=xlYes        有標題列
Range("A1:D10").sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlYes

若要更改排序方式,則可由 Order1 參數調整,可用的值有 xlAscending(升冪排序)與 xlDescending(降冪排序)。若表格不包含標題列,可將 Header 參數改為 xlNo。

如果想要對整欄的所有資料進行排序,可以使用 Columns 指定要納入排序的欄位:

' 排序 A 欄至 D 欄的所有資料
' Key1:=Range("A1")    依據 A 欄排序
' Order1:=xlAscending  升冪排序
' Header:=xlYes        有標題列
Columns("A:D").sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlYes

排序過後的表格會像這樣。

依據姓名欄排序
依據姓名欄排序

依據日期排序

若要根據日期排序,只要將 Key1 指定為日期那一欄即可:

' 排序 A 欄至 D 欄的資料
' Key1:=Range("C1")     依據 C 欄排序
' Order1:=xlDescending  降冪排序
' Header:=xlYes         有標題列
Columns("A:D").sort Key1:=Range("C1"), Order1:=xlDescending, Header:=xlYes

根據日期降冪排序過後的表格會像這樣。

根據日期降冪排序
根據日期降冪排序

依據多欄位排序

若要根據多個欄位來排序,只要透過 Key1、Key2、Key3 這些參數來依序指定排序的依據欄位即可,同時搭配 Order1、Order2、Order3 指定排序的方式。

舉例來說,如果想先依據組別升冪排序,同組別之內再依據金額降冪排序,可以這樣寫:

' 排序 A 欄至 D 欄的資料
' Key1:=Range("B1")     依據 B 欄排序
' Order1:=xlAscending   升冪排序
' Key2:=Range("D1")     依據 D 欄排序
' Order2:=xlDescending  降冪排序
' Header:=xlYes         有標題列
Columns("A:D").sort Key1:=Range("B1"), Order1:=xlAscending, _
  Key2:=Range("D1"), Order2:=xlDescending, Header:=xlYes

排序過後的表格會像這樣。

依據多欄位排序
依據多欄位排序

分類:Excel 標籤:VBA

讀者互動

發佈留言 取消回覆

發佈留言必須填寫的電子郵件地址不會公開。 必填欄位標示為 *

Primary Sidebar

搜尋

分類

Android Apple C/C++ Excel Linux OneNote PHP PowerPoint PowerShell Python R Windows Word 免費工具 創客 網站架設 線上工具 資料庫 遊戲 雜七雜八

近期文章

  • ITK 以 LabelStatisticsImageFilter 套用遮罩影像計算統計量教學與範例
  • iCloud 匯入 Google 聯絡人教學
  • CSS 檔案最小化與壓縮處理教學與範例
  • Python 使用 ITK 讀取、寫入、建立影像教學與範例
  • Python 以 random 模組產生隨機亂數教學與範例
  • iPhone 手機開啟 VoLTE 與 WiFi 通話 VoWiFi 功能教學
  • Python 以 NumPy 的 unique 函數篩選陣列不重複元素教學與範例
  • ITK 計算 3D 二元遮罩影像物件數量與體積

推薦網站

  • Udemy 線上教學課程
  • Coursera 線上教學課程

關注本站

  • 電子郵件
  • Facebook

Copyright © 2020 · Office Guide