papaya

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2019-3-24 22:19 | 顯示全部帖子

[發問] 指定列之前3名各標示顏色及指定欄標示底色的語法。

本帖最後由 papaya 於 2019-3-24 22:23 編輯

標示顏色.rar (8.35 KB)

需求_1︰
A1︰A&有數字的最後一列標示淺綠藍底色
G1︰K&有數字的最後一列標示淺綠藍底色
Q1︰U&有數字的最後一列標示淺綠藍底色
AA1︰AE&有數字的最後一列標示淺綠藍底色
AK1︰AO&有數字的最後一列標示淺綠藍底色
AU1︰AX&有數字的最後一列標示淺綠藍底色

需求_2-1︰
將倒數第7列(即A欄=空的列)的B︰AX~
最大數標示淺粉藍底色(可有1個以上)；
第二大數標示亮綠底色(可有1個以上)；
第三大數標示淺橙底色(可有1個以上)；
最小數標示紅色粗體的字體顏色(可有1個以上)；
第二小數標示粉紅色粗體的字體顏色(可有1個以上)；
第三小數標示深紅色粗體的字體顏色(可有1個以上)；

需求_2-2︰
將倒數第5列(即A欄=機的列)的B︰AX~
最大數標示淺粉藍底色(可有1個以上)；
第二大數標示亮綠底色(可有1個以上)；
第三大數標示淺橙底色(可有1個以上)；
最小數標示紅色粗體的字體顏色(可有1個以上)；
第二小數標示粉紅色粗體的字體顏色(可有1個以上)；
第三小數標示深紅色粗體的字體顏色(可有1個以上)；

以上需求，誠請各位大大幫忙和賜教!
謝謝各位!

樓主熱帖

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

2^#

發表於 2019-3-28 07:08 | 顯示全部帖子

回復 1# papaya

標示顏色.rar (28.43 KB)

重新整理~
需求_1︰
將倒數第7列(即A欄=空的列)的B︰AX~
最大數標示淺粉藍底色(可有1個以上)；
第二大數標示亮綠底色(可有1個以上)；
第三大數標示淺橙底色(可有1個以上)；
最小數標示紅色粗體的字體顏色(可有1個以上)；
第二小數標示粉紅色粗體的字體顏色(可有1個以上)；
第三小數標示深紅色粗體的字體顏色(可有1個以上)；

需求_2︰
將倒數第5列(即A欄=機的列)的B︰AX~
最大數標示淺粉藍底色(可有1個以上)；
第二大數標示亮綠底色(可有1個以上)；
第三大數標示淺橙底色(可有1個以上)；
最小數標示紅色粗體的字體顏色(可有1個以上)；
第二小數標示粉紅色粗體的字體顏色(可有1個以上)；
第三小數標示深紅色粗體的字體顏色(可有1個以上)；

請詳見︰標示顏色(EX 1) & (EX 2)

以上需求，誠請各位大大幫忙和賜教!
謝謝各位!

TOP

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

3^#

發表於 2019-3-29 05:54 | 顯示全部帖子

回復 2# papaya
簡化問題︰
請指正下列程式碼~
'將B︰AX倒數的第7列之最大數標示淺粉藍底色~
For Each A In Cells([B65536].End(xlUp).Row - 6, 2).Resize(1, 49)
If Application.Max(Cells([B65536].End(xlUp).Row - 6, 2).Resize(1, 49)) Then A.Interior.ColorIndex = 8
Next
呈現的是錯誤的標示範圍(將B︰AX倒數的第7列全標示淺粉藍底色)

正確的標示是︰將最大數(=13)標示淺粉藍底色

請問:正確的程式碼要如何編寫?
謝謝各位!

TOP

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

4^#

發表於 2019-3-30 15:35 | 顯示全部帖子

回復 4# hcm19522
hcm19522大大:您好!
函數解我已會解~http://forum.twbts.com/thread-20731-1-1.html~
但是每個統計表會因期數的增加而列數不固定，所以函數解不適用。

爬文多日~只有在"知識+"找到一段適用的語法，但因年月過久，其範例已無法下載，所以A值的設定還沒有搞清楚^^"
最後還是非常感謝您的解答^^

TOP

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

5^#

發表於 2019-3-30 16:51 | 顯示全部帖子

回復 6# hcm19522
請問:
("空"行最大)B77:AX???格式化=(LARGE(OFFSET($B$1,MATCH("空",$A:$A,)-1,,,20),1)=OFFSET($A$1,MATCH("空",$A:$A,)-1,COLUMN(A1)))*(ROW(A1)=MATCH("空",$A:$A,)-1)
假設是在$B17:$AX17
20是代表什麼意思?謝謝您!

TOP

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

6^#

發表於 2019-3-30 21:31 | 顯示全部帖子

回復 9# hcm19522
測試檔:

EX 1 & 2.rar (15.11 KB)

不知我的操作有沒有錯誤?
格式設定公式在B2:AX2~測試沒有成功^^"
請指正!謝謝您!

TOP

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

7^#

發表於 2019-3-30 23:13 | 顯示全部帖子

回復 11# hcm19522
hcm19522大大:
測試成功了~您的函數造詣真是超高~第一次見識到浮動的格式設定函數公式~令人佩服^^
非常感謝您的熱心指導~感恩^^

==================================================================================

"空"列的B:AX還需要前三小的標示，因受到2003版只能輸入3個條件的限制，所以還是需要前3大和前3小的VBA語法~
誠請各位大大不吝指教!謝謝!

TOP

papaya

中學生 Rank: 2

帖子: 323
主題: 79
精華: 0
積分: 407
點名: 0
作業系統: win7
軟體版本: office 2003
閱讀權限: 20
性別: 男
註冊時間: 2017-10-22
最後登錄: 2022-1-18

8^#

發表於 2019-4-1 22:47 | 顯示全部帖子

問題已解決!謝謝!

TOP