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

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

hugh0620

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

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

1^# 跳轉到 »

發表於 2014-12-15 18:46 | 顯示全部帖子

回復 5# K_Wing

C4 => 儲存格 C欄第4列

學習才能提升自己

TOP

hugh0620

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

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

2^#

發表於 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

複製代碼

學習才能提升自己

TOP

hugh0620

　暱稱: VBA向前衝

高中生 Rank: 3 Rank: 3

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

3^#

發表於 2014-12-16 00:17 | 顯示全部帖子

本帖最後由 hugh0620 於 2014-12-16 00:18 編輯

回復 8# K_Wing

可以開一個新檔案測試

Excel 2007的話~ 先到一般->開發人員勾選起來~ 就有選項可以讓你開啟VB的程式撰寫區
(現在我是用2013~ 所以有點忘記2007VB開啟的方式~ 有誤的話~ 請見諒)

可以參照下面圖片或是爬爬文就知道了~