返回列表 上一主題 發帖

[發問] 指定2列或3列的同欄同時都有數字時，則標示底色的語法

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2019-4-5 03:47 | 顯示全部帖子

[發問] 指定2列或3列的同欄同時都有數字時，則標示底色的語法


(最後有數字的列 - 2)和(最後有數字的列 - 3)的二列之同欄都<>""時，則標示淡紫底色。

(最後有數字的列 - 2)和(最後有數字的列 - 3)和(最後有數字的列 - 4)的三列之同欄都<>""時，則標示玫瑰紅底色。

請問︰VBA語法要如何編寫?
謝謝幫忙!
測試檔︰
依條件標示底色的語法.rar (6.61 KB)
收藏 分享

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
2#
發表於 2019-4-5 20:30 | 顯示全部帖子
回復 2# 准提部林

感謝版主的幫忙。
問題解決了!感恩!

TOP

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
3#
發表於 2019-4-5 20:31 | 顯示全部帖子
回復 3# hcm19522


    h大大:
謝謝您的函數解~感恩!

TOP

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
4#
發表於 2019-4-7 00:18 | 顯示全部帖子
回復 6# 准提部林
版主:您好!
For j = r To r - 3 Step -1
測試過近100個範例，答案都正確，所以沒有發現錯誤^^"

For j = r To r - 2 Step -1
感謝您的修正^^

TOP

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
5#
發表於 2019-4-7 16:12 | 顯示全部帖子
本帖最後由 ziv976688 於 2019-4-7 16:14 編輯

回復 6# 准提部林

版主大大:您好!
結論出來了~
For j = r To r - 3 Step -1
當最後4期都有數字時，就會有Bug了~產生偵錯。

For j = r To r - 2 Step -1
當最後4期都有數字時，會如需求將最後3期的數字標示指定的底色。

謝謝您的耐心指導和幫忙!感恩

TOP

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
6#
發表於 2019-4-16 09:12 | 顯示全部帖子
本帖最後由 ziv976688 於 2019-4-16 09:16 編輯

回復 6# 准提部林
主檔&測試用檔.rar (12.08 KB)
不好意思，因為工作表的列數不盡相同，所以程式執行後，有產生一些Bug(詳如圖片)。
敬請您賜正!謝謝您!
T_1       
T_2       
T_3       

TOP

ziv976688

帖子
678 
主題
147 
精華
0 
積分
799 
點名
0  
作業系統
win 8 
軟體版本
MS 2003 
閱讀權限
50 
性別
男 
註冊時間
2016-2-9 
最後登錄
2022-1-20 
7#
發表於 2019-4-19 15:19 | 顯示全部帖子
回復 10# 准提部林
准提版大:
Bug已完全消除了。
謝謝您的幫忙!感恩!

TOP

        靜思自在 : 好事要提得起，是非要放得下，成就別人即是成就自己。
返回列表 上一主題