返回列表 上一主題 發帖

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

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 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: 3Rank: 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這個欄位的日期去跟現在的時間比較~ 而改變顏色~
     可以，試做看看~
  1. Private Sub Worksheet_Change(ByVal Target As Range)

  3. If Target = Range("A5") And Range("A5") < Now() Then
  4.     Range("A5").Interior.ColorIndex = 3
  5. End If

  7. End Sub
複製代碼
學習才能提升自己

TOP

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 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開啟的方式~ 有誤的話~ 請見諒)

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

學習才能提升自己

TOP

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 3

帖子
559 
主題
58 
精華
0 
積分
626 
點名
0  
作業系統
win8 
軟體版本
office2013 
閱讀權限
50 
性別
男 
來自
TW 
註冊時間
2010-11-22 
最後登錄
2024-6-14 
4#
發表於 2014-12-17 11:18 | 顯示全部帖子
本帖最後由 hugh0620 於 2014-12-17 11:21 編輯

回復 8# K_Wing
格式化條件操作


新增第一個條件設定


新增第二個條件設定


透過管理規則，查看設了幾個條件

學習才能提升自己

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝，花了許多心血，想盡各式方法要遮擋時間，結果是：浪費了更多時間，且一無所成！
返回列表 上一主題