Sorting程式碼不能執行 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » Sorting程式碼不能執行

返回列表下一主題上一主題發帖

Sorting程式碼不能執行

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

1^# 跳轉到 »

發表於 2013-12-23 09:59 | 顯示全部帖子

回復 2# owen06

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

2^#

發表於 2013-12-23 13:28 | 顯示全部帖子

回復 4# owen06
這種相容性問題是非常令人困擾的，有些在2003能執行的未必相容於 2007、2010。

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

3^#

發表於 2013-12-23 17:05 | 顯示全部帖子

回復 8# GBKEE
Same Error as shown on 3#.

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

4^#

發表於 2013-12-24 08:22 | 顯示全部帖子

回復 6# stevenliu555
回復 10# owen06
的確在 2003 與 2007、2010 上表達是有些微的差異性，
多謝 owen06 大大的用心！

Sub Ex()
With Sheets("會員名冊").Sort
.SortFields.Clear
.SetRange Range("A1:J31")
.SortFields.Add Key:=Range("D2"), Order:=xlAscending '先以D2遞增排序
.SortFields.Add Key:=Range("F2"), Order:=xlAscending '先以F2遞增排序
.Header = xlYes
.Apply
End With
End Sub

複製代碼

靜思自在 : 君子為目標，小人為目的。

返回列表下一主題上一主題