麻辣家族討論版版 » Excel程式區 » 請問如何在一欄數字當中最大值次大值第三大值設不同底色

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

請問如何在一欄數字當中最大值次大值第三大值設不同底色

中學生 Rank: 2

帖子: 49
主題: 15
精華: 0
積分: 92
點名: 0
作業系統: win7
軟體版本: office2001
閱讀權限: 20
性別: 男
註冊時間: 2012-4-10
最後登錄: 2024-8-9

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2016-4-1 00:22 | 只看該作者

請問如何在一欄數字當中最大值次大值第三大值設不同底色

請問如何在一欄數字當中 最大值次大值第三大值 設不同底色
最大值底色設為紅色
第二大值底色設為淺藍
第三大值底色設為黃色

感謝大家的幫忙
謝謝

樓主熱帖

收藏

學習學習一直學習

中學生 Rank: 2

帖子: 163
主題: 1
精華: 0
積分: 170
點名: 0
作業系統: Window 7
軟體版本: Office 2007
閱讀權限: 20
性別: 男
註冊時間: 2010-9-5
最後登錄: 2022-7-20

14^#

發表於 2016-4-13 19:49 | 只看該作者

回復 13# peter95
請參考。
下載位址：http://www.FunP.Net/453186

[b]Kubi[/b]

中學生 Rank: 2

帖子: 49
主題: 15
精華: 0
積分: 92
點名: 0
作業系統: win7
軟體版本: office2001
閱讀權限: 20
性別: 男
註冊時間: 2012-4-10
最後登錄: 2024-8-9

13^#

發表於 2016-4-12 22:38 | 只看該作者

回復 12# Kubi

好心人 Kubi 大大

小弟慚愧目前仍是小學生等級
所以還不能下載附件

請問有別的下載點嗎??

不好意思麻煩你了
再次感謝你的幫忙

學習學習一直學習

中學生 Rank: 2

帖子: 163
主題: 1
精華: 0
積分: 170
點名: 0
作業系統: Window 7
軟體版本: Office 2007
閱讀權限: 20
性別: 男
註冊時間: 2010-9-5
最後登錄: 2022-7-20

12^#

發表於 2016-4-12 20:50 | 只看該作者

回復 8# peter95
我的權限不能下載附件，因此無法了解您的問題出在哪裡？
可能誠如GBKEE超級版主所述原因可能出在於Option Base 1，
Option Base 1 必須放置於模組的頂端，宣告在此模組內的所有巨集的陣列其起始值是從1開始，並非從0開始，
若未定義Option Base，則預設是從0開始。
但請注意：Split 並不受Option Base 1影響，它的起始值還是以0開始。

請參考附件

找最大值上顏色.rar (21 KB)

[b]Kubi[/b]

小學生 Rank: 1

帖子: 18
主題: 6
精華: 0
積分: 24
點名: 0
作業系統: win7
軟體版本: 2007
閱讀權限: 10
性別: 男
來自: 高雄
註冊時間: 2016-3-23
最後登錄: 2016-7-4

11^#

發表於 2016-4-12 11:42 | 只看該作者

回復 7# frantz
如果是常常有此類的文件類型要處理，
用VBA執行不用像函數每次都要設定一次。

以上是我的經驗
不知道有無錯誤
尚請各位大大指教

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2825
主題: 10
精華: 0
積分: 2881
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-9-15

10^#

發表於 2016-4-12 09:48 | 只看該作者

先試[格式化條件]：
http://www.funp.net/116242

如果前三大不只一個，如何標色？

超級版主 Rank: 8 Rank: 8

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

9^#

發表於 2016-4-12 06:10 | 只看該作者

回復 8# peter95
上傳檔案 xlsx 是無巨集沒有程式碼,需上傳副檔名xlsm有巨集程式碼.

Option Explicit
Option Base 0
Sub Ex_()
'Option Base 陳述式在模組層次中用來宣告陣列索引的預設下限。
'Option Base {0 | 1}
'陣列元素下限值,預設為 Option Base 0
' 預設值 For I = 0 To 2 '才正確
'有 Option Base 1 For I = 1 To 3 '是正確
'不管有無 Option Base
'保險作法 For I = LBound(ci) To UBound(ci)
' Dim ci(5 To 7), i As Integer
' ci(5) = 3
' ci(6) = 8
' ci(7) = 6
Dim ci(), i As Integer
ci = Array(3, 8, 6)
MsgBox " ci 下限值 " & LBound(ci) & " ci 上限值 " & UBound(ci)
For i = LBound(ci) To UBound(ci)
MsgBox ci(i)
Next
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 49
主題: 15
精華: 0
積分: 92
點名: 0
作業系統: win7
軟體版本: office2001
閱讀權限: 20
性別: 男
註冊時間: 2012-4-10
最後登錄: 2024-8-9

8^#

發表於 2016-4-12 01:51 | 只看該作者

本帖最後由 peter95 於 2016-4-12 01:53 編輯

回復 5# Kubi

感謝大大熱請幫忙
小弟執行時發現狀況

輔助欄非排序法
黃色地方顯示錯誤然後當掉

請大大再幫我看看
附上小弟要篩選的檔案

Book1.rar (6.09 KB)
再次感謝各位大大的幫忙
謝謝

學習學習一直學習

小學生 Rank: 1

帖子: 15
主題: 6
精華: 0
積分: 25
點名: 0
作業系統: win7
軟體版本: vba
閱讀權限: 10
註冊時間: 2015-3-8
最後登錄: 2024-7-31

7^#

發表於 2016-4-11 11:57 | 只看該作者

請問
這個用函數跟VBA寫，兩者的差異性在那裡??
那一種對資源負擔會比較大一點??

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2825
主題: 10
精華: 0
積分: 2881
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-9-15

6^#

發表於 2016-4-11 11:39 | 只看該作者

前三大都不只一個，如何處理？
１００
９９
１００
９９
９９
８５
７０
７６

靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。

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