麻辣家族討論版版 - Powered by Discuz! Board

標題: 求助：今日或今日之前的日期,字體變色 [打印本頁]

作者: K_Wing 時間: 2014-12-15 14:15 標題: 求助：今日或今日之前的日期,字體變色

因輸入資料時
需要輸入大量日期(儲存格獨立放置一個日期)
容易將年份輸入錯誤(例:7/8/2016錯誤打成7/8/2014)
錯誤造成該項資料過時

想問問有沒有方法輸入日期資料時
當日期輸入時是今天或今天之前
字體會變成另一種顏色(例如:紅色)

作者: p212 時間: 2014-12-15 15:09

回復 1# K_Wing

作者: K_Wing 時間: 2014-12-15 15:56

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

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

作者: rouber590324 時間: 2014-12-15 16:29

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

作者: K_Wing 時間: 2014-12-15 17:01

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

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

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

作者: hugh0620 時間: 2014-12-15 18:46

回復 5# K_Wing

C4 => 儲存格 C欄第4列

作者: hugh0620 時間: 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

複製代碼

作者: K_Wing 時間: 2014-12-15 20:37

本帖最後由 K_Wing 於 2014-12-15 20:39 編輯

回復 7# hugh0620
:L
哈哈...
我這個小學生
說出來實在汗顏
語法還不懂放到那裡使用...
不過還是要多謝兄弟幫忙

作者: hugh0620 時間: 2014-12-16 00:17

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

回復 8# K_Wing

可以開一個新檔案測試

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

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

[attach]19814[/attach]

作者: rouber590324 時間: 2014-12-16 08:52

1. =IF(AND(A1-NOW()<=0,A1<>""),TRUE,FALSE)
1.1 A1  => 儲存格第1欄第1列
2.你將滑屬移於A1儲儲存格.然後格式-設定格式化條件-公式為
  2.1  COPY =IF(AND(A1-NOW()<=0,A1<>""),TRUE,FALSE)
2.2  要變之字形/外匡/顏色內容需自行選取(無選取不會變色)
3.於 A1 輸入 12/16之前會依ITEM2.2你想要之需求變色.
4.再試試.

作者: Hsieh 時間: 2014-12-16 09:24

回復 1# K_Wing
選取輸入日期的範圍，(圖片中以A欄為輸入日期欄位)
A1為作用中儲存格
格式化條件/使用公式值來決定格式化哪些儲存格
=(A1<>"")*(A1<=TODAY())

[attach]19819[/attach]

作者: K_Wing 時間: 2014-12-16 09:30

回復 K_Wing
可以開一個新檔案測試

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

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

hugh0620 發表於 2014-12-16 00:17

一再感謝兄弟相助
我使用的版本
似乎與兄弟的版本略有不同
[attach]19817[/attach]
又或笨拙的我未能按圖索驥

我只是想避免資料因錯手而造成日期錯誤
導致被誤會為資料已過期
才會想出由表格給我作出提醒
(總比每次都由上司作出提醒的好)

其實最簡單的方法就是自己多留神
用多點時間覆Check就可以了

作者: K_Wing 時間: 2014-12-16 10:03

回復 10# rouber590324
感謝兄弟幫忙
不知何解
由A19至A22
只有部分日期能出現正確效果
[attach]19821[/attach]
這並不打緊
我會再反覆測試的
再說一聲多謝

作者: K_Wing 時間: 2014-12-16 10:12

回復 K_Wing
選取輸入日期的範圍，(圖片中以A欄為輸入日期欄位)
A1為作用中儲存格
格式化條件/使用公式 ...
Hsieh 發表於 2014-12-16 09:24

非常感謝
完全成功了
真是感激流涕

作者: hugh0620 時間: 2014-12-17 11:18

本帖最後由 hugh0620 於 2014-12-17 11:21 編輯

回復 8# K_Wing
格式化條件操作
[attach]19844[/attach]

新增第一個條件設定
[attach]19845[/attach]

新增第二個條件設定
[attach]19846[/attach]

透過管理規則，查看設了幾個條件
[attach]19847[/attach]
[attach]19848[/attach]

作者: K_Wing 時間: 2014-12-18 00:08

回復 15# hugh0620
感謝hugh0620兄熱心幫忙
這個方法同樣用得著

可惜論壇未有『熱心』和『感謝』這類評分
否則一定會給各位兄弟奉出謝意

歡迎光臨麻辣家族討論版版 (http://forum.twbts.com/)