樞紐分析表無法排序由小到大? - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 樞紐分析表無法排序由小到大?

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

[發問] 樞紐分析表無法排序由小到大?

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

1^# 跳轉到 »

發表於 2012-3-2 15:28 | 顯示全部帖子

樞鈕中雙擊日期欄位的標題，在對話框裡選"進階"，裡面有排序的選項
依指示操作即可。

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

2^#

發表於 2012-3-2 21:43 | 顯示全部帖子

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

3^#

發表於 2012-3-3 09:33 | 顯示全部帖子

回復 8# jackson7015

你的目的不是用樞鈕分析表，樞鈕分析表是統合歸納，你要的只是排列某些欄位
用這個代碼：

Sub yy()
Dim i%, j%, n%, c, arr, a
c = Array(3, 4, 5, 10, 1, 11, 12)
With Sheets("綜合資料庫")
n = .[b65536].End(3).Row
a = .Range(.Cells(4, 2), .Cells(n, 13))
End With
ReDim arr(1 To UBound(a), 1 To 7)
For j = 1 To UBound(a)
For i = 1 To 7
arr(j, i) = a(j, c(i - 1))
Next i, j
With Sheets("項目9")
.Cells(2, 1).Resize(j - 1, 7) = arr
.Cells(2, 6).Resize(UBound(a), 1).SpecialCells(4) = "-"
.UsedRange.Borders.LineStyle = 1
End With
End Sub

複製代碼

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

4^#

發表於 2012-3-5 07:58 | 顯示全部帖子

回復 register313

瞭解了，從一開始就納悶為何都不能排序，原來是這個原因

不過知道了只有第一列可 ...
jackson7015 發表於 2012-3-3 22:01

這樣說會誤導新的學習者。
excel沒有規定樞鈕中只有第一列可排序，而且欄例的分別不要混淆。
軟體能發揮多少功能端看使用者對軟體認識的程度。

靜思自在 : 改變自己是自救，影響別人是救人。

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