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

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

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

Sorting程式碼不能執行

博士班 Rank: 6 Rank: 6

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

11^# 跳轉到 »

發表於 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

複製代碼

小學生 Rank: 1

帖子: 9
主題: 3
精華: 0
積分: 17
點名: 0
作業系統: Windows 8
軟體版本: OFFICE 2007
閱讀權限: 10
性別: 男
來自: taiwan
註冊時間: 2010-10-9
最後登錄: 2016-1-20

12^#

發表於 2013-12-24 21:00 | 只看該作者

感謝10#, 11#的教導，真的可以耶。
但是，我還是有點質疑，為什麼EXCEL 2007、2010程式碼會變得複雜，反而難用，不解。

Engr<i>[12]<strong>

　暱稱: 阿軒

中學生 Rank: 2

帖子: 396
主題: 12
精華: 0
積分: 425
點名: 1
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2013-7-2
最後登錄: 2024-8-23

2015羊年全勤獎章 2014馬年全勤獎章熱烈參與勳章

13^#

發表於 2013-12-24 22:28 | 只看該作者

回復 12# stevenliu555

可能是對於一般使用者來說，在滑鼠操作的介面功能變的超強大，超簡便，
但是相對的，程式語言也就變的更複雜了。猜的啦…

靜思自在 : 有願放在心裡，沒有身體力行，正如耕田不播種，皆是空過因緣。

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