求助：今日或今日之前的日期,字體變色 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 求助：今日或今日之前的日期,字體變色

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

求助：今日或今日之前的日期,字體變色

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

7^# 跳轉到 »

發表於 2014-12-15 19:03 | 只看該作者

回復 5# K_Wing

此寫法針對A5這個欄位的日期去跟現在的時間比較~ 而改變顏色~
可以，試做看看~

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("A5") And Range("A5") < Now() Then
Range("A5").Interior.ColorIndex = 3
End If
End Sub

複製代碼

學習才能提升自己

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

6^#

發表於 2014-12-15 18:46 | 只看該作者

回復 5# K_Wing

C4 => 儲存格 C欄第4列

學習才能提升自己

中學生 Rank: 2

帖子: 140
主題: 27
精華: 0
積分: 158
點名: 0
作業系統: Windows10
軟體版本: office 2013
閱讀權限: 20
性別: 男
註冊時間: 2014-11-27
最後登錄: 2023-2-26

5^#

發表於 2014-12-15 17:01 | 只看該作者

DEAR SIR
『條件格式化』試試改公式
=IF(C4-NOW()<=0,TRUE,FALSE)
rouber590324 發表於 2014-12-15 16:29

多謝兄弟拔刀相助
已嘗試過在『條件格式化』加入此公式
得出的答案是
無論今日之前或後
日期都會變色

另想問問公式中的"C4"是代表甚麼?

高中生 Rank: 3 Rank: 3

帖子: 561
主題: 160
精華: 0
積分: 725
點名: 0
作業系統: WINDOWS
軟體版本: xp
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2014-9-10
最後登錄: 2024-8-7

論壇榮譽勳章論壇贊助勳章熱烈參與勳章

4^#

發表於 2014-12-15 16:29 | 只看該作者

DEAR SIR
『條件格式化』試試改公式
=IF(C4-NOW()<=0,TRUE,FALSE)

羅

中學生 Rank: 2

帖子: 140
主題: 27
精華: 0
積分: 158
點名: 0
作業系統: Windows10
軟體版本: office 2013
閱讀權限: 20
性別: 男
註冊時間: 2014-11-27
最後登錄: 2023-2-26

3^#

發表於 2014-12-15 15:56 | 只看該作者

回復 2# p212
感謝兄弟幫忙
『條件格式化』此方法已試過
只能規限今天和昨天
儲存格的日期才會變色
但若然再早一些日子
日期郤沒有轉色

我想要的是：今日又或今日之前的日期會變色

高中生 Rank: 3 Rank: 3

帖子: 618
主題: 17
精華: 0
積分: 663
點名: 1
作業系統: WINDOWS 7
軟體版本: OFFICE 2013
閱讀權限: 50
性別: 男
來自: Pingtung
註冊時間: 2011-9-2
最後登錄: 2024-7-5

2014馬年全勤獎章 2013蛇年全勤獎章熱烈參與勳章

2^#

發表於 2014-12-15 15:09 | 只看該作者

回復 1# K_Wing

Fig.jpg (70.06 KB)

靜思自在 : 【行善要及時】行善要及時，功德要持續。如燒開水一般，未燒開之前千萬不要停熄火候，否則重來就太費事了。

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